Thema: Computernamen mit VB Script auslesen

Hallo kann mir jemand sagen wie mit einem VBS die Computernamen von mehreren PC auslesen kann und dann in ein Excelsheet schreiben kann.

Das Script wird dann bei der Anmeldung ans Netzwerk ausgeführt.

Danke.

2

Re: Computernamen mit VB Script auslesen

Hallo,

leider hat mir keiner helfen könne, da habe ich es selbst herausgefunden. Hier zur Info der Code.

' Schreiben einer Logdatei

'SYS: Windows Script Host Runtime Library
Set fs = CreateObject("scripting.FileSystemObject")
Set nw = CreateObject("Wscript.Network")

Logfile = "\Pfaddatei.txt"

set Logbuch = fs.OpenTextFile(Logfile, 8,true)
benutzer = nw.Username
computer = nw.computername

if benutzer = "" then benutzer = "anonym " & "angemeldeten Benutzer"

logbuch.writeline "Ausgeführt am " & now & " durch " & benutzer & " an " & computer
logbuch.close

3

Re: Computernamen mit VB Script auslesen

Bei dem Teil reagiert bei mir Norton ziemlich aggressiv smile

Four legs good, two legs bad

Re: Computernamen mit VB Script auslesen

hallo..
mal eine kurze frage..
Kann man den Code oben dazu verwenden, um den Computernamen in ein Formularfeld zu schreiben?

<script>
Set nw = CreateObject("Wscript.Network")
computer = nw.computername
</script>
<input type="Text" name="slan" value="<? if ($slan==null) { echo ""; } else { echo $slan; } ?>" size="" maxlength="">

(Das <? [..] ?> ist phpcode..)

mit js würde man ja folgendes machen:

<script>if (formular.slan.value=="") { formular.slan.value=computer; } alert(computer);</script>

aber das geht ja so nicht.. help sad

übrigens, das form tag heißt formular..

cybersys
anything you want to

Re: Computernamen mit VB Script auslesen

*pleasehelp*

cybersys
anything you want to