PowerShell 技能连载 - 将 VBScript 翻译为 PowerShell

大多数旧的 VBS 脚本可以容易地翻译为 PowerShell。VBS 中关键的命令是 “CreateObject“。它能让您操作系统的库。PowerShell 将 “CreateObject“ 翻译为 “New-Object -ComObject“,而对象模型和成员名称保持相同:

当把这段代码保存为扩展名为 “.vbs” 的文本文件后,这段 VBS 脚本就可以发出语音:

1
2
3
Set obj = CreateObject("Sapi.SpVoice")

obj.Speak "Hello World!"

对应的 PowerShell 代码类似这样:

1
2
$obj = New-Object -ComObject "Sapi.SpVoice"
$obj.Speak("Hello World!")

只有少量的 VBS 内置成员,例如 MsgBoxInputBox。要翻译这些代码,您需要引入 “Microsoft.VisualBasic.Interaction“ 类型。以下是调用 MsgBoxInputBox 的 PowerShell 代码:

1
2
3
4
5
6
Add-Type -AssemblyName Microsoft.VisualBasic

$result = [Microsoft.VisualBasic.Interaction]::MsgBox("Do you want to restart?", 3, "Question")
$result

$result = [Microsoft.VisualBasic.Interaction]::InputBox("Your name?", $env:username, "Enter Name")

以下是支持的 Visual Basic 成员的完整列表:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
PS> [Microsoft.VisualBasic.Interaction] | Get-Member -Stati


TypeName: Microsoft.VisualBasic.Interaction

Name MemberType Definition
---- ---------- ----------
AppActivate Method static void AppActivate(int ProcessId), static vo...
Beep Method static void Beep()
CallByName Method static System.Object CallByName(System.Object Obj...
Choose Method static System.Object Choose(double Index, Params ...
Command Method static string Command()
CreateObject Method static System.Object CreateObject(string ProgId, ...
DeleteSetting Method static void DeleteSetting(string AppName, string ...
Environ Method static string Environ(int Expression), static str...
Equals Method static bool Equals(System.Object objA, System.Obj...
GetAllSettings Method static string[,] GetAllSettings(string AppName, s...
GetObject Method static System.Object GetObject(string PathName, s...
GetSetting Method static string GetSetting(string AppName, string S...
IIf Method static System.Object IIf(bool Expression, System....
InputBox Method static string InputBox(string Prompt, string Titl...
MsgBox Method static Microsoft.VisualBasic.MsgBoxResult MsgBox(...
Partition Method static string Partition(long Number, long Start, ...
ReferenceEquals Method static bool ReferenceEquals(System.Object objA, S...
SaveSetting Method static void SaveSetting(string AppName, string Se...
Shell Method static int Shell(string PathName, Microsoft.Visua...
Switch Method static System.Object Switch(Params System.Object[...



PS>

PowerShell 技能连载 - 将 VBScript 翻译为 PowerShell

http://blog.vichamp.com/2018/10/26/translating-vbscript-to-powershell/

作者

吴波

发布于

2018-10-26

更新于

2022-07-06

许可协议

评论