请教一个数据排序的问题。

Question

请教一个数据排序的问题。
我用SQL语句读出所有的数据集，然后要在list中显示。Dim stru As String
Dim ru As New Adodb.Recordset
stru = "select * from url where title ='kk'"
Set ru = conn.Execute(stru)
Set DataList2.RowSource = ru
Dim i As Integer
For i = 1 To ru.RecordCount
DataList2.ListField = i
Next i
 
这样的写法老是报错，郁闷中，正确的写法有朋友知道吗？

Answer 1

看看這篇文章 http://support.microsoft.com/kb/216515/zh-cn 能不能幫助你

Answer 2

你不要用DataList 用List控件也可以完成
    myCon.ConnectionString = Me.Adodc1.ConnectionString
    myCon.Open
    Set myRs = myCon.Execute("Select au_id From authors")
    While Not myRs.EOF
        Me.List1.AddItem myRs!au_id
        myRs.MoveNext
    Wend