组合框读取数据？？

Question

物料类别表中有IDNO、IDNAME字段，怎样把类别表中的数据读到下拉组合框中，中是放在SQL服务器上，用ADODB
在此先谢谢各位了，最好能给个例子

Answer 1

    Set rst = Cnn.Execute("select * from 物料类别表 order by IDNO")
    Do While Not rst.EOF
       Combo1.AddItem rst("IDNAME")
       Combo1.ItemData(Combo1.NewIndex) = rst("IDNO")
       rst.MoveNext
    Loop
    rst.Close
    Set rst = nothing

Answer 2

LZ，1楼不是给出你例子了吗，用ADO对象的。用ADODC控件的例子    '连接字符串可以在属性里面直接选
    Me.Adodc1.ConnectionString = " Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial   Catalog=数据库名;Data Source=服务器名"           
    Adodc1.RecordSource = "select * from 物料类别表 order by IDNO"
    Adodc1.Refresh
    
    Combo1.Text = ""
    Dim i As Long
    For i = 0 To Adodc1.Recordset.RecordCount - 1
        Combo1.AddItem Adodc1.Recordset.Fields(0), i
        Adodc1.Recordset.MoveNext
    Next i