簡體   English   中英

ASP.NET ADODB RecordSet循環

[英]ASP.NET ADODB RecordSet looping

因此,我試圖遍歷ADODB記錄集的每一行,只是recordset.movenext()停止一半,出現錯誤EOF。通過此錯誤后,我的表有95520行,並且Numverif保留值:47760,因此僅進行一半迭代

Dim con As ADODB.Connection = New ADODB.Connection
Dim RecSet As New ADODB.Recordset
Dim numverif As Integer = 0
con.Open("Provider=SQLNCLI10;Server=xxxx.xx.xx.xxxx;Database=nameOfDB;Uid=user;Pwd=pass")
RecSet.Open("select * from table1", con, CursorTypeEnum.adOpenStatic, 1)
count.Text = RecSet.GetString(StringFormatEnum.adClipString, 10, " _ ", Environment.NewLine, "null")

Do While Not RecSet.EOF
    Dim IdontCareAboutThisVariable As String = RecSet.GetString(StringFormatEnum.adClipString, 1, "`", , "NULL")
    numverif= numverif + 1
    'The next line throws the error
    RecSet.MoveNext()
Loop
con.Close()
count.Text = numverif.ToString

對不起,英語不好。

現在可以正常工作:

Dim con As ADODB.Connection = New ADODB.Connection
    Dim RecSet As New ADODB.Recordset
    Dim numverif As Integer = 0
    con.Open("Provider=SQLNCLI10;Server=xxxx.xx.xx.xxxx;Database=nameOfDB;Uid=user;Pwd=pass")
    RecSet.Open("select * from table1", con, CursorTypeEnum.adOpenStatic, 1)
    count.Text = RecSet.GetString(StringFormatEnum.adClipString, 10, " _ ", Environment.NewLine, "null")

    Do While Not RecSet.EOF
        Dim IdontCareAboutThisVariable As String = RecSet.GetString(StringFormatEnum.adClipString, 1, "`", , "NULL")
        numverif= numverif + 1
    Loop
    con.Close()
    count.Text = numverif.ToString

暫無
暫無

聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.

 
粵ICP備18138465號  © 2020-2024 STACKOOM.COM