我有一个包含3列的Microsoft Access 2010表。
第一列包含数字顺序主键ID 第二个包含站点名称。 第3个包含每个站点的是/否。
我想循环第二列,为第2列中的每个字段执行操作,其中第3列中的条目为“是”'。
我试图使用的代码对我来说不是
Set rs = db.OpenRecordset("table1")
Set rs2 = rs.Fields("Column2")
set rs3 = rs.fields("Column3")
For each fld in rs2
If rs3.fields = "Yes" then
"行动代码将遵循此处等等"
Next fld
End if
Loop
代码似乎并不喜欢"对于rs2中的每个fld"
我将不胜感激任何帮助
非常感谢
答案 0 :(得分:3)
第一个记录集已包含所有字段。
Set rs = db.OpenRecordset("table1")
Do While Not rs.EOF
' Alternatively: rs("Column3")
If rs!Column3 = "Yes" Then
' stuff
End If
' Next record
rs.MoveNext
Loop
但是:在Recordset循环中你想要做的事情很可能在使用UPDATE查询的SQL中更容易和更高效。