从任务计划程序启动Excel工作，现在失败
我已经运行了我的Excel 2000的VBA程序与任务计划和CScript和VBScript大约一年了。 几天前它停止工作。 我可以手动运行程序。 每当任务计划程序启动时，黑色窗口显示大约1-2秒，然后closures。
我试过评论error handling，但我总是得到相同的结果。 我试着显示MsgBoxes但结果仍然是一样的。
我在你的论坛上发现了一个更简单的方法，我尝试了同样的结果。
那么我需要做些什么来debugging呢？
这里是我从这个论坛尝试的代码：
Option Explicit Dim xlApp, xlBook Set xlApp = CreateObject("Excel.Application") '~~> Change Path here Set xlBook = xlApp.Workbooks.Open("C:\My Documents\___Stocksfilter.xls", 0, True) xlApp.Run "A_Pick" xlBook.Close xlApp.Quit Set xlBook = Nothing Set xlApp = Nothing WScript.Echo "Finished." WScript.Quit
这里是我一直在使用的代码：
'Script to start my filter.xls program with named macro 'MsgBox "In RunExcel" ' Create an Excel instance Dim myExcelWorker Set myExcelWorker = CreateObject("Excel.Application") ' Disable Excel UI elements myExcelWorker.DisplayAlerts = False myExcelWorker.AskToUpdateLinks = False myExcelWorker.AlertBeforeOverwriting = False myExcelWorker.FeatureInstall = msoFeatureInstallNone ' Open the Workbook Dim oWorkBook Dim strWorkerWB strWorkerWB = "C:\My Documents\___Stocks\filter.xls" 'MsgBox "Opening filter" on error resume next Set oWorkBook = myExcelWorker.Workbooks.Open(strWorkerWB) if err.number <> 0 Then ' Error occurred - just close it down. MsgBox "open Error occurred" End If err.clear on error goto 0 'MsgBox "Running macro" Dim strMacroName strMacroName = "A_Pick" on error resume next ' Run the macro myExcelWorker.Run strMacroName if err.number <> 0 Then ' Error occurred - just close it down. MsgBox "run macro Error occurred" End If err.clear on error goto 0 ' Clean up and shut down Set oWorkBook = Nothing myExcelWorker.Quit Set myExcelWorker = Nothing Set WshShell = Nothing
我会在这里大胆猜测。
“ 它运行时，我运行的cscript，但不是当任务运行 ”让我觉得这是一个权限问题。 当您设置Windows计划任务时，您应该能够将其设置为以特定用户身份运行（还可以设置在用户未login时是否运行）。 我不知道Win 98，但你可以找出什么任务属性说？ 当您自己运行代码时，会使用您的权限，并且计划的任务可能正在使用没有权限运行的用户。
如果你没有改变什么，这怎么会发生？ 我唯一能想到的是：
- 计划任务使用的用户不再存在或权限已更改
- 用户有一个密码到期date，最近通过
- 如果计划任务正在使用您的用户名，您是否将密码保存在“任务”属性中，然后最近更改了密码，但没有更新计划任务的密码？
此外，一些反病毒产品停止使用一些vbscripts。 在停止工作之前，你有没有可能安装新的东西？
检查错误可能来自哪里（希望这可以工作，因为我不是很熟悉Win98机器）：
- 找出哪个用户被设置为运行计划任务
- 作为另一个用户启动命令提示符（我认为这是Shift +右键单击 – >运行为… [注意，我不知道Windows 98，所以我越过我的手指，你可以做到这一点]）
- 从命令提示符运行cscript：
C:\>cscript <dir>\myscript.extension \I（注意，\I是交互模式，应该显示错误（ 请参阅这里了解更多信息 ）
我真的希望这有助于。 我会把这个评论，但它太多的文字。
解决了！ 首先我做了一个运行命令并使用了wscript。 也可以使用cscript /我作为joseph4twbuild议，但我不知道这一点。
这显示了我找不到VBScript引擎的错误。 我在网上查找和vbscript.dll应该是在我的98电脑的Windows /系统文件。 这不是在那里。 我find了该网站www.dll-files.com并下载了该文件。 然后我重新启动。 然后我做了一个运行命令来安装它，像这样：运行regsvr32 vbscript.dll。 它给了一个成功的消息，现在它的工作。
我相信这是由恶意软件造成的。 我无法从我的98计算机上获取恶意软件，因为我无法运行任何新的防病毒软件。
由于我的新的XP电脑，我正在制作磁盘映像和使用Linux恢复光盘。 那个linux，我想运行在98上，我希望我能运行杀毒软件来清理那台电脑。
感谢大家的帮助，因为它使我find了解决scheme。