Página 1 de 1
Nombre de RED WIFI a la que estoy conectado...
Publicado: 16 Jul 2017, 06:17
por melvinhn
Bueno resulta que no se la manera como sacar el nombre de la red wifi actual a la que estoy conectado
se que el nombre de mi red wifi se llama WIFI SERVER, pero como saco ese nombre en un msbox
Código: Seleccionar todo
#NoTrayIcon
;#RequireAdmin
$NombreRedWifiActiva = @WifiName
MsgBox(64, "Windows", $NombreRedWifiActiva)
porfa necesito de la ayuda de usted, de antemano gracias
Re: Nombre de RED WIFI a la que estoy conectado...
Publicado: 16 Jul 2017, 14:59
por Dany
Hola Melvin. Puedes hacer esto.
Código: Seleccionar todo
#include <Constants.au3>
Local $sNombreRedWifiActiva=_GetActiveSSID()
MsgBox(0,"",$sNombreRedWifiActiva)
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
Saludos
Re: Nombre de RED WIFI a la que estoy conectado...
Publicado: 16 Jul 2017, 16:14
por melvinhn
Muchisimas gracias mi amigo, eres un genio. es bueno que alla personas que compartan su conocimiento.