在DataReport中怎样将RptTextBox邦定到ADO中?

qhdzh 2003-08-22 10:42:59
我在程序中用如下代码进行连接,结果出现“参数类型不正确,或不在可接收的范围内,或与其它参数冲突”的错误。请问如何解决?

其中“dbStudent”是数库中的一个表,“Name”是表中一个字段

Private Sub Command1_Click()
Dim db As New ADODB.Connection
Dim rb As New ADODB.Recordset
db.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\ReportON\Cute.bak" & ";Persist Security Info=False;Jet OLEDB"
db.Open
Set rb.ActiveConnection = db
rb.Source = "select * from dbstudent"
rb.CursorLocation = adUseServer
rb.CursorType = adOpenForwardOnly
rb.LockType = adLockOptimistic
rb.Open
Set DataRep.DataSource = rb
DataRep.DataMember = "dbStudent"
With DataRep
.Sections(3).Controls("txtName").DataMember = "dbStudent"
.Sections(3).Controls("txtName").DataField = "name"
End With
DataRep.Show 1

End Sub
...全文
21 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
hc_z 2003-08-25
  • 打赏
  • 举报
回复
.Sections(3).Controls("txtName").DataMember = ""
或干脆不写
dary_zhou 2003-08-23
  • 打赏
  • 举报
回复
不能这样的话,就用一个数据库环境设计器,什么都解决了,且是可以带参数 的
dxqylzg 2003-08-23
  • 打赏
  • 举报
回复
同意楼上
summersong 2003-08-23
  • 打赏
  • 举报
回复


DataRep.DataMember = "dbStudent"



.Sections(3).Controls("txtName").DataMember = "dbStudent"

这两句去掉试试~
qhdzh 2003-08-23
  • 打赏
  • 举报
回复
没人回答吗?

809

社区成员

发帖
与我相关
我的任务
社区描述
VB 多媒体
社区管理员
  • 多媒体
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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