小编Han*_*sUp的帖子

当文件夹更改时,保留相同文件夹中Access DB的链接表

我有两个共享链表的Access数据库.它们一起部署在目录中,并通过Word表单中的代码进行访问.

当两个数据库(一起)复制到另一个文件夹时,如何确保保留链接?由于我不是"打开"数据库本身(它是通过ADO访问),我不知道如何编写代码来刷新链接.

ms-access hyperlink linked-tables

8
推荐指数
1
解决办法
8309
查看次数

Access.Application.Eval()的奇怪行为

解释为什么Access.Application.Eval()(通常缩写为Eval())产生的结果不同于在这种情况下仅评估原始表达式:

Debug.Print Round(.575 * 100)
 57 
Debug.Print Eval("Round(.575 * 100)")
 58 
Run Code Online (Sandbox Code Playgroud)

编辑:为了解决GSerg的答案,以下仍然会返回不同的结果:

Debug.Print Eval("Round(CSng(.575) * 100)")
 57 
Debug.Print Round(CSng(.575) * 100)
 58 
Run Code Online (Sandbox Code Playgroud)

ms-access vba access-vba

8
推荐指数
1
解决办法
612
查看次数

如何在VBA中查找返回类型

我有一个MS Access应用程序,并找到返回类型的函数有问题.有没有办法找到对象的返回类型?我有类型不匹配错误.

ms-access vba access-vba

8
推荐指数
1
解决办法
1万
查看次数

DAO.Recordset,DAO.Recordsets,DAO.Recordset2之间的差异

任何人都可以解释之间的差异DAO.Recordset,DAO.Recordsets以及DAO.Recordset2在MS Access 2007?基本上使用记录集....举一个例子,使其更清晰.我从帮助选项中找到了一些参考资料,但我不清楚它的过程......

ms-access ms-access-2007 access-vba

8
推荐指数
1
解决办法
5147
查看次数

是否可以在不使用AVAudioSessionCategoryPlayAndRecord的同时播放和录制音频

这个想法来自这个应用程序(Keezy):http://keezy.net/

基本上,我试图让用户同时收听音频和录音.我知道这个类别AVAudioSessionCategoryPlayAndRecord,但是这个类别会强制AVAudioPlayer减少它的数量.

尝试录制音频时AVAudioSessionCategoryPlayback不起作用(不记录任何内容),其他类别似乎不相关.我想知道是否有办法实现Keezy的功能 - 高音量播放音频,同时允许用户同时录制音频.

(如果没有播放类别,找不到任何有关解决此问题的示例/主题.)

objective-c avaudioplayer avaudiorecorder avaudiosession

8
推荐指数
1
解决办法
939
查看次数

运行时错误2185

我得到一个run time error 2185,"你不能引用控件的属性或方法,除非控件有焦点......".

这是我正在使用的代码.

Private Sub Command5_Click()
    Dim cardno As Integer
    cardno = cardnumber.Text
    DoCmd.OpenForm "search_card_number", acNormal, , WHERE & cardno = [Account Number]
End Sub
Run Code Online (Sandbox Code Playgroud)

ms-access access-vba

8
推荐指数
2
解决办法
2万
查看次数

如何确定列表框中是否选择了任何行

我的Access表单中有一个列表框.我需要知道用户是否已选择此列表框中的任何行.是否存在用于此目的的简单Access属性或方法?我不想遍历列表框来检查任何行的selected属性是否为true,因为我只想知道是否已完成选择操作.

ms-access listbox access-vba ms-access-2003

8
推荐指数
2
解决办法
3万
查看次数

关于组合框选择的错误2115

我在表单上有一个组合框,我正在尝试以编程方式在访问数据库上运行SQL查询后选择组合框中的一个项目.我使用以下代码迭代项目并设置所选项目:

'Make the appropriate location appear in the combobox
For i = 0 To cboLocations.ListCount - 1
  If Me.cboLocations.Column(0, i) = locindex Then
    Debug.Print "locindex: " & locindex & vbCrLf & " Me.cboLocations.Column(0, i):" & Me.cboLocations.Column(0, i)
    Me.cboLocations.SetFocus
    Me.cboLocations.ListIndex = i '<<< error 2115
    Exit For
  End If
Next i
Run Code Online (Sandbox Code Playgroud)

如上所示,我不断收到错误2115:为此字段设置为BeforeUpdate或ValidationRule属性的宏或函数阻止Access在字段中保存数据.

错误消息中指示的此组合框的任何属性都未设置为任何值.所以我被卡住了.请指教.

ms-access access-vba ms-access-2010

8
推荐指数
1
解决办法
395
查看次数

有没有办法使用If语句的条件作为其值?

这可能是一个简单的问题,但它是我以前从未见过的答案.有没有办法使用if语句的条件作为其值?在进行大量计算以确定是否满足某个条件的情况下,这将非常有用,如果是,则计算结果.

举个例子:

if ( [intense calculation] > 0, [same intense calculation], 0)
Run Code Online (Sandbox Code Playgroud)

我特别感兴趣的是关于SQL,因为我现在正在使用Access中的报表,因此无法将强烈计算的结果存储在变量中.

sql optimization ms-access conditional-statements

7
推荐指数
1
解决办法
120
查看次数

SQL 查询用于计算每个客户的订单数量和总金额

我有两个 Order带有列的表:

OrderID,OrderDate,CID,EmployeeID
Run Code Online (Sandbox Code Playgroud)

OrderItem带有列:

OrderID,ItemID,Quantity,SalePrice
Run Code Online (Sandbox Code Playgroud)

我需要返回客户 ID(CID)、每个客户的订单数以及每个客户所有订单的总金额。

到目前为止,我有两个单独的查询。其中一个给我客户订单的数量......

SELECT CID, Count(Order.OrderID) AS TotalOrders
FROM [Order]
Where CID = CID 
GROUP BY CID
Order BY Count(Order.OrderID) DESC;
Run Code Online (Sandbox Code Playgroud)

另一个给我总销售额。我在组合它们时遇到了麻烦......

SELECT CID, Sum(OrderItem.Quantity*OrderItem.SalePrice) AS TotalDollarAmount
FROM OrderItem, [Order]
WHERE OrderItem.OrderID = [Order].OrderID
GROUP BY CID
Run Code Online (Sandbox Code Playgroud)

我在 Access 2010 中执行此操作。

sql ms-access

7
推荐指数
1
解决办法
13万
查看次数