我使用asa 8 数据库,使用如下语句连接数据库
//ODBC
自定义的 itran_source
//数据源
itran_source =Create transaction
itran_source.dbms='odbc'
itran_source.dbparm="Connectstring='DSN=aaa';uid=dba;pwd=sql"
itran_source.AutoCommit = False
CONNECT USING itran_source;
If itran_source.sqlcode < 0 Then
MessageBox("错误","我自己的消息。 ")
return
Else
end if
我的意思是若数据库连接失败,就弹出我定义的消息,但是程序在执行connect using itran_source;后如果连接数据库失败,会弹出ODBC连接失败的消息框,取消后才弹出我的 自定义消息 。有没有办法取消掉ODBC连接失败的消息框? (在他弹出之前我来处理)
望高手指点
------解决方案--------------------
用<>0试试,似乎没有更好的办法。
------解决方案--------------------
试试:
SQLCA.dbParm = "ConnectOption ='SQL_DRIVER_CONNECT,SQL_DRIVER_NOPROMPT;'"....