PB程序代码问题,请各位大师给我分析下这段代码是啥意思,解释的详细点!谢谢
sqlca.DBMS="ODBC"sqlca.dbparm="Connectstring='DSN=hsp;UID=hsp;PWD=neweastwillgnu;'"SQ...
sqlca.DBMS = "ODBC"
sqlca.dbparm = "Connectstring='DSN=hsp;UID=hsp;PWD=neweastwillgnu;'"
SQLCA.AutoCommit = False
Connect Using SQLCA;
If SQLCA.SQLCode<>0 then
MessageBox ("Cannot Connect to Database", sqlca.sqlerrtext)
return
end if
Open(w_upd)
我是初学者,不怎么会,勿喷!在线等回答! 展开
sqlca.dbparm = "Connectstring='DSN=hsp;UID=hsp;PWD=neweastwillgnu;'"
SQLCA.AutoCommit = False
Connect Using SQLCA;
If SQLCA.SQLCode<>0 then
MessageBox ("Cannot Connect to Database", sqlca.sqlerrtext)
return
end if
Open(w_upd)
我是初学者,不怎么会,勿喷!在线等回答! 展开
展开全部
sqlca.DBMS = "ODBC"
sqlca.dbparm = "Connectstring='DSN=hsp;UID=hsp;PWD=neweastwillgnu;'"
SQLCA.AutoCommit = False
前面部分是设置链接数据库参数
后面Connect Using SQLCA;开始链接数据库
如果链接不成功就弹出提示,并返回
If SQLCA.SQLCode<>0 then
MessageBox ("Cannot Connect to Database", sqlca.sqlerrtext)
return
end if
链接成功就打开窗口
Open(w_upd)
sqlca.dbparm = "Connectstring='DSN=hsp;UID=hsp;PWD=neweastwillgnu;'"
SQLCA.AutoCommit = False
前面部分是设置链接数据库参数
后面Connect Using SQLCA;开始链接数据库
如果链接不成功就弹出提示,并返回
If SQLCA.SQLCode<>0 then
MessageBox ("Cannot Connect to Database", sqlca.sqlerrtext)
return
end if
链接成功就打开窗口
Open(w_upd)
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询