hur.cn - 华软网

 热门搜索

如何自动连接数据库

  作者:未知    来源:网络    更新时间:2019/10/7
建立数据库newdb, 说要实现"自动连接数据库,ODBC数据源名也为newdb",这个是什么意思?是在那里举行配置的?能够直接在DB Profile里面照旧要在控制面板里。如果可能把详细方法写一下,谢谢
------华软网友回答------
控制面板--管理工具--odbc

按照“新增”向导制作即可
------华软网友回复------
谢谢楼上的。
再请问是在一下哪一个选项卡里举行配置:
User DSN,System DSN,File DSN

是否是Click Add—〉选Adaptive Server Anywhere 8.0 (我是用PB自带的)-〉 填写
在ODBC:Data Source name
Database选项卡:选Database name 和指定 database file (用Brower即可吗)
另有没有另外地方要注意的?请提醒一下,谢谢。

这样设置有什么优点,如果我把数据库资料移到另外电脑上是否是需要重新配置,有没有措施把原来的设置一起搬过去的方法。再次谢谢

------华软网友回复------
换了机器要配odbc,我一般不用odbc连!
------华软网友回复------
直接用:
SQLCA.DBMS = "MSS Microsoft SQL Server"
SQLCA.Database = "db"
SQLCA.LogPass = <**>
SQLCA.ServerName = "l"
SQLCA.LogId = "sa"
SQLCA.AutoCommit = False
SQLCA.DBParm = ""
就能够了,能够将参数存入一个资料,根据需要修改资料就能够
------华软网友回复------
楼上正解.
------华软网友回复------

------华软网友回复------
需要把以上的命令写在什么资料里,如果是用Adaptive Server Anywhere 8.0,要怎么改,写在那里,能不能把步骤列一下。谢谢
------华软网友回复------
看来楼主意思是用代码自动配置odbc了,而不是开发时的配置

能够思量在程序中运行时自动配置数据源,系统的或用户的在这类情况下无所谓,看用户环境和需求定了

需要注意:
1、odbc驱动--几个资料而已,自己检检验证一下,几分钟ok
2、注册表项目--自己查一下,影像里面就以下几个项目,不足的话自己补一下
3、已有的项目注意不要影响系统中的其它程序

[HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\名称]
"Driver"="C:\\...\\dbodbc9.dll"
"UID"="***-DBA"
"PWD"="***-SQL"
"DatabaseName"="名称"
"DatabaseFile"="c:\\...\\***.db"
"AutoStop"="yes"

[HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\ODBC Data Sources]
"bhmh1"="Adaptive Server Anywhere 9.0"

[HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\Adaptive Server Anywhere 9.0]
"Driver"="C:\\....\\dbodbc9.dll"
"Setup"="c:\\....\\dbodbc9.dll"

[HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\ODBC Drivers]
"Adaptive Server Anywhere 9.0"="Installed"

[HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\ODBC Translators]
"Adaptive Server Anywhere 9.0 Translator"="Installed"


------华软网友回复------
不知道你是否用的是ACCESS数据库呢?否则另有一个正确而且很好连接的方法
以下:
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='driver=Microsoft Access Driver (*.mdb);DBQ=c:\foodmart.mdb'"

CONNECT;

IF SQLCA.SQLCode <> 0 THEN
MessageBox("数据库连接失利","请与管理员联系。毛病号:" + String(SQLCA.SQLCode) + "~r~n毛病原因:" + SQLCA.SQLErrText)
RETURN
else
MessageBox("数据库连接成功","现在进入系统... ...")
end if

------华软网友回复------
写入INI资料然后用在程序中用ProfileString()函数掏出来即可
------华软网友回复------
除非是必需运用ODBC,否则最好不用ODBC,如果是SQL server,就直接连接      
华软声明:本内容来自网络,如有侵犯您版权请来信指出,本站立即删除。