主题:请教:pb9.0与SYBASE数据库的连接问题!!
我单位服务器上有一现成的SYBASE数据库。我在自己的机上(W2000-PC)用PB9.0能连接数据库。可我将此连接的Preview的内容COPY 、PASTE到我的一个应用上进行连接时老是连不上。请各位大侠指点!!!
//设置数据库连接
// Profile 120
SQLCA.DBMS = "SYC Sybase System 10/11"
SQLCA.Database = "ezltax"
SQLCA.LogPass = "*******"
SQLCA.ServerName = "120"
SQLCA.LogId = "ezxcfj"
SQLCA.AutoCommit = False
SQLCA.DBParm = "Release='11'"
connect;//连接数据库
//判断连接是否成功,不成功,则提示出错信息,并返回。
if sqlca.sqlcode<>0 then
messagebox("错误","数据库连接错误,请检查后重试!")
close(w_main)
return
messagebox("恭喜您,连接成功!")
end if
//设置数据库连接
// Profile 120
SQLCA.DBMS = "SYC Sybase System 10/11"
SQLCA.Database = "ezltax"
SQLCA.LogPass = "*******"
SQLCA.ServerName = "120"
SQLCA.LogId = "ezxcfj"
SQLCA.AutoCommit = False
SQLCA.DBParm = "Release='11'"
connect;//连接数据库
//判断连接是否成功,不成功,则提示出错信息,并返回。
if sqlca.sqlcode<>0 then
messagebox("错误","数据库连接错误,请检查后重试!")
close(w_main)
return
messagebox("恭喜您,连接成功!")
end if