vbScript中如何取得本机名？

vbScript中如何取得本机名？ 问题点数：100、回复次数：4Top

1 楼ch21st（www.blanksoft.com）回复于 2005-09-22 13:59:28 得分 100

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  
  NextTop

2 楼conrad_wan（pineapple）回复于 2005-09-22 14:44:20 得分 0

淆习   ～～～Top

3 楼zhangying7725（本世纪最大谎言!）回复于 2005-09-22 15:41:33 得分 0

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

4 楼zhangying7725（本世纪最大谎言!）回复于 2005-09-22 15:46:56 得分 0

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

相关问题

• vbscript
• shell
• objexec
• wmicoll
• wmiobj
• wscript
• strresult
• computername
• objshell
• 中如何取得本机名

• 帖主：zhangying7725
• ch21st

• Visual Basic类图书
• Visual Basic类源码下载