使用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热点