简单问题，高手举手之劳

Question

代码如下：
sql0 = "select 1 as projnum,[project number],[project name],[project credit],[project debit],[difference] from projectinfo"
rs0.Open sql0, db, 3, 3
Dim i As Integer
For i = 1 To rs0.RecordCount
    rs0.Update "projnum", CStr(i) --报错
Next i错误信息：
Multi-step operation generated errors, check each step state value

Answer 1

rs0.Open sql0, db, 3, 3
第一个3指adOpenStatic改为1 adopenkeyset
你的是静态的，怎么能更新记录呢？

Answer 2

改为：
rs0.Open sql0, db, 1, 3同样错误

Answer 3

我这样也不对：
For i = 1 To rs0.RecordCount
    rs0.Update "projnum", i --报错
Next i应该设为什么类型呢？

Answer 4

rs0.Update "projnum", CStr(i)
你这是什么update法啊，解释一下。
你看改成rs0!字段=?? 
        rs0l.update