您所在位置：主题：pb初学者请求帮忙
nklnkl
[专家分：0] 发布于 2009-11-22 16:43:00
我在用普遍进行编程的时候，已经连接数数据库
// Profile skgl
SQLCA.DBMS = "MSS Microsoft SQL Server"
SQLCA.Database = "skgl"
SQLCA.LogPass = "88888888"
SQLCA.ServerName = "127.0.0.1"
SQLCA.LogId = "sa"
SQLCA.AutoCommit = False
SQLCA.DBParm = "Language='326'"
//连接数据库
Connect Using SQLCA;
If SQLCA.SQLCODE <> 0 THEN
messagebox("数据库连接出错",SQLCA.SQLerrtext)
return
else
open(w_login)
end if
当我用下面语句的时候就提示错误canout compile without valid database signon
datetime dt_now
select getdate() into :dt_now
from login_customer;
求高手帮忙
// Profile skgl
SQLCA.DBMS = "MSS Microsoft SQL Server"
SQLCA.Database = "skgl"
SQLCA.LogPass = "88888888"
SQLCA.ServerName = "127.0.0.1"
SQLCA.LogId = "sa"
SQLCA.AutoCommit = False
SQLCA.DBParm = "Language='326'"
//连接数据库
Connect Using SQLCA;
If SQLCA.SQLCODE <> 0 THEN
messagebox("数据库连接出错",SQLCA.SQLerrtext)
return
else
open(w_login)
end if
当我用下面语句的时候就提示错误canout compile without valid database signon
datetime dt_now
select getdate() into :dt_now
from login_customer;
求高手帮忙