关于在Application中连接数据库的问题,急!在线等待

阳明腾越 2003-08-26 09:33:57
PB7.0开发,数据库是ACCESS
在Application中,连接数据库直接用文件连接数据库(就是不用在数据源中写任何东西),可是怎么都连接不上,请高手指教?
APPLICATION 中我是这样写的:
SQLCA.DBMS =ProfileString("XTEXAM.INI","Profile pb70","DBMS", " ")
SQLCA.Database =ProfileString("XTEXAM.INI","Profile pb70","DataBase", " ")
SQLCA.LogID =ProfileString("XTEXAM.INI","Profile pb70","LogID", " ")
SQLCA.LogPass =ProfileString("XTEXAM.INI","Profile pb70","LogPassword", " ")
SQLCA.ServerName =ProfileString("XTEXAM.INI","Profile pb70","ServerName", " ")
SQLCA.Lock =ProfileString("XTEXAM.INI","Profile pb70","Lock", " ")
SQLCA.UserID =ProfileString("XTEXAM.INI","Profile pb70","UserId", " ")
SQLCA.DBPass =ProfileString("XTEXAM.INI","Profile pb70","DatabasePassword", " ")
SQLCA.DbParm ="ConnectString='DSN=archives'"
Connect;
If sqlca.sqlcode < 0 Then
MessageBox ("错误: 不能连接到数据库!",sqlca.sqlerrtext, Exclamation!)
Return
End If
open(w_main)

其中XTEXAM.INI 文件是这样的内容:
[Profile pb70]
DBMS=ODBC
Database=
UserId=
DatabasePassword=
LogPassword=
ServerName=
LogId=
Lock=
DbParm=ConnectString='DSN=archives'
Prompt=0
AutoCommit=0
...全文
168 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
阳明腾越 2003-08-26
  • 打赏
  • 举报
回复
不能运行啊
gwly 2003-08-26
  • 打赏
  • 举报
回复
你把你的这段话COPY到Application上,能运行吗?
incats 2003-08-26
  • 打赏
  • 举报
回复
用ODBC.// Profile test
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='DSN=MyData;UID=dba;PWD=sql'"


愉快的登山者 2003-08-26
  • 打赏
  • 举报
回复
在ODBC管理中,检查DSN=archives的参数是否配置好。
愉快的登山者 2003-08-26
  • 打赏
  • 举报
回复
在ODBC管理中,检查DSN=archives的参数是否配置好。
gzg302 2003-08-26
  • 打赏
  • 举报
回复
那就用ODBC好了.何必这么麻烦.

740

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder 脚本语言
社区管理员
  • 脚本语言社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧