RosettaCodeData/Task/Hostname/VBScript/hostname.vb

3 lines
86 B
VB.net
Raw Permalink Normal View History

2015-11-18 06:14:39 +00:00
Set objNetwork = CreateObject("WScript.Network")
WScript.Echo objNetwork.ComputerName