pb9不支持sql2000以上版本的数据库直连。因此要连接2000以上的版本必须用odbc。
windows下的odbc管理器打开方式:窗体键+R 调出运行对话框 输入 odbcad32 确定弹出odbc管理器如图:
这里选择用户dsn和系统dsn都可以,点击添加:如图:
选择SQL server Native Client 这一项,如果在你的选项中没有,就要用SQLserver的安装光盘进行安装数据源了。
在2005中运行安装程序:选择安装——连接工具——sql native 10 。
在2008中进行全新安装走到功能选择的步骤时看是否有相关选项未选。不能选添加功能只能走全新安装。(方法未经验证)。
点击完成如图:
点击“ 两个 ”下一步如图:
第一项选中后选择需要的数据库,下一步而后完成。完成后还会弹出一个对话框可以测试连接是否成功。
创建完odbc数据源后,打开pb9,在面板中选择DB profile如图:
弹出对话框,在ODB ODBC选项上右键选择new profile如图,在datasource的下拉列表中我们将看到之前创建的odbc数据源:
userid 和 password可以不填去掉前面的对号。
Driver-Specific paramaters:可以随意填写。Apply 后 点击上面的 preview标签如图:
复制窗口中的内容复制到需要连接数据库的地方,就是在application的Open事件中。注意,如果是自己写sqlca,如果你自己写的sqlca的各个属性与该窗体中的内容不同的话,会出现两种情况。
如果SQLCA.DBMS='ODBC'这句是对的,而其他的不对,则每次连接数据库都会弹出一个 数据源选择对话框。
如果SQLCA.DBMS=“*****” 如果****中的内容没有填写ODBC则会连接数据库失败。
代码如下:
// Profile pbconn2008
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='DSN=pbconn2008;UID=;PWD='"
CONNECT;
if SQLCA.sqlcode<>0 then
messagebox("提示","数据库连接失败!")
else
open(w_login)
end if