[dasktop]

تفضل اخي


Dim proc As New System.Diagnostics.Process()

proc.StartInfo.FileName = "netsh"
proc.StartInfo.Arguments = "wlan show networks mode=bssid"
proc.StartInfo.RedirectStandardOutput = True
proc.StartInfo.UseShellExecute = False
proc.Start()
MsgBox(proc.StandardOutput.ReadToEnd())



المصدر

https://stackoverflow.com/questions/1234...sual-basic