RosettaCodeData/Task/Hostname/VBScript/hostname.vb

3 lines
86 B
VB.net

Set objNetwork = CreateObject("WScript.Network")
WScript.Echo objNetwork.ComputerName