用VB打包时，ODBC的配置怎么安装
编号：QA003968
建立日期: 2001年3月8日 最后修改日期：2001年9月2日
所属类别：
sunqunfeng:
操作系统：windows98
编程工具：vb
问题：用VB打包时，ODBC的配置怎么安装？
水平: 中级
回答:
我不知道如何将odbc打包进去，但我有一个迂回的方法来解决“odbc打包”问题，就是使用rdo对象的rdoRegisterDataSource方法在程序内动态注册，这样就不存在“odbc打包”的问题了。具体方法如下：
rdoRegisterDataSource 方法示例
下面示例说明使用 rdoRegisterDataSource 方法建立新的 ODBC 数据源项。
Private Sub RegisterDataSource()
Dim en As rdoEnvironment
Dim cnTest As rdoConnection
Dim strAttribs As String
'建造关键字字符串。
strAttribs = "Description=" _
& "SQL Server on server SEQUEL" _
& Chr$(13) & "OemToAnsi=No" _
& Chr$(13) & "SERVER=SEQUEL" _
& Chr$(13) & "Network=DBNMPNTW" _
& Chr$(13) & "Database=WorkDB" _
& Chr$(13) & "Address=\\SEQUEL\PIPE\SQL\QUERY"
'建立新的注册的 DSN。
rdoEngine.rdoRegisterDataSource "示例", _
"SQL Server", True, strAttribs
'打开数据库。
Set en = rdoEngine.rdoEnvironments(0)
Set cnTest = en.OpenConnection( _
dsname:="示例", _
Prompt:=rdDriverNoPrompt, _
Connect:="UID=;PWD=;")
End Sub
浪潮一号问：
RDO对象在VB6中好像找不到，能指明一下RDO是哪里的控件？
李海答：RDO对象的全称为Microsoft Remote Data Objects，VB 6带有这个部件。如果你想运行上面的代码，可以在“引用”对话框中选择Microsoft Remote Data Objects 2.0。如果想在窗体使用RDO控件（类似Data控件），可以在“部件”对话框选择Microsoft RemoteData Control 6.0。
相关问题：
QA003254 "如何分发ODBC驱动程序"
此问题由az回答。
| |
|
|
| |
|
|
