numid = numid.Text        '編號值
Adodc1.Recordset.MoveFirst
While Not Adodc1.Recordset.EOF
If Adodc1.Recordset("編號") = numid Then
.
..
Adodc1.Recordset.Update
Adodc1.Refresh
End If
Adodc1.Recordset.MoveNext
Wend
出現錯誤碼:找不到要更新的資料列.最後讀取值已被變更
我有點不懂程式哪裡錯誤
arrow
arrow
    全站熱搜

    vbqa 發表在 痞客邦 留言(1) 人氣()