读书人

pb连接Oracle的一个异常

发布时间: 2012-03-20 14:01:11 作者: rapoo

pb连接Oracle的一个错误
Transaction SQLCNT;
SQLCNT = CREATE Transaction;
SQLCNT.DBMS = "O90 Oracle9i (9.0.1)";
SQLCNT.Database = "";
SQLCNT.ServerName = "test";
SQLCNT.LogID = "test1";
SQLCNT.LogPass = "test11";

connect;
If SQLCNT.SqlCode <> 0 Then
MessageBox("连接提示","连接数据库失败");
DESTROY SQLCNT;
else
Select * from ZGXX;
MessageBox("连接提示","连接数据库成功");
end if;

上面一段代码是我在Application的open()方法中写的一段代码,compile的时候会报“Cannot Compile without valid database signon”错误
请教各位,这是什么问题?
oracle的客户端我是装了的,test的服务都是有的,是不是pb没识别出来要连的数据库方式?

[解决办法]
Transaction SQLCNT;
SQLCNT = CREATE Transaction;
// Profile test9i
SQLCNT.DBMS = "O90 Oracle9i (9.0.1)"
SQLCNT.LogPass = "test11"
SQLCNT.ServerName = "test"
SQLCNT.LogId = "test1"
SQLCNT.AutoCommit = False
SQLCNT.DBParm = ""

connect using SQLCNT;
If SQLCNT.SqlCode <> 0 Then
MessageBox("连接提示","连接数据库失败");
DESTROY SQLCNT;
else
Select * from ZGXX;
//pb不支持这样的写法(可以这样,select a into :ls_a from ZGXX;)
MessageBox("连接提示","连接数据库成功");
end if;
[解决办法]
而且你如果没有特殊需要,直接使用PB默认的事务连接对象sqlca
否则,你这样子写sql后面都要加上using SQLCNT;
select a into :ls_a from ZGXX using SQLCNT;

读书人网 >PB

热点推荐