vb 获取本地计算机名

来源：百度知道 编辑：UC知道 时间：2024/06/26 04:25:15
怎样获得本地计算机名，最好简单些，复杂了看不懂，能一两个命令实现就好了。给代码的话，要给完整的哦。给加最高分

Set R = CreateObject("WScript.shell")
R.Run("cmd.exe /c hostname >E:\hostname.txt")
MsgBox "单击确定查看本地计算机名。"
Open "E:\hostname.txt" For Input As #1
Line Input #1, hostname
Close #1
MsgBox "本地计算机名是" & hostname
Kill "E:\hostname.txt"