联接数据库出错

ppxstar_luoxing 2002-02-03 10:14:28

我联接数据库用MSS Microsoft SQL Server ，properties里生成preview内容如下
// Profile spwsj
SQLCA.DBMS = "MSS Microsoft SQL Server 6.x"
SQLCA.Database = "123"
SQLCA.LogPass = <******>
SQLCA.ServerName = "100.202.143.188"
SQLCA.LogId = "sa"
SQLCA.AutoCommit = False
SQLCA.DBParm = ""
点test connection提示联接成功

copy 到程序里，稍做修改如下
// Profile spwsj
SQLCA.DBMS = "MSS Microsoft SQL Server 6.x"
SQLCA.Database = "123"
SQLCA.LogPass = "1234"
SQLCA.ServerName = "100.202.143.188"
SQLCA.LogId = "sa"
SQLCA.AutoCommit = False
SQLCA.DBParm = ""
if sqlca.sqlcode<>0 then
messagebox("与数据库连接不上",sqlca.sqlerrtext)
return
end if

却联不上去，执行了
messagebox("与数据库连接不上",sqlca.sqlerrtext)
return

请问错在哪里

...全文

105 5 打赏收藏转发到动态举报

写回复

用AI写文章

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

ppxstar_luoxing 2002-02-03

打赏
举报

给分

ppxstar_luoxing 2002-02-03

打赏
举报

问题解决了，是我粗心了，没有connection sqlca

ppxstar_luoxing 2002-02-03

打赏
举报

我试过了，也是联接成功，但是copy到程序里就不行了

zyx_csu 2002-02-03

打赏
举报

将
if sqlca.sqlcode<>0 then
messagebox("与数据库连接不上",sqlca.sqlerrtext)
return
end if
改成
if sqlca.sqlcode＝－1 then
messagebox("与数据库连接不上",sqlca.sqlerrtext)
return
end if
然后你建立一个数据窗口，检索一下数据

zhanwei 2002-02-03