各位斑竹 大侠,我很辛苦,帮下忙吧,感恩不敬!!!!

lyz

我自己每十天都要同时运行差不多上千个查询语句,可是我对数据库不太熟悉.只能在"ctrl+g"立即窗口中运行,而且这个窗口每次只能放入100多个查询语句,有时我有几千个语句,经常得慢慢分割几十个文件,逐个放进立即窗口.

   放进立即窗口后,我又不太熟悉语句,我写的语句,又要在立即窗口中,不停的按回车键.

   几千个语句,分段放入立即窗口,又要不停的按回车键,太辛苦了,各位朋友,帮下忙吧.

    前段时间,有热心人,指点了一下,可是,我不太熟悉数据库,不明白,能否说明白点,最好能发个样板数据库. 感恩不敬!!!!  感恩不敬!!!!

   我的语句(几千个基本上都是一样的)是:
DoCmd.RunSQL "UPDATE [表1] SET [表1].简日期 = 'AAA' WHERE ((([表1].输入内容) Like '*A*'))"  
DoCmd.RunSQL "UPDATE [表1] SET [表1].简日期 = 'BBB' WHERE ((([表1].输入内容) Like '*B*'))"  
- - - - - - - -

                                   lyz 77552186@163.com
[em26][em26][em26]

哈瘌子

应该帮你，可我不会。来人哟

lyz

希望有人,能快点彻底帮我解决,让我很明白.
现在我正在用这个笨办法,在数据库里生成语句,几千个语句容易搞,可是想到执行语句,实在花时间,实在可怕.
企盼大侠快点出现

WTM1

做成按钮！不就可以了！

lyz

按钮??我目前只懂在窗体设计视图中,应有"命令按钮",可是这些查询语句如何放进按钮中??
吴版主,帮下忙,讲明白些

李寻欢

在窗体上放置一下按钮，当有向导出现时按取消。然后选中该按钮单击右键，出现一个弹出菜单后选"事件生成器"，然后会弹出一个对话框，再选“代码生成器”，然后就把你的代码粘贴进去吧。

lyz

这位侠客,您好
我已找见“代码生成器”，可是有很多英文,不知从那个英文下,贴进我的代码??
Option Compare Database
Private Sub Command6_Click()

End Sub
Private Sub Command7_Click()
On Error GoTo Err_Command7_Click

    Screen.PreviousControl.SetFocus
    DoCmd.FindNext

Exit_Command7_Click:
    Exit Sub

Err_Command7_Click:
    MsgBox Err.Description
    Resume Exit_Command7_Click
   
End Sub

李寻欢

在这两句之间吧：
Private Sub Command6_Click()

End Sub

lyz

基本成功了,真不知如何报答您

lyz

我又试了一下,解决了我不停的按回车键问题.
  但是,我的代码太大,只能分割几部分,否则会出现"过程太大".能否不用分割,解决"过程太大"???