Regex Help Required Please

[rajeshontheweb]

i wasted half an hour trying to work on getting this to work,

Domain

-------------------------------------------------------------------------------
MSHOME          
The command completed successfully.

this is the output from

Local $s_Buf = '', $a_Buf, $i_Pid = Run(@ComSpec & ' /c net view /domain', '', @SW_HIDE, 2 + 4)
    While Not @error
        $s_Buf &= StdoutRead($i_Pid)
    WEnd
    ConsoleWrite(@CRLF & $s_Buf)

I need to Extract the <MSHOME> part only (it comes with a few spaces behind it. of course i do have a solution with string mid , etc but itlooks ridiculous. please help.

Edited May 4, 2009 by rajeshontheweb

[rajeshontheweb]

just an update noobie trial

will this work on all cases?

$a_Buf = StringRegExp($s_Buf, "\n([0-9a-zA-Z-]*)", 3)

i will be using $a_Buf[2] which contains the WorkGroup name in most cases i have tried!

[Authenticity]

Dim $oObj = ObjGet('WinNT:')
$oObj.Filter = 'domain'

For $oItem In $oObj
    ConsoleWrite($oItem.Name & @LF)
Next

[rajeshontheweb]

i do have a WMI solution, but Net View is gonna be employed in my script any ways and btw net view is far quicker than WMI engine,

and more, WinNT is new to me, i used someother object.

[Authenticity]

If you're still interested, it's using Ward's MemoryDll.au3 library which I find to be fun and working.

NTServerEnum.au3

NTServerEnum.txt

Edited May 6, 2009 by Authenticity

[rajeshontheweb]

thanks a lot, i might use it later, i had seen the ServerENum Function in MSDN but as always, being a nube with dllcalls, and the techinicalities of the errors, i didnt wanna try it yet. in near future, i would like to use that funtion. i do like dll call rather than net view. :-)