Vbscript 如何每10秒打开一个程序

我试图通过创建一个VBScript，每10秒打开一次记事本，来恶作剧我的朋友。我能够使脚本第一次打开记事本，但在脚本再次打开的10秒后，我出现以下错误：

我的VBS代码：

Dim oShell
Set oShell = CreateObject("WScript.Shell")
i = 0
Do While i = 0
oShell.run "Notepad.exe"
Set oShell = Nothing
WScript.Sleep(10000)
Loop

---

我不认为学习新东西的同时又能享受一点乐趣有什么不对；） 您的问题是，在将

oShell

设置为

Nothing

时，您试图执行

Notepad.exe

。只要去掉那条线，一切都会好起来的

Dim oShell
Set oShell = CreateObject("WScript.Shell")
i = 0
Do While i = 0
oShell.run "Notepad.exe"
WScript.Sleep(10000)
Loop

---

找到更有用的东西来集中你的注意力，这可能是因为你把你的职业安全标准设置为“无”。@AdamJeffers你这是什么意思？“我想学点新东西，恶作剧也没那么糟糕。”DigitalVeer非常感谢你的帮助。请把这个作为答案，这样我就可以选择它作为正确的答案。没问题，@abdel！有机会时选择我的答案；干杯