我用工具条中的DB Profile连接数据库之后,在创建datawindow时也能看见所连数据库中的表,但我用run运行时,却提示连接数据库出错‘DBMS is not support in your current installation!’,
我用的pb8.0+SQL server 7.0,请教各位大侠是怎么回事?
...全文
9913打赏收藏
数据库连接问题!!急
我用工具条中的DB Profile连接数据库之后,在创建datawindow时也能看见所连数据库中的表,但我用run运行时,却提示连接数据库出错‘DBMS is not support in your current installation!’, 我用的pb8.0+SQL server 7.0,请教各位大侠是怎么回事?
配置文件这样写就可以
////////////////
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='DSN=tms;UID=dba;PWD=sql'"
connect using sqlca;
if sqlca.sqlcode<>0 then
messagebox("数据库联接失败",sqlca.sqlerrtext,stopsign!)
halt
end if
你是不是粗心,没有把数据库连接语句写到application的open事件里啊?把下面的语句加上去就可以了
connect;
if sqlca.sqlcode <> 0 then
messagebox("connot connect database",sqlca.sqlerrtext)
end if