获取计算机名的 VBScript 方法172

在 VBScript 中，有几种方法可以获取计算机名的字符串。这些方法包括使用 WScript 对象、GetObject 函数或 类。

使用 WScript 对象

WScript 对象是一个内置对象，可用于访问脚本的命令行参数和环境变量。要使用 WScript 对象获取计算机名，请使用以下语法：```vbscript
Dim WshShell
Set WshShell = CreateObject("")
strComputerName = ("COMPUTERNAME")
```

使用 GetObject 函数

GetObject 函数可用于获取对 COM 对象的引用。要使用 GetObject 函数获取计算机名，请使用以下语法：```vbscript
Dim objWMIService
Set objWMIService = GetObject("winmgmts:\.\root\cimv2")
strComputerName = ("Win32_ComputerSystem").Name
```

使用 类

类提供有关当前环境的信息。要使用 类获取计算机名，请使用以下语法：```vbscript
strComputerName = ("COMPUTERNAME")
```

示例脚本

以下是一个 VBScript 脚本示例，演示了如何使用这三种方法获取计算机名：```vbscript
' 使用 WScript 对象
Dim WshShell
Set WshShell = CreateObject("")
strComputerName = ("COMPUTERNAME")
MsgBox "计算机名：" & strComputerName
' 使用 GetObject 函数
Dim objWMIService
Set objWMIService = GetObject("winmgmts:\.\root\cimv2")
strComputerName = ("Win32_ComputerSystem").Name
MsgBox "计算机名：" & strComputerName
' 使用 类
strComputerName = ("COMPUTERNAME")
MsgBox "计算机名：" & strComputerName
```

注意事项* 如果脚本在域环境中运行，则计算机名将返回域和计算机名称。例如，"DOMAIN\COMPUTERNAME"。
* 如果脚本在没有域的环境中运行，则计算机名将仅返回计算机名称。
* ("COMPUTERNAME") 方法仅在 Windows Vista 及更高版本中可用。在 Windows XP 中，您可以使用 ("COMPUTERNAME") 或 GetObject 函数代替。

2025-01-14

上一篇：如何在 VBScript 中获取字符串的分子分母

下一篇：杨辉三角形 VBScript 代码