SQLCA.DBMS = "MSS"
SQLCA.Database = "user0000_蓬莱中医院"
SQLCA.userid="administrator"
SQLCA.dbpass=""
SQLCA.ServerName = "server"
SQLCA.LogId = "sa"
SQLCA.logpass=""
SQLCA.AutoCommit = False
SQLCA.DBParm = ""
//********************************************
connect using sqlca;
if sqlca.sqlcode<>0 then
messagebox("提示信息","数据库连接失败,请退出,再试!"+sqlca.sqlerrtext)
halt
else
connect;
open(w_zybr)
end if
报的错误是
DBMS mss is not supported in your current istallation