請問PB10.5與SQL SERVER 2000的連接問題

2007-12-08 12:52:56 265 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

PB9升级到pb115实战经验总结 pb9.0升级到pb11.5下面是本人在升级过程中的一些体会，希望对大家有用: pb11.5已经不再提供mss microsoft SQLSERVER数据库接口,取而代之的是SNC SQL Native Client接口和ole mimcrosoft oledb接口,因SNC 需要安装专门的客户端比较麻烦,因此本人采用的是ole db数据接口连接到SQL 阅读详情

請問各位兄弟姐妹，小弟有個很急的問題：
小弟需要用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

...全文