标签: ms-access-2013

我正在尝试将8个不同查询的结果组合回一个查询中。所有要使用的查询都是查询的查询。这8个系列的4个查询将球员分为多少场，具体取决于他们打了几轮高尔夫球。每个系列中的最后一个查询将计算每个玩家的准确让分。

我尝试使用的代码可能无法执行操作。

功能代码如下：

Function EHC(PlayerID As Long) As Long

    Dim queT20 As Recordset
    Dim que3to6 As Recordset
    Dim que7or8 As Recordset
    Dim que9or10 As Recordset
    Dim que11or12 As Recordset
    Dim que13or14 As Recordset
    Dim que15or16 As Recordset
    Dim que17or18 As Recordset
    Dim que19or20 As Recordset

    Set queT20 = CurrentDb.OpenRecordset("Top20Count")
    queT20.FindFirst ("PlayerID =" & PlayerID)
    If queT20![PlayerID] >= 19 Then
        Set que19or20 = CurrentDb.OpenRecordset("P_19or20ExactHC")
        que19or20.FindFirst ("PlayerID =" & PlayerID)
        ExactHC = que19or20.Exact_HC
        que19or20.Close
        Set que19or20 = Nothing
    ElseIf queT20![PlayerID] >= 17 …

我使用Visual Studio 2013 Visual Basic,MS ACCESS 2013,EXCEL 2013

我的程序另存为我的数据网格中的数据为excel.我使用Access 2013作为我的数据库这是我的代码:

Imports System.Data.OleDb
Imports Excel = Microsoft.Office.Interop.Excel

Public Class Form1

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        'TODO: This line of code loads data into the 'AccessdbtestDataSet.country' table. You can move, or remove it, as needed.
        Me.CountryTableAdapter.Fill(Me.AccessdbtestDataSet.country)
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Dim con As New OleDbConnection
        Dim query As String = "SELECT * FROM  country"
        con.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=accessdbtest.accdb"
        con.Open() …

我正在使用Access 2013,我在使用UBound()时遇到了问题.编译器无法识别该功能.也许这个函数有一个特定的库,但在microsoft网站上没有提到.这是我使用的代码:

Dim Key(2)  As String

Key(0) = "0"
Key(1) = "1"
Key(2) = "2"

UBound(Key,1)

有没有人有同样的问题？

谢谢!

我已经将一些数据从Excel导入到Access中。现在，我想编写类似于触发器的代码，每当我从Excel中获取新数据时，该代码就会更新另一个表。

我知道我无法在Access中编写触发器，因此我正在尝试使用数据宏。谁能为我提供有关如何使用数据宏执行此操作的帮助？

我有一个Access 2013表单，其中有两个未绑定的日期字段，FromDate和ToDate。我将它们插入具有自动编号键字段的表（TblGuestBooking）中，因此在后面的SQL语句中没有此功能。

如果FromDate和ToDate在同一月份，则日期输入为dd / mm / yy，即表单字段的格式。但是，如果起始日期在一个月内，而截止日期在下个月或下个月，则后续月份的格式将更改为mm / dd / yy。

例如，26/2/14到3/3/14产生以下表条目：

26/02/14，
27/02/14，
28/02/14，
14年3月1日，
14年3月2日，
14年3月3日

这是我用来将日期放入表格中的代码片段（BookingID是从表单获取的。）

Dim BookingDate As Date

Dim SQLString As String

....

BookingDate = FromDate

Do
    SQLString = "INSERT INTO TblGuestBooking ([BookingDate], [BookingID])  VALUES (#" & BookingDate & "#" & "," & Me.GuestSuiteBookingID & ")"

    DoCmd.SetWarnings False
    DoCmd.RunSQL SQLString
    DoCmd.SetWarnings True
    BookingDate = BookingDate + 1
Loop Until BookingDate = ToDate + 1

如果您已经阅读了本文，则感谢您的宝贵时间。如果您能帮助我，非常感谢。

我正在使用MS Access 2013数据库名称为“ comm”，密码为“ xyz @ 12345”

Web.config连接字符串：

<add name="commconn" connectionString="Provider=Microsoft.ACE.OLEDB.12.0; Data Source=E:/ee/comm.accdb; Jet OLEDB:Database Password=xyz@12345;" />

当我运行我的WebSite时，它仅在我的DropDownList绑定数据的地方给出错误，错误是“无效密码”。

我使用以下代码绑定我的DropDownList：

<asp:DropDownList ID="DropDownList1" runat="server" DataSourceID="AccessDataSource1" DataTextField="share_amt" DataValueField="ID">
</asp:DropDownList>
<asp:AccessDataSource ID="AccessDataSource1" runat="server" DataFile="~/comm.accdb" SelectCommand="SELECT * FROM [share_amt] ORDER BY [ID]">
</asp:AccessDataSource>

我正在使用MS Access 2013数据库和带有C＃的ASP.Net。

我目前正在使用MS Access 2013，但以前使用的某些表格存在问题。我回过头来编辑它们以具有不同的功能。我需要弹出表格。现在，当它们不是弹出窗口时，它们可以完美工作，但是一旦我将表单更改为弹出窗口，表单就会从屏幕上弹出。我不知道如何解决这个问题。

现在，我要做的第一件事是从旧版本开始，然后我将重新制作表格。但是，一旦我从这些旧表格中更改了一项内容，表格就会再次从屏幕上弹出。

有没有人遇到这个问题或知道如何解决？

在启动我的 MS Access 2013 数据库时，我只需要它来显示启动表单，而不是其他任何东西。所需的结果如下所示。背景是我的桌面。

期望：

但是，当我打开数据库时，表单会打开整个屏幕。

下面的 VBA 代码在启动表单加载时运行并开始工作，但如果我最小化窗口，我可以再次看到背景。

Option Compare Database
Option Explicit
Global Const SW_HIDE = 0
Global Const SW_SHOWNORMAL = 1
Global Const SW_SHOWMINIMIZED = 2
Global Const SW_SHOWMAXIMIZED = 3

Private Declare Function apiShowWindow Lib "user32" _
Alias "ShowWindow" (ByVal hWnd As Long, _
ByVal nCmdShow As Long) As Long

Function fSetAccessWindow(nCmdShow As Long)
Dim loX As Long
Dim loForm As Form
On Error Resume Next
Set loForm = Screen.ActiveForm

If Err <> 0 Then …

我正在创建一个 MS Access 2016 数据库。在一张表中，它有两个日期字段和一个时间字段。在表格格式中，两个日期字段都设置为“显示日期选择器”属性设置为“日期”。此外，在使用这两个字段的表单上，这些字段都设置为“日期”。问题是日期选择器仅显示一个，尽管所有属性都相同，当然字段名称除外。我已经调整了页面大小和字段大小，但似乎没有任何帮助。有没有人见过这个问题？任何想法我能做什么？

我是访问新手，我想要做的是带有条件的选择，因此我使用向导创建了一个查询，并使用表单中的文本设置了条件 ([Forms]![Form1]![Transacao]) 和创建了一个第一次运行查询的按钮效果很好，但是当我输入其他内容并单击该按钮时，数据不会刷新。我必须做什么才能刷新？我试图在按钮的事件点击上添加刷新，但没有奏效。

在此先感谢您的帮助。