pb连接sql数据库问题
string ls_inifile ="dsmis.ini"
sqlca.DBMS = ProfileString (ls_inifile, "database", "dbms", "")
sqlca.database = ProfileString (ls_inifile, "database", "database", "")
sqlca.logid = ProfileString (ls_inifile, "database", "logid", "")
sqlca.logpass = ProfileString (ls_inifile, "database", "LogPassWord","")
sqlca.servername=ProfileString(ls_inifile,"database", "servername", "")
sqlca.dbparm = ProfileString (ls_inifile, "database", "dbparm", "")
sqlca.userId = ProfileString (ls_inifile, "database", "userId", "")
sqlca.DBPass = ProfileString (ls_inifile, "database", "DBPass", "")
sqlca.Lock = ProfileString (ls_inifile, "database", "Lock", "")
sqlca.autocommit=false;
connect using sqlca;
if sqlca.sqlcode <>0 then
messagebox("数据库连接",sqlca.sqlerrtext)
return
else
open(mian)
end if
运行的时候提示DBMS mss is not supported in your current installation
各位帮我看看这是什么错误。