将任务管理器设置为运行VB脚本

时间:2012-12-10 15:34:51

标签: vba vbscript access-vba taskmanager

我让任务管理器调用一个VB脚本,该脚本每天在特定时间打开一个访问文档,当这个文档打开时,它设置了VBA代码以将文件导出为不同的文件类型。我收到一个错误,不允许在任务管理器中运行。我真的很困惑,因为这应该是一个非常简单的任务,它实际上是创建一个新的访问程序打开文档,然后退出访问。我知道访问文件中的VBA代码是正确的,因为它在打开文件时工作正常。任务管理器很简单所以我知道它必须与我的VB脚本不正确(格式化可能?),因为我双击它运行我得到一个运行错误。我只是设置任务管理器打开访问文件,但它不会退出访问,所以我们这样做。下面是我脚本中的代码。

 dim accessApp as variant
 set accessApp = createObject("Access.Application")
 accessApp.OpenCurrentDataBase("File Location")
 accessApp.Quit
 set accessApp = nothing

我已经在网上进行了一些搜索,运气不佳。非常感谢任何帮助。

1 个答案:

答案 0 :(得分:1)

您不能在Dim语句中使用VBScript:

 dim accessApp
 set accessApp = createObject("Access.Application")
 accessApp.OpenCurrentDataBase("z:\docs\test.accdb")
 ''For testing purposes, comment out when testing is finished
 msgbox accessapp.name
 accessApp.Quit
 set accessApp = nothing