如何从命令行调用VBS的函数/子程序？

Question

我正在尝试自动化Outlook桌面应用程序。我有不同的子程序写在一个VB脚本文件（file.vbs），它执行不同种类的操作在Outlook上。我想从命令行调用其中一个子过程。我怎么做？

Answer 1

本示例调用函数或子函数并动态地找到正确的调用。在命令行中，您提供'functionToExecute'作为您想调用的函数的名称或'subToExecute'作为您想调用的子例程。对于从命令行调用VBS一分两个例子分别是功能：

cscript.exe demo.vbs subToExecute 
cscript.exe demo.vbs functionToExecute 

在VBS脚本得到命令行参数的程序的名称，并决定是否要调用一个子程序或致电功能：用于VBS命令行处理

On Error Resume Next 
mySubOrFuncName = WScript.Arguments.Item(0) 'name of the subroutine or function 
subCall = "call " & mySubOrFuncName & "()" 
Execute subCall 

If Err.Number <> 0 Then 'if sub could not be called, take the function call 
    eval(mySubOrFuncName) 
    Err.Clear 
End If 

WScript.Quit 

'this is a subroutine you already have 
Sub subToExecute 
    MsgBox "inside a sub" 
    'do stuff 
End Sub 

'this is a function you already have 
Function functionToExecute 
    MsgBox "inside a function" 
    'do stuff 
End Function 

简便的事例：https://ss64.com/vb/syntax-args.html