Array - - - help

[onedayillpay]

this used to work like a charm... i use this to log ip address that connect on port 6112...

some thing is wrong with i think stringsplit?!?!? or is it that im on vista?!?!?

$netstat = Run("netstat -n", @WorkingDir, @SW_HIDE,7)
$aRecords = StringSplit(StringStripCR(StdoutRead($netstat)), @LF)
$file = FileRead('test.txt')

MsgBox(0,"$aRecords",$aRecords)

For $x = 1 To $aRecords[0]
    If StringInStr($aRecords[$x], '6112') And Not StringInStr($file, $aRecords[$x]) Then FileWriteLine('test.txt', $aRecords[$x])
Next

[monoceres]

Hi!

The problem is StdoutRead(), the behavior of this function changed recently (it no longer blocks). Please refer to help file for info on how to use it.

Good luck!

muttley

[onedayillpay]

Im stumped muttley Is there another way i could retrieve data from netstat ???

[martin]

Im stumped muttley Is there another way i could retrieve data from netstat ???

#include <Constants.au3>

;$foo = Run("cmd.exe", @SystemDir, @SW_HIDE, $STDIN_CHILD + $STDOUT_CHILD)
;StdinWrite($foo, "netstat" & @CRLF)
$foo = Run("netstat.exe", @SystemDir, @SW_HIDE, $STDIN_CHILD + $STDOUT_CHILD)
StdinWrite($foo)

; Read from child's STDOUT
Local $data
While True
    $data &= StdoutRead($foo)
    If @error Then ExitLoop
    Sleep(25)
WEnd
MsgBox(262144,'Netstat output',$data)

But that can be obtained by reading the help.

Edited July 7, 2008 by martin