datarepeater控件的DataSouce属性一定要设置成Adodc1吗？

Question

请问：datarepeater控件的DataSouce属性一定要设置成Adodc1吗，我想将DataSouce属性设置成Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
SQLtxt = "Select * from pub_info"
rs=Connect(SQLtxt)set DataRepeater1.DataSouce = rs
但是得不到显示的数据如果增加控件Adodc1,设置好连接后
set DataRepeater1.DataSouce = Adodc1
就可以显示数据为什么？而且我用前面的
SQLtxt = "Select * from pub_info"
rs=Connect(SQLtxt)方式可以将数据读到text这类的控件里

Answer 1

set DataRepeater1.DataSouce = Adodc1.recordset

Answer 2

rs.Open Trim(sql), cn, adOpenKeyset, adLockOptimisticset DataRepeater1.DataSouce = rs

Answer 3

rs.Open Trim(sql), cn, adOpenKeyset, adLockOptimistic
set DataRepeater1.DataSouce = rs

Answer 4

是不是那里的连接有问题?Set db = New ADODB.Connection
  db.CursorLocation = adUseClient
  db.Open "Provider=MSDASQL.1;Persist Security Info=False;Data Source=newdb;uid=shenghuo;pwd=shenghuo"  Set rs = New ADODB.Recordset
  strsql = "select * from table"
  rs.Open strsql, db, adOpenDymanic, adLockBatchOptimistic
  set DataRepeater1.DataSouce =rs

Answer 5

你没有连接
Dim con As adodb.Connection
Dim rs As adodb.RecordsetPrivate Sub Form_Load()
Set rs = New adodb.Connection
Set con = New adodb.Recordset[[con.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=True；Initial Catalog=mrmt;Data Source=N091"
con.CursorLocation = adUseClient
con.Open]]rs.Open "select name from yuangong where bianhao ='" & Text1.Text & "'", con, adOpenKeyset, adLockOptimisticSet Datagrid.dataSource = rs
End Sub注意括号里面的代码， ""里面的代码可以不用写， 你加一个ado控件上去连接上数据库然后把那段代码copy下来

Answer 6

谢谢大家的帮忙，找到问题了在连接的模板里面，我没有指定con.CursorLocation  =  adUseClient  所以。。谢谢大家的热心帮助