pb连接数据库代码

梦光

于 2016-08-05 17:14:46 发布

阅读量5.7k

点赞数 1

CC 4.0 BY-SA版权

分类专栏： pb 文章标签： pb连接数据库代码

本文链接：https://blog.youkuaiyun.com/deng2010h/article/details/52130996

pb连接数据库两种方式：
第一种直接连接：

SQLCA.DBMS = "MSS Microsoft SQL Server"
SQLCA.Database = "TOPSKY0722"
SQLCA.LogPass = "futian"
SQLCA.ServerName = "."
SQLCA.LogId = "futian_user"
SQLCA.AutoCommit = False
SQLCA.DBParm = ""

disconnect using sqlca;
CONNECT USING sqlca;
if sqlca.sqlcode<>0 then
    messagebox('提示','连接数据库失败')
else
    messagebox('提示','连接数据库成功')
end if