主页

VB+SQL

xp_xp 2004-10-30 10:49:59

请教，我用VB+SQL开发了一个小小的系统，在本地机器上配置了数据源。且能够对数据库进行操作。但是，我要把这个程序移到其它机器上去，或者把它打包成EXE文件。在使用该系统时，是不是还是要配置SQL服务器？

...全文

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

aohan 2004-10-31

配置是必要的，队非两边的环境是一样的，所以有必要将ID，PASSWORD，DATABASE等做活

回复赞

华芸智森 2004-10-31

在本地机器上配置了数据源
'--------------------------------
将ODBC配置文件一齐COPY过去.重新设置一次.

参考下面这篇文章.

用VB打包时，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

回复赞