各位大侠,请关注一下VB中调用存储过程中所形成的记录集无法在控件中显示,谢谢

Question

CN.ConnectionString = "Provider=sqloledb;Data Source=SYSTEM;Initial Catalog=tagj_mis;User Id=sa;Password=1;"
    CN.Open    rs.CursorLocation = adUseClient
    rs.CursorType = adOpenDynamic
    rs.LockType = adLockOptimistic
    Set rs = CN.Execute("EXEC GETLINE_INFO")
        Set TDBCombo1.RowSource = rs
     
     TDBCombo1.ReBind
    TDBCombo1.Refresh
为何结果不显示,我发现如果RS的记录集类型不是存储过程,而是SELECT *FROM LINE_INFO就可以,WHY,请帮帮忙
是不是存储过程的记录集的类型不同

Answer 1

能在控件中显示我的测试    Dim CN   As New ADODB.Connection                '定义数据库的连接
    Dim Rs   As New ADODB.Recordset
    CN.ConnectionString = "Provider=sqloledb;Data Source=abrams;Initial Catalog=salestesttmp;User Id=sa;Password=test;"
    CN.Open    Rs.CursorLocation = adUseClient
    Rs.CursorType = adOpenDynamic
    Rs.LockType = adLockOptimistic
    Set Rs = CN.Execute("EXEC spGetTreeVar 1")
     
    Set DBCombo1.DataSource = Rs
    DBCombo1.DataField = Rs.Fields(0).Name
    DBCombo1.ReFill

Answer 2

http://expert.csdn.net/Expert/topic/2138/2138909.xml?temp=.8498499

Answer 3

http://expert.csdn.net/Expert/topic/2138/2138909.xml?temp=.8498499