2014-02-18 58 views
-1

我一直在研究一个接近完成的项目,但这最后一部分让我感到头疼,因为我之前从未这样做过,而且我很难找到需要帮助的研究让我走,我不知道哪里开始。该项目如下:(这是我老板的电子邮件的背景)将访问表单连接到SQL Server

您将需要查找如何使用vba检查连接。您要连接的服务器是HRLearnDev。我有一个访问表单,我会发送给你,它有宏中的连接信息,我做了类似的事情。不同的是,我的程序直接连接到服务器。您需要写入本地表,在打开访问文件时检查连通性,或者每隔几分钟检查一次连接,如果检查发现存在连接,请将数据从本地服务器表写入到远程服务器表,然后截断本地表。

我真的陷入困境,而且我没有足够的选择,所以对于初学者从何处着手的任何见解都将不胜感激。

+0

我不知道你在这里的实际问题是...你有什么具体问题? – 2014-02-18 13:37:32

+0

我不知道从哪里开始,这是所有的指令,我已经给 – user2119980

+0

开始写出所需。具体点 - 即。 Excel电子表格(它做什么,目的是什么?),VBA项目 - 它应该做什么?连接到数据库并将数据检索到电子表格?等等...... – 2014-02-18 16:15:14

回答

0

尝试是这样的检查连接:

Public Sub TestConnection() 
Dim cnn As ADODB.Connection 
Dim canConnect As Boolean 

Set cnn = New ADODB.Connection 
cnn.Provider = "sqloledb" 
cnn.Open "Data Source=HRLearnDev;Initial Catalog=YourTableName;UserID=userID;Password='password';" 
If cnn.State = adStateOpen Then 
    canConnect = True 
    cnn.Close 
End If 
MsgBox "Can you connect? - " & canConnect 

End Sub 

老实说,这显然是一个家庭作业的问题,我不认为给你一个完整的答案是做正确的事情,但应该让你开始。

+0

那么首先给出答案的要点是什么? – 2014-02-18 16:14:00

+0

另一种方法是关闭它,因为A)它太笼统了,B)它没有包含任何尝试的代码,也没有表现出对该技术的最低限度的理解。相反,我给了OP足够的开始。 –