以超级管理员身份运行bat

@ echo off
%1 %2
ver|find "5.">nul&&goto :st
mshta vbscript:createobject("shell.application").shellexecute("%~s0","goto :st","","runas",1)(window.close)&goto :eof

:st
copy "%~0" "%windir%\system32\"
netsh wlan start hostednetwork

将你的脚本代码前面加上上面的脚本，并保存。

双击运行就可以直接以管理员身份运行该bat文件。