请问如何用ADO添加/删除/更新一批数据？

Question

SET RS = NEW ADODB.RECORDSET
RS.CURSORTYPE=ADOPENKEYSET
RS.LOCKTYPE=ADLOCKOPTIMISTIC
RS.OPEN "TEST", CN, , , ADCMDTABLEFOR I=0 TO 10
  RS.ADDNEW
  RS!ID=I
  RS!COMMENTS="TEST ID " & CHR(I)
  RS.UPDATENEXT IRS.CLOSE

Answer 1

多谢回复我按照你的意见，每增加一条记录就UPDATE一条，可是还是得到了同样的出错信息。[Microsoft][ODBC SQL Server Driver][SQL Server]Violation of PRIMARY KEY constraint 'PK_Test'. Cannot insert duplicate key in object 'Res_Test'.我用的是WIN98+MDAC 2。6+VB6 WITH SP5 + SQL SERVER 7 

Answer 2

不對，你可以采用批次更新的方法來做。這樣可以減少网絡的負擔，還可以適時的采用Disconnect Recordset. 程式如下:  SET RS = NEW ADODB.RECORDSET
RS.CursorLocation=adUseClient   '采用Client端的Cursor.這樣可以使用 Disconnect Recordset Rs.Open "Test", Con, adOpenStatic, adLockBatchOptimistic   '采用批次鎖定FOR I=0 TO 10
  RS.ADDNEW
  RS!ID=I
  RS!COMMENTS="TEST ID " & CHR(I)
NEXT IRS.Updatebatch '注意，是批次更新
RS.CLOSE