[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[网络连接] 批处理能写添加IE代理的代码吗?

就是ie浏览器,自动加个代理比如66.66.66.66 断口8080
怎么写??批处理 VBS都行

我要单机拨号连接的代理,不是区域网!!!!!!

[ 本帖最后由 sexfio 于 2009-4-24 09:22 编辑 ]

谢谢楼上的,你的14楼的代码可以用呀,呵呵!
不过问下你12楼发的那是什么代码呀,运行后提示1或2,1那里是乱码,看不清是写的啥,2写的是VPN
我1和2都选过,然后填了IP和port,可结果貌似什么都没出现,就给我返回几个长串数字
能说下怎么用嘛?还有我运行了没什么反应不会有事吧

TOP

  1. @echo off
  2. setlocal enabledelayedexpansion
  3. ::3c标 01计数器  03(01)是(否)启用代理 FF行偏移量&h10(ip+prot字符串长度,变量cs)
  4. set "head=3C0000000100000003000000FF000000"
  5. set "regp="HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Connections""
  6. set ip=1.1.1.1:80
  7. ::上边设置代理IP与端口
  8. set name=ADSL
  9. ::上边设置宽连接名称
  10. call :binary 0
  11. reg add %regp% /v %name% /t REG_BINARY /d %head%%hex% /f
  12. pause
  13. goto :eof
  14. :binary
  15. set var=!ip:~%cs%,1!||set hex=%hex:.=2E%&& set hex=!hex::=3A!&&goto :eof
  16. if %var%. GEQ 0 set /a var+=30
  17. set hex=%hex%%var%
  18. set /a cs+=1
  19. call :binary %cs%
  20. goto :eof
复制代码
1

评分人数

TOP

楼上的高手,请问代理IP和端口号要放在你的代码的那一行呀
我是复制党,找了半天看不明白呀,麻烦说明 谢谢

TOP

原帖由 tireless 于 2009-4-23 00:37 发表
2楼的代码我测试过多次,是无效的。

因为 HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Connections 下的值是二进制的,批处理没办法修改吧。所以可以先手工设置ie代理,然后 ...
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. ::3c标 01计数器  03(01)是(否)启用代理 FF行偏移量&h10(ip+prot字符串长度,变量cs)
  4. set "head=3C0000000100000003000000FF000000"
  5. set "regp="HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Connections""
  6. set "pbkp=%ALLUSERSPROFILE%\Application Data\Microsoft\Network\Connections\Pbk"
  7. call :input
  8. call :binary 0
  9. echo %head% %hex%x
  10. reg add %regp% /v %name% /t REG_BINARY /d %head%%hex% /f
  11. pause
  12. goto :eof
  13. :input
  14. for /f "delims=[]" %%i in ('findstr /b /e \[.*\] "%pbkp%\rasphone.pbk"') do (
  15. set/a num+=1
  16. set Connections!num!=%%i
  17. echo !num!.%%i
  18. )
  19. set/p name=选择宽带连接:
  20. if not defined Connections%name% goto input
  21. set name=!Connections%name%!
  22. set/p ip=代理服务器地址IP Address OR Domain Name:
  23. echo %ip%|findstr /b /e [1-9][0-9]*\.[0-9]*\.[0-9]*\.[0-9]*||call :toip||cls&&goto input
  24. set/p port=端口Port:
  25. set ip=%ip%:%port%
  26. echo %ip%|findstr /b /e [1-9][0-9]*\.[0-9]*\.[0-9]*\.[0-9]*\:[0-9]*||cls&&goto input
  27. goto :eof
  28. :binary
  29. set var=!ip:~%cs%,1!||set hex=%hex:.=2E%&& set hex=!hex::=3A!&&goto :eof
  30. if %var%. GEQ 0 set /a var+=30
  31. set hex=%hex%%var%
  32. set /a cs+=1
  33. call :binary %cs%
  34. goto :eof
  35. :toip
  36. for /f "tokens=2 delims=[]" %%i in ('ping %ip%  /n 1^|findstr \[.*\]') do set ip=%%i
  37. :if not errorlevel 0 goto :eof
  38. goto :eof
复制代码

[ 本帖最后由 everest79 于 2009-5-4 00:51 编辑 ]

TOP

回复 10楼 的帖子

能把你的IE选项中“连接”选项卡的内容截图贴出来看看么?
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

是啊,怎么写啊,我好想知道啊,我百度了十几天都没有找到啊啊啊啊啊啊啊

TOP

回复 8楼 的帖子

你到底要设置什么代理?请在顶楼更新需求!
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

是啊,实验了,是局域网的代理
怎么写拨号连接的代理呀

TOP

原来 2 楼和 6 楼设置的是局域网的代理,对于拨号连接用户无效。

TOP

  1. wmic path win32_proxy Where ServerName='jin224' call setproxysetting "8080","192.168.1.59"
复制代码
一个例子而已

[ 本帖最后由 lxzzr 于 2009-4-23 01:52 编辑 ]

TOP

回复 4楼 的帖子

2楼的代码我测试过多次,是无效的。

因为 HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Connections 下的值是二进制的,批处理没办法修改吧。所以可以先手工设置ie代理,然后把这个项导出来,下次要切换时再导入......

这个代理可以访问: 88.191.62.207,端口 3128
要翻墙的网站: http://psydk.org/PngOptimizer.php

[ 本帖最后由 tireless 于 2009-4-23 00:45 编辑 ]

TOP

回复 3楼 的帖子

能说说你的详细测试步骤么?我明天到公司按照你的步骤测一下。
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 2楼 的帖子

经测试,无效。

可以先导出 HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Connections,然后手工设置代理后,再导出。

TOP

  1. @echo off
  2. rem 设置代理地址
  3. set ProxyAddr=192.168.0.1
  4. rem 设置代理端口
  5. set ProxyPort=8080
  6. reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings" /v ProxyEnable /t REG_DWORD /d 1 /f
  7. reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings" /v ProxyServer /d %ProxyAddr%:%ProxyPort% /f
  8. rem 重启IE使代理生效
  9. taskkill /f im iexplore.exe
  10. start iexplore.exe bbs.bathome.net
复制代码
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表