关于tdbGrid空间删除多行

[Jeremy.tian]

最近在使用tdbgrid和adodc控件显示数据。
需要一次删除多行。
①用tdbgrid的selbookmarks属性遍历读出行号，
再通过adodc.recordset!"列名"取出值
通过列的值来从数据库取出一行的数据，进行删除（delete的sql语句）

这样做觉得很不妥当，每删一行数据都要访问一次数据库

②后来发现有adodc.recordset.delete()方法，再加上adodc.recordset.update()方法。想先从recordset中删除数据，再更新数据库。可是运行程序提示：“adodc.recordset.delete()”错误。看了一下，再说不支持update操作。

请求帮助！

[Jeremy.tian]

For Each varBmk In TDBGrid1.SelBookmarks

Adodc1.RecordSet.Bookmark = varBmk
ssql = "SELECT ProductNo FROM TBLINANDOUTPUTTIMESETTING WHERE ProductNo='" & Adodc1.RecordSet!ProductNo.Value & "' "
Set rsTemp = ExecuteSQLCommand(ssql)
If Not rsTemp.EOF Then
rsTemp.Close
Exit For
Else
ssql = "Insert Into TBLINANDOUTPUTTIMESETTING (ProductNo,TIMEDVALUE," & _
"SETTINGUSER ,SETTINGTIME,CUSTOMERENGSNAME,OPNO) Values ('" & Adodc1.RecordSet!ProductNo.Value & _
"','" & Trim(cmdTimeDValue.Text) & "','" & gUserInfo.CurUserName & _
"','" & Trim(FormatDateTime(Now())) & "' , '" & Adodc1.RecordSet!CUSTOMERENGSNAME.Value & "' , '" & Adodc1.RecordSet!OpNo.Value & "' )"

gSystemInfo.cnnWIP.Execute ssql
End If