如何循环取出一个表某个字段

[zpc198600]

就是想从表1中取字段1,然后根据字段1,执行某些更新,再取字段1的第二个值,再执行语句,就这样循环,直到把这个字段1全部循环完

求完全的ACCESS,没有借用第三方编程工具,界面是ACCESS写的

[zpc198600]

求解决

[ACMAIN_CHM]

你需要使用ADO来通过VBA操作。 可以先通过一下ADO手册中的例子

rs.open "select * from table1 where id<10" , conn,2,3
do while not rs.eof
debug.print rs.fields(0).value
loop

[WWWWA]

可以用ADO的OPENSCHEMA、ADOX、DAO来实现

[zpc198600]

[Quote=引用 1 楼 的回复:]
你需要使用ADO来通过VBA操作。 可以先通过一下ADO手册中的例子

rs.open "select * from table1 where id<10" , conn,2,3
do while not rs.eof
debug.print rs.fields(0).value
loop
[/Quote]
本人新手,能说细一点吗比如我想达到以下效果
rs.open "select 字段2 from table1 " , conn,2,3
do while not rs.eof
update 表2 set 字段1='aa' where 字段2=tabel1.字段2
loop

[zpc198600]

Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.Open "select * from 表三", conn, 2, 3
Do While Not Rs.EOF
DoCmd.RunSQL ("insert into 单子 (单号)values('" & 表三.单号 & "')")//执行句
Loop
Rs.Close

当然我中间不是只执行这一句,好几句,还有根据表三单号的判断,根据不同的判断结果来执行不同的SQL语句,麻烦给解决下好吧