|
|
本帖最后由 yakeyun 于 2025-8-22 11:08 编辑
- @echo off
- %1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("""%~f0""","::",,"runas",1)(close)&exit /b
- setlocal enabledelayedexpansion
- if not exist .\*.xml (netsh wlan export profile key=clear)
- REM by.sanli
- (for /f "tokens=* delims=, " %%b in ('dir /a /s /b .\*.xml ') do (
- set "wififile=%%b"
- set "wifiname=%%~nb"
- set wifiname=!wifiname:Wlan-=!
- netsh wlan add profile filename="!wififile!"
- netsh wlan set profileparameter name="!wifiname!" connectionmode=auto
- )
- )
- echo,Wireless network automatic connection completed.
- timeout -t 5 >nul
- exit
复制代码 适合批量作业环境实现自动联网操作,或者系统安装前调用导出配置文件,安装完毕进桌面再次调用实现自动联网。
1、在已正常连接WiFi网络的电脑上运行“WiFi配置获取-自动连接WIFI.bat”获取配置文件到当前目录。
2、将“WiFi配置获取-自动连接WIFI.bat”和导出的“*.xml”配置文件拷贝到需要连接的主机上。
3、运行“WiFi配置获取-自动连接WIFI.bat”即可自动导入并连接上WiFi网络。
特别说明:
如果导出的XML文件有多个,只需要删除多余的文件,仅保留需要连接的网络配置文件即可。 |
|