Snippets ( Wireless ): Difference between revisions
Jump to navigation
Jump to search
m (+Snippets Category (+ normalize top)) |
m (Edited snippet to conform to template Snippet Header.) |
||
| Line 4: | Line 4: | ||
{{Snippet Credit Header}} | {{Snippet Credit Header}} | ||
===== | == _GetActiveSSID == | ||
{{Snippet Header | |||
| AuthorURL = 35302-guinness | |||
| AuthorName = guinness | |||
}} | |||
<syntaxhighlight lang="autoit"> | <syntaxhighlight lang="autoit"> | ||
Latest revision as of 19:19, 16 November 2012
Please always credit an author in your script if you use their code. It is only polite.
_GetActiveSSID
Author: guinness
#include <Constants.au3>
ConsoleWrite( _GetActiveSSID() & @CRLF)
Func _GetActiveSSID()
Local $iPID = Run(@ComSpec & ' /u /c ' & 'netsh wlan show interfaces', @SystemDir, @SW_HIDE, $STDERR_CHILD + $STDOUT_CHILD), $sOutput = ''
While 1
$sOutput &= StdoutRead($iPID)
If @error Then
ExitLoop
EndIf
$sOutput = StringStripWS($sOutput, 7)
WEnd
$sReturn = StringRegExp($sOutput, '(?s)(?i)SSID\s*:\s(.*?)' & @CR, 3)
If @error Then
Return SetError(1, 0, '')
EndIf
Return $sReturn[0]
EndFunc ;==>_GetActiveSSID