数据窗口怎样和sql2000相连（在线等待）

[billyang790615]

数据窗口怎样和sql2000相连

[cyactiveboy]

SQLCA.dbms = "MSS Microsoft SQL Server 6.x"
SQLCA.LogPass = "****"//数据库密码
SQLCA.ServerName = ""//数据库服务嚣
SQLCA.LogId = ""//数据库
SQLCA.AutoCommit = false
CONNECT USING SQLCA;

[flyerlxg]

首先在应用中连接数据库，
SQLCA.DBMS = "MSS Microsoft SQL Server 6.x"
SQLCA.Database = "driverinfo" //数据库的名称
SQLCA.LogPass = '123' //登录数据库的密码
SQLCA.ServerName = "Ntserver" //数据库服务器的名称
SQLCA.LogId = "sa" //登录数据库时的用户
SQLCA.AutoCommit = False //是否自动提交事物
SQLCA.DBParm = ""
connect; //连接数据库的命令，注意后面的分号不能省略
if sqlca.sqlcode<>0 then
messagebox('数据库连接错误',sqlca.sqlerrtext)
halt close
else
open(w_main)
end if

其次再建立数据窗口对象，然后在数据窗口中指明Dataobject为刚才建立的数据窗口对象，最后在w_main窗口的打开事件中写入脚本：
dw_1.settransobject(sqlca) //默入事务为sqlca
dw_1.retrieve() //提交数据到数据窗口中
到这里，应该可以操作数据窗口中的数据，然后在保存到数据库中即可

[billyang790615]

flyerlxg(飞鸟)
你好，谢谢你的答复。我是刚学pb有很多地方不是很懂，还请你多多帮忙。
但我现在的数据窗口中没有任何表显示出来，你能告诉我吗？非常感谢

[liaolwj]

你配置了你的database profile吗？

[大雄之家]

首先在应用中连接数据库，
SQLCA.DBMS = "MSS Microsoft SQL Server 2000"
SQLCA.Database = "driverinfo" //数据库的名称
SQLCA.LogPass = '123' //登录数据库的密码
SQLCA.ServerName = "Ntserver" //数据库服务器的名称
SQLCA.LogId = "sa" //登录数据库时的用户
SQLCA.AutoCommit = False //是否自动提交事物
SQLCA.DBParm = ""
connect; //连接数据库的命令，注意后面的分号不能省略
if sqlca.sqlcode<>0 then
messagebox('数据库连接错误',sqlca.sqlerrtext)
halt close
else
open(w_main)
end if

其次再建立数据窗口对象，然后在数据窗口中指明Dataobject为刚才建立的数据窗口对象，最后在w_main窗口的打开事件中写入脚本：
dw_1.settransobject(sqlca) //默入事务为sqlca
dw_1.retrieve() //提交数据到数据窗口中
到这里，应该可以操作数据窗口中的数据，然后在保存到数据库中.

你还需要配置你的database profile