求助：代码为何出错，在线等！！

ysgm1978g · 发表于 2006-4-5 06:03:00

以下是引用andymark在2006-4-4 20:20:00的发言：

你那个I主要用来做什么的

你是当rst.Fields("编号").Value = rst1.Fields("编号").Value 时删除这条记录

还是别的意思

譬如加入《表1》中的aa字段，谢谢拉

andymark · 发表于 2006-4-5 06:28:00

你的代码有问题

最好把例子简化传上来

ysgm1978g · 发表于 2006-4-5 06:32:00

？？没问题呀，偶试过可以运行的拉，偶的意思是，先把表1的aa字段清空，在把代码算出的i值加入到表1的aa字段去，谢谢

andymark · 发表于 2006-4-5 06:53:00

清空字段

Dim Rs As New ADODB.Recordset
Rs.Open "select * from 表1", CurrentProject.Connection, adOpenDynamic, adLockOptimistic
Do While Not Rs.EOF
Rs.Fields("aa") = ""
Rs.MoveNext
Loop
Set Rs = Nothing

andymark · 发表于 2006-4-5 06:57:00

Rs.Fields("aa") =I

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[其它] 求助：代码为何出错，在线等！！

群介绍
主题无相 (随机显示版	同地区群块其他地区)