wo kann ich denn da nachschauen ob das deaktiviert ich dachte immer das ist ein Dienst...
alle computer im netz auflisten
-
- [ gelöst ]
-
mR. sEx p!sT0Ls -
10. November 2006 um 17:31 -
Geschlossen -
Erledigt
-
-
Du findest die Einstellung in den erweiterten TCP-IP-Eintellungen unter "WINS".
-
also bei mir sind alle einstellungen identsch mit dem Screenshot von dir.
-
naja bei mir sind alle einstellungen identisch mit deinem screenshot
Edit: sry hab das zweimal geschickt weil ich nicht gemerkt habe das es auf der nächsten seite stand
-
funktioniert den der Befehl ohne das autoitskript?
also nbtstat -a ipadresse ? -
naja meine IP steht da unt darunter... "Host nicht gefunden"...
also liegt der Fehler anscheinend doch irgendwo im system. -
bekommst Du denn den Hostnamen wenn Du ping -a ipadresse nutzt?
-
Ja das funktioniert. (wenigstens)...hatte auch bisher noch nie groß Probleme mit PC Namen anzeigen auf einer LAN Party oder so...bin jetzt erst durch das Skript drauf aufmerksam geworden.
-
Gut, dann scheint es Probleme mit Deinem NetBios zu geben, denn für die Namensauflösung verwenden beide Befehle unterschiedliche Techniken.
-
ok das ist ja schonmal ein Lösungsansatz...
jetzt fehlt nur noch die Lösunghättest du da noch eine Idee?
-
- Offizieller Beitrag
Hi,
was steht den in Scite, wenn du dies laufen läßt?
[autoit]MsgBox(0,"IpToName", _IpToName("192.168.1.11"))
[/autoit][autoit][/autoit][autoit]Func _IpToName($ip)
[/autoit]
$outread = "ERROR: Kann Programm NbtStat.exe nicht finden!"
Ping($ip, 50)
If @error Then
;~ MsgBox(16,"Ping error","Die adresse "&$ip&" konnte nich gefunden werden, stellen Sie sicher das der Rechner online ist!")
;~ Exit
Return @error
EndIf
$run = Run(@ComSpec & " /c nbtstat -a " & $ip, @SystemDir, @SW_HIDE, 6)
Sleep(500)
$stdoutread = StdoutRead($run)
If Not @error = -1 Then $outread = $stdoutread
ConsoleWrite("0" & $outread & @CRLF)
$stderrRead = StderrRead($run)
If Not @error = -1 Then $outread = $stderrRead
$ss = StringSplit($outread, @CRLF)
If $ss[0] < 23 Then
$outread = "(Kein Name Vorhanden)"
Else
$outread = $ss[23]
ConsoleWrite("1" & $outread & @CRLF)
$outread = StringReplace($outread, Chr(129), "ü")
$outread = StringReplace($outread, Chr(154), "Ü")
$outread = StringReplace($outread, Chr(142), "Ä")
$outread = StringReplace($outread, Chr(132), "ä")
$outread = StringReplace($outread, Chr(153), "Ö")
$outread = StringReplace($outread, Chr(148), "ö")
$outreadlen = StringLen(" LAN-Verbindung:Knoten-IP-Adresse: [] Bereichskennung: [] NetBIOS-Namentabelle des Remotecomputers Name Typ Status --------------------------------------------- ") + StringLen($ip)
ConsoleWrite("2" & $outread & @CRLF)
$outread = StringTrimLeft($outread, 4)
$outread = StringSplit($outread, " ")
$outread = $outread[1]
ConsoleWrite("3" & $outread & @CRLF)
$outread = StringReplace($outread, " ", "", 0)
ConsoleWrite("4 Da isser --> " & $outread & @CRLF)
EndIf
Return $outread
EndFunc ;==>_IpToNameSo long,
Mega
P.S.: Sorry wegen der Verwirrung, wer das Skript geschrieben hat.
-
hier ein Screenshot von der Msgbox die beim starten des Scriptes kommt
-
- Offizieller Beitrag
Hi,
in dem voherigen Skript in der obersten MSgBox mal was eingetragen. Es kann ja eigentlich nur diese MsgBox sein, da sonst keine drin ist im Skript
Fängt der Hostname der IP die du eigegeben hast denn mit 1 an?
Hast du deine eigene eingegeben?
Sonst nutz mal diese Zeile
MsgBox(0,"IPToName", _IpToName(@IPAddress1))
So long,
Mega
-
ok das ist der Screenshot nach dem ich das ganze so geändert hab
Spoiler anzeigen
MsgBox(0,"IPToName", _IpToName(@IPAddress1))
Func _IpToName($ip)
$outread = "ERROR: Kann Programm NbtStat.exe nicht finden!"
Ping($ip, 50)
If @error Then
;~ MsgBox(16,"Ping error","Die adresse "&$ip&" konnte nich gefunden werden, stellen Sie sicher das der Rechner online ist!")
;~ Exit
Return @error
EndIf
$run = Run(@ComSpec & " /c nbtstat -a " & $ip, @SystemDir, @SW_HIDE, 6)
Sleep(500)
$stdoutread = StdoutRead($run)
If Not @error = -1 Then $outread = $stdoutread
ConsoleWrite("0" & $outread & @CRLF)
$stderrRead = StderrRead($run)
If Not @error = -1 Then $outread = $stderrRead
$ss = StringSplit($outread, @CRLF)
If $ss[0] < 23 Then
$outread = "(Kein Name Vorhanden)"
Else
$outread = $ss[23]
ConsoleWrite("1" & $outread & @CRLF)
$outread = StringReplace($outread, Chr(129), "ü")
$outread = StringReplace($outread, Chr(154), "Ü")
$outread = StringReplace($outread, Chr(142), "Ä")
$outread = StringReplace($outread, Chr(132), "ä")
$outread = StringReplace($outread, Chr(153), "Ö")
$outread = StringReplace($outread, Chr(148), "ö")
$outreadlen = StringLen(" LAN-Verbindung:Knoten-IP-Adresse: [] Bereichskennung: [] NetBIOS-Namentabelle des Remotecomputers Name Typ Status --------------------------------------------- ") + StringLen($ip)
ConsoleWrite("2" & $outread & @CRLF)
$outread = StringTrimLeft($outread, 4)
$outread = StringSplit($outread, " ")
$outread = $outread[1]
ConsoleWrite("3" & $outread & @CRLF)
$outread = StringReplace($outread, " ", "", 0)
ConsoleWrite("4 Da isser --> " & $outread & @CRLF)
EndIf
Return $outread
EndFunc ;==>_IpToNameso und als Ergebnis kommt:
-
Spoiler anzeigen
[autoit]MsgBox(0,"IPToName", _IpToName(@IPAddress1))
[/autoit] [autoit][/autoit] [autoit]Func _IpToName($ip)
[/autoit] [autoit][/autoit] [autoit]
$outread = "ERROR: Kann Programm NbtStat.exe nicht finden!"
Ping($ip, 50)
If @error Then
;~ MMsgBox(16,"Ping error","Die adresse "&$ip&" konnte nich gefunden werden, stellen Sie sicher das der Rechner online ist!")
[/autoit] [autoit][/autoit] [autoit]
;~ Exit
Return @error
EndIf
$run = Run(@ComSpec & " /c nbtstat -a " & $ip, @SystemDir, @SW_HIDE, 6)
Sleep(500)
$stdoutread = StdoutRead($run)
If Not @error = -1 Then $outread = $stdoutread
ConsoleWrite("0" & $outread & @CRLF)
$stderrRead = StderrRead($run)
If Not @error = -1 Then $outread = $stderrRead
$ss = StringSplit($outread, @CRLF)
If $ss[0] < 23 Then
$outread = "(Kein Name Vorhanden)"
Else
$outread = $ss[23]
ConsoleWrite("1" & $outread & @CRLF)$outreadlen = StringLen(" LAN-Verbindung:Knoten-IP-Adresse: [] Bereichskennung: [] NetBIOS-Namentabelle des Remotecomputers Name Typ Status --------------------------------------------- ") + StringLen($ip)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
ConsoleWrite("2" & $outread & @CRLF)ConsoleWrite("3" & $outread & @CRLF)
[/autoit]
$outread = StringReplace($outread, " ", "", 0)
ConsoleWrite("4 Da isser --> " & $outread & @CRLF)
EndIf
Return $outread
EndFunc ;==>_IpToNameSo kommt bei mir was raus, das richtig ist
Drahtlose Netzwerkverbindung:
Knoten-IP-Adresse: [192.168.2.116] Bereichskennung: []NetBIOS-Namentabelle des Remotecomputers
Name Typ Status
---------------------------------------------
LAPTOP <00> EINDEUTIG Registriert
LAPTOP <20> EINDEUTIG Registriert
GYMNASIUMSTRAáE<00> GRUPPE Registriert
GYMNASIUMSTRAáE<1E> GRUPPE Registriert
GYMNASIUMSTRAáE<1D> EINDEUTIG Registriert
..__MSBROWSE__.<01> GRUPPE Registriert
MAC Adresse = 00-13-CE-3C-6C-32
LAN-Verbindung:
Knoten-IP-Adresse: [0.0.0.0] Bereichskennung: []Host nicht gefunden.
1 LAPTOP <00> EINDEUTIG Registriert
2 LAPTOP <00> EINDEUTIG Registriert
3 LAPTOP <00> EINDEUTIG Registriert
4 Da isser --> LAPTOP<00>EINDEUTIGRegistriert
>Exit code: 0 Time: 5.052 -
naja aber auch mit deinem Skript kommt bei mir ne leere Msgbox...
Was ist das nur??? das macht einen verrückt!!!
:hammer:
:weinen:
-
Benutzt du stets die aktuelle beta und stable? oO
-
Ja aber wir haben ja auch vorhin schon rausbekommen das auch bei nbtstat -a
das nicht klappt...jetzt muss ich aber sagen das es gerade ging (das nbtstat -a)und als PC-Name eines anderen Rechners im Netzwerk jetzt immerhin eine "1" als PC Name in mein Tool eingetragen worde.
:party4:
naja der richtige NAme wäre trotzdem besser!!!
-
Führe das Script bitte mal in SciTe durch und poste unten den code den Scite ausspuckt, ganz unten vom Editor
-
ok...
ich habe jetzt das Skript von Huggy (15:53) getestet, wo die leere Msgbox kam und es stand da:
>"D:\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /beta /ErrorStdOut /in "L:\Skripte\1.au3" /autoit3dir "D:\AutoIt3\beta" /UserParams
+> Starting AutoIt3Wrapper v.1.7.3
>Running AU3Check (1.54.4.0) params: from:D:\AutoIt3\beta
+>AU3Check ended.rc:0
>Running:(3.2.1.12):D:\AutoIt3\beta\autoit3.exe "L:\Skripte\1.au3"
0
LAN-Verbindung:
Knoten-IP-Adresse: [0.0.0.0] Bereichskennung: []Host nicht gefunden.
LAN-Verbindung 2:
Knoten-IP-Adresse: [192.168.1.101] Bereichskennung: []1
2
3
4 Da isser -->
+>AutoIT3.exe ended.rc:0
>Exit code: 0 Time: 6.351Edit: hab auch mal meine firewall und mein Virenprogramm ausgeschalten und das ergab aber auch keinen sinn.
-