PB和ORACLE的连接问题！

camelzxz 2003-11-13 03:00:46

怎样才能使PB和ORACLE的连接起来？
我用的是ORACLE8.0和PB9.0。
数据库的名称是：DBSERVER
在应用的窗口里的Open()的代码如何写？多谢！

...全文

81 6 打赏收藏转发到动态举报

写回复

用AI写文章

6 条回复

切换为时间正序

请发表友善的回复…

发表回复

camelzxz 2003-12-23

打赏
举报

谢谢你们！问题解决

TGWall 2003-11-14

打赏
举报

同意楼上的
另外,为了更连接更加灵活,相关的参数你可以通过profilestring从ini文件导入

jlwei888 2003-11-14

打赏
举报

SQLCA.DBMS = "O84 ORACLE 8.0.4"
SQLCA.LogPass = 密码
SQLCA.ServerName = 服务名
SQLCA.LogId = 用户名
SQLCA.AutoCommit = False
SQLCA.DBParm = "PBCatalogOwner='用户名'"

klbt 2003-11-14

打赏
举报

与其它数据库类似：

String inifile="myfile.ini"

SQLCA.DBMS =ProfileString(inifile,"Database","DBMS", " ")
SQLCA.Database =ProfileString(inifile,"Database","DataBase", " ")
SQLCA.LogID =ProfileString(inifile,"Database","LogID", " ")
SQLCA.LogPass =ProfileString(inifile,"Database","LogPassword", " ")
SQLCA.ServerName =ProfileString(inifile,"Database","ServerName", " ")
SQLCA.UserID =ProfileString(inifile,"Database","UserID", " ")
SQLCA.DBPass =ProfileString(inifile,"Database","DatabasePassword", " ")
SQLCA.Lock =ProfileString(inifile,"Database","Lock", " ")
SQLCA.DbParm =ProfileString(inifile,"Database","DbParm", " ")

connect;

if Sqlca.SqlCode <> 0 then
MessageBox ("数据库连接失败!", Sqlca.SqlErrText)
if Message.DoubleParm = -1 then
halt close
return
end if
end if

Sqlca.AutoCommit=False
关键是你的DBProfile要配置正确。

鸡翅多 2003-11-14

打赏
举报

// Profile dbserver
SQLCA.DBMS = "O84 Oracle8/8i (8.x.4+)"
SQLCA.LogPass = yourpassword
SQLCA.ServerName = dbserver
SQLCA.LogId = yourusername
SQLCA.AutoCommit = False
SQLCA.DBParm = ""

camelzxz 2003-11-14