Mit VBS Rechnernamen ausgeben

[ten13]

Hi ich habe folgendes Problem :

Ich möchte per VBScript meinen Rechnernamen auslesen lassen und den Namen dann einer Variablen übergeben und diesen dann in einer MSG Box anzeigen lassen.

Wär klasse wenn mir jmd. weiterhelfen könnte.

Vielen Dank

ten13

[Amstelchen]

Dim WSHShell, WSHNetwork

Set WSHShell = CreateObject("WScript.Shell")

Set WSHNetwork = CreateObject("WScript.Network")

strComputer = WSHNetwork.ComputerName

WScript.Echo strComputer

ComputerName steht übrigens weiters auch als variable im environment.

WScript.Echo WshShell.Environment("PROCESS").Item("COMPUTERNAME")

s'Amstel

[xmurrix]

Hallo,

mit dem Network-Objekt kannst du untrer anderem den Rechnernamen auslesen - Beispiel:

Dim oWshNw

Dim sComputerName

Set oWshNw = WScript.CreateObject("WScript.Network")

sComputerName = oWshNw.ComputerName

WScript.Echo sComputerName

Gruß

xmurrix

[Amstelchen]

vl. wäre es sinnvoll, mal einen thread mit ressourcen zum thema (oder programmierthemen generell) hier sticky zu stellen - mir scheint, es fallen recht häufig fragen zum thema scripting an.

s'Amstel

[ten13]

so mal schnell noch ein DANKE da lasse und mich jetzt an die arbeit mache : )