请问如何在ODBC中注册我的数据库(用代码实现)?
Private Sub RegisterDataSource()
Dim strAttribs As String
建造关键字字符串。
strAttribs = "Description=Dinner Data Source Name" _
& Chr$(13) & "DBQ=" & App.Path & "\database\BusSoft.mdb" _
& Chr$(13) & "Fil=MS Access;"
建立新的注册的 DSN。
rdoEngine.rdoRegisterDataSource "Dinner", "Microsoft Access Driver *.mdb)", True, strAttribs
end sub
是用这个吗?可是我不能运行,一直出错.