怎样实现批量更新access原始表中的数据

roych · 发表于 2011-3-10 22:48

没看到什么窗体和指定的查询

happypie2008 · 发表于 2011-3-11 08:17

原帖由 roych 于 2011-3-10 22:48 发表
没看到什么窗体和指定的查询

Sorry,附加已更新。

happypie2008 · 发表于 2011-3-12 19:03

亲们，谁能帮忙解决上面的问题？查询语句里面的表名，或字段名引用窗体里的输入参数。
实际工作需要，谢谢了！

roych · 发表于 2011-3-13 00:58

Hoho,不知道是不是想要这样的效果，根据所选表名称生成查询，并确定报表的数据源？

Sample2.zip (23.17 KB, 下载次数: 21)

[ 本帖最后由 roych 于 2011-3-13 01:13 编辑 ]

happypie2008 · 发表于 2011-3-14 10:14

原帖由 roych 于 2011-3-13 00:58 发表
Hoho,不知道是不是想要这样的效果，根据所选表名称生成查询，并确定报表的数据源？
887329

向Roych学习，我先download下来学学!多谢！

happypie2008 · 发表于 2011-3-15 11:00

Roych,对这个工具我还有两个问题，希望你能帮忙解决：
1.在生成查询语句中，删除Dao_查询的情况只有“Dao_查询”存在才会执行，否则会产生错误，能不能帮忙加个判断语句？怎么写〉
2.更新拉动卡日期，是否也能根据所选择的项目进行更新？

roych · 发表于 2011-3-15 17:51

在删除查询语句前面加一句：
On Error Resume Next
即：
On Error Resume Next
db.QueryDefs.Delete "DAO_查询"
……………………以下省略。
表示跳过错误提示执行下一句。

当时看了你的报表，以为你只是需要随时更新报表的数据源，因此这里只是做选择查询。
如果需要做更新查询，同样可以类似地处理，只是重新修改SQL执行语句罢了；但是，需要提醒的是，更新查询属于动作查询，是不能应用到报表当中的。
其实，你之前的附件中已经有了更新查询，所以我也没打算再做。

[ 本帖最后由 roych 于 2011-3-15 18:01 编辑 ]

happypie2008 · 发表于 2011-3-15 19:45

原帖由 roych 于 2011-3-15 17:51 发表
在删除查询语句前面加一句：
On Error Resume Next
即：
On Error Resume Next
db.QueryDefs.Delete "DAO_查询"
……………………以下省略。
表示跳过错误提示执行下一句。

当时看了你的报表，以为你只是需 ...

谢谢Roych,我试了下加上On Error Resume Next,生成不了Dao_查询。不过我用了另外一种方法：加了另外一个按钮，把语句db.QueryDefs.Delete "DAO_查询"
删除，在没有"Dao_查询“的情况下直接生成。

roych · 发表于 2011-3-15 21:40

不能这样整的。。否则你下次需要生成新的查询时，例如第一次你生成了Car的查询，第二次想换成T300的就不行了。我还是传上附件吧：

Sample2.zip (37.93 KB, 下载次数: 16)

happypie2008 · 发表于 2011-3-15 22:38

原帖由 roych 于 2011-3-15 21:40 发表
不能这样整的。。否则你下次需要生成新的查询时，例如第一次你生成了Car的查询，第二次想换成T300的就不行了。我还是传上附件吧：
888866

Roych谢谢你不厌其烦的指导。我又运行了一下你的程序是没有问题的。另外针对根据所选择的项目更新数据表的日期，我编了以下程序，但总出现运行错误，能再帮忙看看吗？见附件。
Private Sub Command2_Click()
With CurrentDb
Dim ss As String
  If Not IsNull(Me.输入项目 Then
ss = "UPDATE" & Me.输入项目 & "AS A INNER JOIN 仓库地址 AS B ON A.[New P/N] = B.[WH P/N] " _
            & "SET A.[Card Revision] = B.[WH Card Revision]"
.Execute (ss)
  Else
Exit Sub
  End If
End With
End Sub

		自动登录	找回密码
密码			免费注册

[求助] 怎样实现批量更新access原始表中的数据