hur.cn - 华软网

 热门搜索

pb与sql的连接

  作者:未知    来源:网络    更新时间:2017/12/5
我的sql与pb能连接上,但是在窗口种用的时候就不行了,为什么那?高手们请帮忙指道。
  事务连接代码
  // Profile yp
SQLCA.DBMS = "MSS Microsoft SQL Server"
SQLCA.Database = "yp"
SQLCA.LogPass = "********"
SQLCA.ServerName = "192.168.0.25"
SQLCA.LogId = "users"
SQLCA.AutoCommit = False
SQLCA.DBParm = ""
open(w_main)   
   登陆控件代码:
string username
string password
username=trim(sle_1.text)
select pwd into :password from manager where uid=:username;
if sqlca.sqlcode=0 and password=trim(sle_2.text) then
close(w_login)
else
messagebox("warn!","invalid username or password! again!")
   sle_1.text=""
sle_2.text=""
sle_1.setfocus()
return
end if

系统是xp家庭版

------华软网友回答------
SQLCA.DBMS = "MSS Microsoft SQL Server"
SQLCA.Database = "yp"
SQLCA.LogPass = "********"
SQLCA.ServerName = "192.168.0.25"
SQLCA.LogId = "users"
SQLCA.AutoCommit = False
SQLCA.DBParm = ""
在application对象的open事件中写上你的这些连接数据库代码后,一定要在后边加上
connnect using SQLCA;
这样才可以正常使用SQLCA,事务处理对象。
------华软网友回复------
并且要在connect using SQLCA;后判断是否连接正常:
如:
if sqlca.sqlcode <> 0 then
    messagebox('错误:','连接数据库失败!')
   return
end if
之后在open(w_main)  .
------华软网友回复------
SQLCA.DBMS = "MSS Microsoft SQL Server"
SQLCA.Database = "yp"
SQLCA.LogPass = "********"
SQLCA.ServerName = "192.168.0.25"
SQLCA.LogId = "users"
SQLCA.AutoCommit = False
SQLCA.DBParm = ""
是写在application对象的open事件里.
在窗口的open事件里,第一句就要写
connect using SQLCA;
要是有数据窗口,还要写dw_XXX.settransobject(sqlca)
------华软网友回复------
谢谢各位大虾,我试试再说了      
华软声明:本内容来自网络,如有侵犯您版权请来信指出,本站立即删除。