IP to Net name

[Ghastly_MIB]

Is it posible to convert a IP to net name?

Example:

192.168.1.2 TO \\Other_pc

74.25.36.96 To pc_name.internethost.com

??

Thanks,

Ghastly_MIB

[jefhal]

Is it posible to convert a IP to net name?

do a ping with the -a parameter. This will work on domains. For home networks you could do net view and then ping what comes back to find a match.

[Ghastly_MIB]

How can I get that to my AutoIt Application?

[GaryFrost]

Might want to look at StdoutRead (beta)

[Ghastly_MIB]

Thanks It works

If any other one will ever need this, just use this code:

#include <Constants.au3>
#NoTrayIcon
$system = InputBox("System", "Enter the IP"&@CRLF&"This could use some time...", "")
If @error Then Exit

$run = Run(@ComSpec & " /c ping -a """&$system&"""", @SystemDir, @SW_HIDE, $STDOUT_CHILD)
While 1
    $line = StdoutRead($run)
    If @error = -1 Then ExitLoop
    If StringInStr($line, "[") Then
        $temp = $line
        $temp = StringReplace($temp, @CRLF, "")
        $temp = StringReplace($temp, @CR, "")
        $temp = StringReplace($temp, @LF, "")
        $temp = StringSplit($temp, "[")
        $temp = StringSplit($temp[1], " ")
        $temp = $temp[$temp[0]-1]
        ProcessClose("ping.exe")
        ExitLoop
    EndIf
Wend
MsgBox(0, "Name of the system "&$system, $temp)

Board search for other members:

internet protocol to name

Edited October 5, 2005 by Ghastly_MIB

[w0uter]

i use this:

$s_IP = '64.111.104.70'
ConsoleWrite(_INetName($s_IP) & @LF)


Func _RunSTD($s_p, $s_wd = @WorkingDir, $s_f = @SW_HIDE)
    Local $s_r = '', $i_pid = Run($s_p, $s_wd, $s_f, 2)
    While Not @error
        $s_r &= StdoutRead ($i_pid)
    WEnd
    Return $s_r
EndFunc;==>_RunSTD

Func _INetName($s_IP)
    $s_IP = StringRegExp(_RunSTD(@ComSpec & ' /c ping -a -n 1 -l 1 ' & $s_IP), ' .* (.*) \[', 3)
    Return $s_IP[0]
EndFunc  ;==>_INetName

its faster bc. of the "-n 1 -l 1" parameters.

Edited October 5, 2005 by w0uter

[jefhal]

MsgBox(0, "Name of the system "&$system, $temp)

Thank you! Minor change to last line:

MsgBox(0, "Name of the system " & $system, $temp)

The original threw an undeclared variable error, possibly because there was no space between the "&" and the "$"?

Edited October 5, 2005 by jefhal