请问我的自定义事务对象为什么不好使?
//Global Variables:
transaction tran_destination
//==================================================
tran_destination = create transaction
// Profile Server
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='DSN=Server;UID=;PWD='"
connect using tran_destination;
if tran_destination.sqlcode<>0 then
Messagebox("错误","数据库连接出错!"+string(tran_destination.sqlcode),question!,okcancel!)
end if
======================================================================
把tran_destination换成CQLCA才好使,怪了,我以前都是这样做的,今天怎么出问题了呢?为tran_destination时错误代码为-1。
请帮忙,谢谢!
问题点数:40、回复次数:7Top
1 楼zhangdatou(猪头)回复于 2003-11-02 07:15:01 得分 5
在application的属性里有个按钮 aditional properties ->variable type _>
sqlca改称tran_destination
搞定 要全分:)
Top
2 楼bobor8(欧文)回复于 2003-11-02 09:38:36 得分 0
zhangdatou(猪头) 兄:
不行呀,不让改。SQLCA必须为transaction或继承自transaction。
我是想同时使用两个事务对象,以前没做过什么特别设置就好使,现在不知道为什么不好使了。
请继续!Top
3 楼jdsnhan(柳荫凉)回复于 2003-11-02 09:51:07 得分 20
既然是一个新的事物对象,那就要用它去配置连接信息。
//Global Variables:
transaction tran_destination
//==================================================
tran_destination = create transaction
// Profile Server
tran_destination.DBMS = "ODBC"
tran_destination.AutoCommit = False
tran_destination.DBParm = "ConnectString='DSN=Server;UID=;PWD='"
connect using tran_destination;
if tran_destination.sqlcode<>0 then
Messagebox("错误","数据库连接出错!"+string(tran_destination.sqlcode),question!,okcancel!)
end if
//楼主,你用新的对象 tran_destination,但连接时却配置了sqlca的信息,肯定不会成功啊
,是不是不小心写错了 ^&^
Top
4 楼am2000(【最后一滴水】)回复于 2003-11-02 10:05:43 得分 5
有可能!Top
5 楼treesoft(长沙水)回复于 2003-11-02 11:36:10 得分 5
在Messagebox再显示一个tran_destination.SQLerrText,便知道是什么原因了,因为这是RDBMS返回的信息!Top
6 楼yanghongfeng(枫中飘叶)回复于 2003-11-02 12:12:40 得分 5
同意jdsnhan(柳荫凉),就是你写错了。Top
7 楼bobor8(欧文)回复于 2003-11-02 15:56:07 得分 0
确实是不小心写错了,谢谢jdsnhan(柳荫凉),谢谢各位!Top




