vbScript中如何取得本机名？

zhangying7725 2005-09-22 01:36:32

vbScript中如何取得本机名？

...全文

130 4 打赏收藏转发到动态举报

写回复

用AI写文章

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

zhangying7725 2005-09-22

打赏
举报

不好意思问错了，是第二种方式
我已经知道了解决方法，用strResult = objExec.StdOut.ReadLine
马上给分

zhangying7725 2005-09-22

打赏
举报

方法一中取得的名字怎么还带一个回车？要如何去掉？

conrad_wan 2005-09-22

打赏
举报

淆习～～～

道素 2005-09-22

打赏
举报

1.用本地环境变量
set shell = WScript.CreateObject( "WScript.Shell" )
computername = shell.ExpandEnvironmentStrings("%COMPUTERNAME%")
wscript.echo computername

2。用Hostname
SET objShell=CreateObject("Wscript.Shell")
DIM objExec, strResult
SET objExec = objShell.Exec("hostname")
strResult = objExec.StdOut.ReadAll
WScript.Echo strResult

3.用WMI
Set wmiColl = GetObject("WinMgmts:root/cimv2")_
.ExecQuery("Select * FROM Win32_ComputerSystem")
For Each wmiObj in wmiColl
WScript.Echo wmiObj.Name
Next

一些简单的vbs脚本大全

2021-2022计算机二级等级考试试题及答案No.9930.docx

VBScript脚本语言基础 2.1 vbs脚本语言简介 2.2 第一个vbs脚本语言–hello world 打开记事本程序，在编辑窗口填写，保存文件的扩展名为：.vbs 对话框：输入框 inputbox(“请输入第一条边的边长”,“第一条边”) 2. 输出框 msgbox("输入错误! ") 可能遇到错误： 1：解决方法：把vbs另存为ANSI编码 2：调用过程函数时不能使用括号，即：inputbox “请输入第一条边的边长”,“第一条边”（因为此时没有赋值，直接使

strComputer = "."strMesseage=""Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")'获取本机计算机名Set colSettings = objWMIService.ExecQuery ("S...

Vbs 脚本编程简明教程之一—为什么要使用Vbs？在 Windows中，学习计算机操作也许很简单，但是很多计算机工作是重复性劳动，例如你每周也许需要对一些计算机文件进行复制、粘贴、改名、删除，也许你每天启动计算机第一件事情就是打开WORD，切换到你喜爱的输入法进行文本编辑，同时还要播放优美的音乐给工作创造一个舒心的环境，当然也有可能你经常需要对文本中的某些数据进行整理，把各式各样的