[DBMS_PROFILES]
Profiles=jxc
[Profile jxc]
DBMS=MSS Microsoft SQL Server
Database=jxc
UserId=
DatabasePassword=
LogId=sa
LogPassword=08032813
ServerName=yy3
DBParm=
Lock=
Prompt=FALSE
AutoCommit=FALSE
;服务器参数



//从INI文件读取连接数据库的参数
SQLCA.DBMS = ProfileString(gs_Profile,"DataBase","SQLCA.DBMS","")
SQLCA.ServerName = ProfileString(gs_Profile,"DataBase","SQLCA.ServerName","")
SQLCA.DataBase = ProfileString(gs_Profile,"DataBase","SQLCA.DataBase","")
SQLCA.LogPass = ProfileString(gs_Profile,"DataBase","SQLCA.LogPassword","")
SQLCA.LogId = ProfileString(gs_Profile,"DataBase","SQLCA.LogId","")
SQLCA.AutoCommit = False
SQLCA.DBParm = ""
Connect using SQLCA; //连接数据库


运行不通过？请教一下