实用的知识教程
电脑知识大全 > 操作系统 >  正文

windows7下共享网络连接至WLAN的批处理(必须以管理

2020-01-13 06:02:45 来源: 电脑知识大全 记者 电脑知识大全

  把以下代码复制到记事本,选择另存为,把文件类型选择为所有文件,文件名命名为以bat为后缀的文件(***.bat)。

  必须以管理员身份运行!

  开启网络共享的方法:

 

  还不行就改ip试试:

 

  代码部分:

  
复制代码代码如下:
@echo off
  :head
  cls
  echo.
  echo -------------------------------------------------------------------------------
  echo仅win7可用,请以管理员身份运行,未以管理员身份运行请退出重新以管理员身份运行
  echo --by HKKKYY
  echo -------------------------------------------------------------------------------
  echo 请选择 A,B,C,D,W:
  choice /n /c ABCDW /m "A.配置无线路由器,B读取无线路由配置,C.打开无线路由器,D.退出程序,W.帮助信息"
  if errorlevel 5 goto help
  if errorlevel 4 goto exit
  if errorlevel 3 goto start
  if errorlevel 2 goto load
  if errorlevel 1 goto creat
  :error
  echo.
  echo 不存在配置信息或配置错误,请重新配置路由器
  :help
  echo.
  echo 帮助信息!
  echo 开启internet共享:
  echo.
  echo 1.打开网络和共享中心
  echo 2.左边的更改适配器设置
  echo 3.在连接到internet的网络适配器上右击
  echo 4.选择 属性
  echo 5.选择最右边的 共享
  echo 6.允许其他网络用户连接 打勾
  echo 7.选择无线网络连接*(Microsoft Virtual WiFi Miniport Adapter)
  echo 8.一路确认,设置完成!
  echo.
  echo 更多问题,请发送至邮箱:183229003@qq.com
  pause
  goto head
  :creat
  echo ---------------------------------------------
  set /p ssid=请输入无线网络名称,按回车结束:
  set /p key=请输入无线网络密码,按回车结束(密码为8位及以上的数字或字母):
  echo %ssid%.%key% >wlan.inf
  goto load
  :load
  if not exist wlan.inf goto error
  for /f "delims=. tokens=1-2" %%a in (wlan.inf) do set ssid=%%a & set key=%%b
  netsh wlan set hostednetwork allow %ssid% %key%
  if not errorlevel 0 goto error
  echo 路由配置成功,是否打开无线路由功能?(Y/N)
  choice /n /c YN /m ":"
  if errorlevel 2 goto head
  if errorlevel 1 goto start
  :start
  netsh wlan start hostednetwork
  if errorlevel 1 echo 请重新配置路由并检查您的计算机是否有虚拟无线网卡
  if errorlevel 0 goto now
  goto head
  :now
  cls
  echo.
  echo 无线路由开启功能已开启。。。
  echo.
  echo ---------------------------------------------------------
  echo ssid为%ssid%,密码为%key%
  echo --by HKKKYY
  echo ---------------------------------------------------------
  echo.
  choice /n /c TSX /m "关闭无线路由功能请按T,设置定时关机请按S,网络连通测试请按X"
  if errorlevel 3 goto test
  if errorlevel 2 goto shutdown
  if errorlevel 1 goto stop
  :stop
  netsh wlan stop hostednetwork
  goto head
  :shutdown
  set /p time=请输入自动关机的时长,如一小时后关机,输入3600,取消自动关机请输入0:
  if %time% equ 0 shutdown /a & goto now
  shutdown /s /t %time%
  if errorlevel 1 echo 设置失败,请确认输入正确,或者先取消此前的设置 & pause & goto now
  if errorlevel 0 echo %time%秒后关机 & pause & goto now
  :test
  cls
  @ping 218.85.157.99
  set /a ping2=%errorlevel%
  @ping 192.168.137.1
  set /a ping1=%errorlevel%
  if %ping2% neq 0 echo 您的计算机当前无法连接到internet & pause & goto now
  if %ping1% neq 0 echo 请将您当前的网络连接共享到Microsoft Virtual WiFi 网络适配器 & pause & goto now
  echo.
  echo ----------------------------------------------------------------------
  echo 网络连接正常,若还无法连接到网络,请将问题发送至邮箱:183229003@qq.com
  echo ----------------------------------------------------------------------
  pause
  goto now
  :exit

温馨提示如有转载或引用以上内容之必要,敬请将作为出处标注,谢谢合作!

相关新闻
凡注有"电脑知识大全"的稿件,均为电脑知识大全独家版权所有,未经许可不得转载或镜像;授权转载必须注明来源为"电脑知识大全",并保留"电脑知识大全"。