IBM Pcomm 宏 - 尝试使用 WScript.Shell 时出错

Question

希望你能帮忙。

[PCOMM SCRIPT HEADER]
LANGUAGE=VBSCRIPT
DESCRIPTION=
[PCOMM SCRIPT SOURCE]
OPTION EXPLICIT
autECLSession.SetConnectionByName(ThisSessionName)

Dim ShellObj : Set ShellObj = WScript.CreateObject("WScript.Shell")
ShellObj.Run("C:\Windows\System32\cmd.exe")

我得到的错误是“WScript”没有定义...我已经尝试定义并且正如预期的那样它仍然没有工作。

我想要实现的是直接从个人通信会话中打开 CMD。谢谢。

Answer 1

PCOMM 可能需要一些特殊的考虑，但我相信只要删除 WScript 中的

Dim ShellObj : Set ShellObj = WScript.CreateObject("WScript.Shell")

这样写

Dim ShellObj : Set ShellObj = CreateObject("WScript.Shell")

将通过避免（不必要的）引用 WScript 对象来解决问题，该对象仅由 C|WScript.exe 脚本主机提供。详情请见this answer。