// Profile local
SQLCA.DBMS = "SYC Sybase System 10/11"
SQLCA.Database = "localdb"
SQLCA.LogPass = "******"
SQLCA.ServerName = "local_server"
SQLCA.LogId = "sa"
SQLCA.AutoCommit = False
SQLCA.DBParm = ""
connect using sqlca;
if sqlca.sqlcode<>0 then
messagebox('','')
halt
else
open(w_main)
return
end if
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024