使用dsapi扫描和连接wifi热点,支持连接隐藏的ssid。
效果演示:
代码如下:
private wifi as new dsapi.网络.wifi private sub button1_click(sender as object, e as eventargs) handles button1.click '--------扫描wifi热点 win7链接列表框1.链接项列表.clear() dim 所有热点() as dsapi.网络.wifi.wifi热点 = wifi.扫描可用wifi热点 for each 热点 as dsapi.网络.wifi.wifi热点 in 所有热点 win7链接列表框1.链接项列表.add(new 链接项(热点.ssid名称)) next '--------连接wifi热点 dim 已连接网络 as boolean = if(dsapi.网络.当前已联网的网络连接 is nothing, false, true) if 已连接网络 then exit sub for each 热点 as dsapi.网络.wifi.wifi热点 in 所有热点 if 热点.ssid名称 = "dskj-bj" then wifi.连接到wifi热点(热点.ssid名称, "123123123") exit for end if next end sub
wifi热点属性:
ssid名称
加密类型
无线信道
信号质量
有安全锁
wifi热点方法:
连接到wifi热点
扫描可用wifi热点
黄山市民网:https://www.huangshanshimin.com/