|
原帖由 GoodFortune 于 2008-9-13 10:47 发表
制作DLL时,ThisWorkBook中的代码封装方法如下:1、打开VB6,新建ActiveX DLL。修改“工程”名称和“类模块”名称为需要的名称。本例中,工程修改为TestDLL,类模块修改为Test。2、建立引用。一般需要引用Microsoft ...
如果我是在dll里连接sql数据库,那应该怎么来调用?
dll文件名为sqltools, dll里的代码是:
Sub mysql(cnn As ADODB.Connection) '不知道这样的变量定义对不对。
cnn.ConnectionString = "Provider=SQLOLEDB;" _
& "User ID=sa;" _
& "Password =11111;" _
& "Data Source=server;" _
& "Initial Catalog =数据"
cnn.Open
If cnn.State = adStateOpen Then
MsgBox "数据库连接成功!", vbInformation, "连接服务器"
Else
MsgBox "数据库服务器连接失败!", vbInformation, "连接服务器"
End If
End Sub
然后VBA里的模块应该怎么来写才能调用dll进行对数据库的连接? |
|