Office中国论坛/Access中国论坛

标题: 不使用数据绑定，如何显示数据？ [打印本页]

作者: renzhm 时间: 2003-4-30 19:23
标题: 不使用数据绑定，如何显示数据？
我用向导生成了数据表，但我不想使用数据绑定，我想使用带有条件的sql语句
实现，请问如何实现？我的部分源代码：

Private Sub Form_Load()
  On Error GoTo Except
  Dim ConnStr As String
  ConnStr = "File Name=" & CurrentProject.Path & "\ast.udl;"
  Dim Conn As ADODB.Connection
  Set Conn = New ADODB.Connection
  Conn.Open ConnStr

  Dim Recordset As ADODB.Recordset
  Set Recordset = New ADODB.Recordset
  Recordset.Open "select * from Employe", Conn

'以下的写法会出错，不知道怎么写！
' Set Me.Recordset = Recordset
' Set ID.Requery = Recordset.Fields("ID")
' Set Name.Requery = Recordset.Fields("Name")
  Exit Sub
Except:
  MsgBox "error"
End Sub

作者: sunredday 时间: 2003-4-30 19:44
Dim Recordset As ADODB.Recordset
是否应该改为
dim rec as adodb.recordset
recordset应该是保留字
Set Me.Recordset = Rec
只是猜测喽

作者: renzhm 时间: 2003-4-30 19:57
谢谢提醒，如何给窗体赋记录源，以及给文本框赋控件来源！

我是从Delphi转学ADP+MSSQL，有些模式老是想着Delphi的实现模式

作者: renzhm 时间: 2003-4-30 21:55
在属性面板上，可以设定窗体的记录源为select * from Employe，为什么
在语句中不行？

set me.recordsource ="select * from Employe" 为什么不行？

在有，能在属性板上设定文本框的控件源，为什么用语句不行？

高手啊，请帮忙，斑竹啊，请关注！

作者: renzhm 时间: 2003-4-30 22:50
唉！还是自己调试通了：

me.recordsource ="select ID,Name from Employe" '不能用set 不知道为什么

ID.ControlSource="ID"
NameLst.ControlSource="Name" 'Name 是关键字吗，我用它命名文本框不行

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)