这些代码可以连接上数据库??????????

forevernuo forevernuo 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
string s_reg
RegistrySet('HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\ODBC Data Sources','sky',RegString!,'SQL Server');
RegistrySet('HKEY_current_user\software\odbc\odbc.ini\sky','',RegString!,'');
RegistrySet('HKEY_current_user\software\odbc\odbc.ini\sky','driver',RegString!,'C:\WINNT\System32\SQLSRV32.dll');
RegistrySet('HKEY_current_user\software\odbc\odbc.ini\sky','lastuser',RegString!,'sa');
RegistrySet('HKEY_current_user\software\odbc\odbc.ini\sky','server',RegString!,'192.168.0.88');
RegistrySet('HKEY_current_user\software\odbc\odbc.ini\sky','DataBase',RegString!,'hrb');

SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = true
SQLCA.DBParm = "ConnectString='DSN=sky"
connect;
if sqlca.sqlcode=0 then
messagebox("提示","数据库连接正常!")
open(w_login)
close(parent)
else
messagebox(string(sqlca.sqlcode),sqlca.sqlerrtext)
return
end if

现在我这里莫名其妙的出现了这样的问题 我就用这些代码就连接上数据库了

可是 我实在是找不出是哪里设置了 连接数据库的密码 他怎么会连接上数据库呢

请问谁能告诉我为什么
...全文
评论 5
收藏 已收藏
分享
返回顶部
forevernuo
数据库相关 754 成员 12,762 内容