// Profile sa
SQLCA.DBMS = "O10 Oracle10g (10.1.0)"
SQLCA.LogPass = "student"
SQLCA.ServerName = "orcl"
SQLCA.LogId = "student"
SQLCA.AutoCommit = False
SQLCA.DBParm = "PBCatalogOwner='student',TableCriteria=',student'"
connect
if sqlca.sqlcode= 0 then
open(w_t1)
else
halt
end if
在connect语句执行前,查看下事务对象(默认是SQLCA)的DBParm属性:SQLCA.DBParm看下是否是如下字符串:
ConnectString='DSN=××××'
注意××××是否是你所要链接的数据库名。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)