; Ping
; ----
; GUI ping using an ipbox to input address
;
:enter
;report on
ipbox Ping,Enter the IP address to ping:,A,%A,,
ifmsg cancel,end
ping %A
iferror prob
setvar B,Ping was successful
goto exit
:prob
setvar B,Could not make contact
:exit
msgbox Ping to %A,%B,1
ifmsg ok,enter
:end