code:

---

 ? REVPING("1.1.100.229")
? @error
? REVPING("216.239.51.100")
? @error
? "DONE"
get $

FUNCTION REVPING($ipnum)
		 DIM $nameip, $tempfile
		 $tempfile = "%temp%\nameip.txt"
		 
		 SHELL '%Comspec% /Q /E:1024 /C FOR /F "TOKENS=2* DELIMS= " %%i IN ('+ CHR(39)
		 + '"PING -a -n 1 $ipnum | FIND "]""' + CHR(39) + ') DO ECHO %%i >' + $tempfile
		 
		 IF OPEN(10,$tempfile,2) = 0  $nameip = READLINE(10)  
		 ELSE  $nameip = ""  
		 ENDIF
		 IF CLOSE(10) = 0  
		 DEL $tempfile  
		 ENDIF
		 IF $nameip <> "" $revping = TRIM($nameip) 
		 EXIT (0) 
		 ELSE		 $revping = "UNRESOLVED"		 
		 EXIT (1) 
		 ENDIF
ENDFUNCTION 

---

It works just right, but only on a NT platform.

So Hopefully some OLD SCHOOL people can tell me what the hell is the invalid switch.

code:

---

shell '%comspec% /c ping $ip | find "0% loss" >null'
if @error
  "could not ping"
else
 "ping succesfull"
endif

---

code:

---

$ip="0.0.1.1"
shell '%comspec% /c ping $ip | find "(0% loss)" >null'
if @error
  "could not ping"
else
 "ping succesfull"
endif

---

code:

---

 
$junkfile = "%temp%\winscl.xxx"
del $junkfile

shell '%comspec% /c ping -n 2 216.239.33.100 > $junkfile'
$filehandle = FreeFileHandle ( )
If Open ($filehandle, $junkfile) = 0
   $line = ReadLine ($filehandle)
   While @Error = 0
      If InStr ($line, "Reply from")
         $replies = 1
      Endif
      $line = ReadLine ($filehandle)
   Loop
Endif
$null = Close ($filehandle)
del $junkfile

If $replies < 1
   ? "Server not responding at this time"
Else
   ? "The server is up"
Endif

get $
 

---

code:

---

 
$ip="0.0.1.1"
shell '%comspec% /c ping $ip | find "(0% loss)" >null'
if @error
  "could not ping"
else
  "ping succesfull"
endif
 

---

quote:

---

C:\WINNT\system32>ping 10.128.12.20

Pinging 10.128.12.20 with 32 bytes of data:

Reply from 10.128.12.20: bytes=32 time=10ms TTL=125
Reply from 10.128.12.20: bytes=32 time<10ms TTL=125
Reply from 10.128.12.20: bytes=32 time<10ms TTL=125
Reply from 10.128.12.20: bytes=32 time<10ms TTL=125

C:\WINNT\system32>

---

quote:

---

C:\WINNT\system32>ping 10.134.126.20

Pinging 10.134.126.20 with 32 bytes of data:

Reply from 10.63.4.133: TTL expired in transit.
Reply from 10.63.4.133: TTL expired in transit.
Reply from 10.63.4.133: TTL expired in transit.
Reply from 10.63.4.133: TTL expired in transit.

---

As you might see there is in fact a TTL to be found but that doesn't mean that you get reply from the machine you pinged !

so 'TTL=' is it (for any MS OS you can imagine !)



{edit}Oh yeah ! 'Request timed out' is also nonsense :

quote:

---

C:\WINNT\system32>ping xyz
Bad IP address xyz.

---

would return 'reply'
{/edit}

[ 19. March 2003, 09:32: Message edited by: jpols ]