Ghost21 0 Posted April 21, 2008 I have been trying to extract the ipaddress and ping from a command line and so far I have been trimming small amounts back and forth from each side ... There must be a quicker way to extract the data ?? $get = Run(@ComSpec & " /c " & "ping -n 1 -l 1 -w 110 " & $PC & " | find ""Reply from""", @ScriptDir, @SW_HIDE, $STDOUT_CHILD) While ProcessExists($get) Sleep(30) WEnd $StdOut = StdoutRead($get) $ipdata = $StdOut MsgBox(0, "Ping 1: " & $PC, $ipdata) I'm thinking of something using stringregexp but unsure exacty how to use it... Help would be great... Share this post Link to post Share on other sites
spudw2k 223 Posted April 21, 2008 Check out the _StringBetween function in the help file. Spoiler Things I've Made: AOT Tool ◊ AU History ◊ Deck of Cards ◊ HideIt ◊ ICU ◊ Icon Freezer ◊ Ipod Ejector ◊ Link Downloader ◊ MD5 Folder Enumerator ◊ PassGen ◊ Ping Tool ◊ Quick NIC ◊ Read OCR ◊ RemoteIT ◊ SchTasksGui ◊ SpyCam ◊ System UpTime ◊ Transparency Machine ◊ VMWare ESX BuilderMisc Code Snippets: ADODB Example ◊ CheckHover ◊ Detect SafeMode ◊ DynEnumArray ◊ GetNetStatData ◊ HashArray ◊ IsBetweenDates ◊ Local Admins ◊ Make Choice ◊ Recursive File List ◊ Remove Sizebox Style ◊ Retrieve PNPDeviceID ◊ Retreive SysListView32 Contents ◊ Set IE Homepage ◊ Tickle Expired Password ◊ Transpose ArrayProjects: Drive Space Usage GUI ◊ LEDkIT ◊ Plasma_kIt ◊ Scan Engine Builder ◊ SpeeDBurner ◊ SubnetCalcCool Stuff: AutoItObject UDF ◊ Extract Icon From Proc ◊ GuiCtrlFontRotate ◊ Hex Edit Funcs ◊ Run binary ◊ Service_UDF Share this post Link to post Share on other sites
weaponx 16 Posted April 21, 2008 Straight from the help file: ; Example 1 #include <inet.au3> Dim $sResult, $sIp TCPStartup() $sIp = TCPNameToIP("hiddensoft.com") $sResult = _TCPIpToName ($sIp) If @error Then MsgBox(0, "_TCPIpToName()", "@error = " & @error & @LF & "@extended = " & @extended) Else MsgBox(0, "hiddensoft.com realy is:", $sResult) EndIf ; Example 2 #include <array.au3> #include <inet.au3> Dim $aResult, $sIp TCPStartup() $sIp = _GetIP() $aResult = _TCPIpToName ($sIp, 1) If @error Then MsgBox(0, "_TCPIpToName()", "@error = " & @error & @LF & "@extended = " & @extended) Else _ArrayDisplay($aResult, "Local Hostname(s)") EndIf Share this post Link to post Share on other sites
