Win7,64位,Access 2010,ADO 6.1,应用服务器是Win Server 2008R2
这真的很奇怪。下面的代码适用于我的本地计算机,但是当我登录到应用服务器并运行相同的东西时,它不起作用。
Dim cmd As ADODB.Command
If cboContractStatus.ListCount <= 1 Then
Set cmd = getADODBCommand("P_getContractStatus")
Set cboContractStatusExist.Recordset = rs
Set cmd = Nothing
End If
If comboAffiliates.ListCount <= 1 Then
Set cmd = getADODBCommand("B_affGetAllNames")
Set comboAffiliates.Recordset = cmd.Execute
Set cmd = Nothing
End If
第一个组合正确加载。第二个根本不加载。它给出了一个msgbox说“找不到列'Expr 52&gt;'”这根本不是一个错误。代码不会破坏。 msgbox有一个链接说“这个信息有用吗?”
这是正在调用的存储过程。
SELECT
FirstName + ' ' + LastName affName
FROM
tbl_Affiliate
ORDER BY
FirstName
最后一件事 - 正如我昨天编写的那样,它工作得很好。