[求助]：怎样编写将表另存为的VBA？

kylhl

  我想建一个人事工资管理系统，但存在一个问题无法解决，恳请各位高手给予指点。
  问题：如果当月的实发工资与上月相同，打开窗体后点击相应的控件按钮即可将上月日期改变当前月日期，并另存为新表，以备查询。怎样编写VBA。
  谢谢。

[此贴子已经被作者于2004-2-12 17:50:09编辑过]

zhengjialon

最简单的是用：docmd.openquery "INSERT INTO tablename ( 日期, 姓名 )
SELECT #" & date() & "# , '" & "zjl" & "' ;"

kylhl

谢谢zjl版主。我还是不明白，能不能再详细点？衷心感谢！！！！！！

zhengjialon

最简单的是用：docmd.runsql "INSERT INTO tablename ( 日期, 姓名 )
SELECT #" & date() & "# , '" & "zjl" & "' ;"


上次是应该运行RUNSQL命令才对，就是运行一个SQL语句，后面的是就是一个SQL语句，它的作用是在表tablename中插入一个新记录，日期的值是当前日期，姓名是ZJL，当然你可以自定如果想加入其它值也可以的。

kylhl

谢谢版主。