請問PB10.5與SQL SERVER 2000的連接問題
請問各位兄弟姐妹,小弟有個很急的問題:
小弟需要用pb10.5鏈接sql server 2k,.ini文件和PB的連接文件都寫好了,但是就是連不上,請各位幫小弟看看。
ini文件:
[Application]
AppName=【××××公司ERP系統】
DatabaseName=locke
IdleTime=180
UserID=admin
[locke]
DBMS=MSS Microsoft SQL Server 6.x
Database=erp
UserId=
DatabasePassword=
LogPassword=
ServerName=erp2
LogId=sa
Lock=
DbParm=
Prompt=0
AutoCommit=0
[tool]
chbit=2
back=0
[dw_material_g]
WhereClause1=,inv_material.material_type,like,M,and
[MSS Microsoft SQL Server 6.x]
1438=
…………
PB鏈接文件:
SQLCA.DBMS =ProfileString(sIniFile,as_section,"DBMS", "")
SQLCA.Database =ProfileString(sIniFile,as_section,"Database", "")
SQLCA.LogID =ProfileString(sIniFile,as_section,"LogID", "")
SQLCA.LogPass =ProfileString(sIniFile,as_section,"LogPassword", "")
SQLCA.ServerName =ProfileString(sIniFile,as_section,"ServerName", "")
SQLCA.UserID =ProfileString(sIniFile,as_section,"UserID", "")
SQLCA.DBPass =ProfileString(sIniFile,as_section,"DatabasePassword", "")
SQLCA.Lock =ProfileString(sIniFile,as_section,"Lock", "")
SQLCA.DbParm =ProfileString(sIniFile,as_section,"DbParm", "")
SQLCA.LogPass = ""
connect using sqlca ;
if sqlca.sqlcode <> 0 then
messagebox(string(sqlca.sqlcode),sqlca.sqlerrtext)
MessageBox(sAppName,"連接數據庫出錯, 請檢查配置文件: " + sIniFile)
Halt Close ;
end if