PB12.5连接数据库
方法一:
// Profile
SQLCA.DBMS = "SNC SQL Native Client(OLE DB)"
SQLCA.LogPass = <*****************> //请修改成自己的密码
SQLCA.ServerName = "server"
SQLCA.LogId = "sa"
SQLCA.AutoCommit = False
SQLCA.DBParm = "Database='MyDatabase',ProviderString='database=MyDatabase'"
If sqlca.sqlcode = 0 then
Open(w_test)
Else
Messagebox(‘连接数据库’,’连接数据库失败!’)
End if
方法二:
// Profile
SQLCA.DBMS = "OLE DB"
SQLCA.LogPass = <*****************> //请修改成自己的密码
SQLCA.LogId = "sa"
SQLCA.AutoCommit = False
SQLCA.DBParm = "PROVIDERSTRING='database=Mydatabase',PROVIDER='SQLOLEDB',DATASOURCE='server'"
If sqlca.sqlcode = 0 then
Open(w_test)
Else
Messagebox(‘连接数据库’,’连接数据库失败!’)
End if
这两种连接方法都可以使用,PB12.5版本不再支持直接连接ms sql server.
供初学PB的朋友参考!