[原]用AutoIt完成CCProxy的代理切换
Posted by bianbian on 2007-10-03 01:50
南大的VPN，进校以后访问外网就必须用代理。
这样各个软件切换代理特别麻烦，比如浏览器、QQ、MSN、旺旺、BT、FlashGet得改代理吧。
我用AutoIt3写了一个软件，能自动切换CCProxy的代理（就是使不使用二级代理）。这样，把其他软件的代理都设为127.0.0.1:8080，就是用CCProxy作为其他软件的代理服务器，然后用程序切换CCProxy的二级代理状态即可。
不用VPN的时候不使用二级代理，用了VPN的时候只要运行一下程序，把CCProxy的二级代理状态打开，其他软件就不需要切换代理了。反之也一样。非常方便。
下面是源码：
- #cs ------------------------------------------------
- AutoIt Version: 3.2.8.1
- Author: http://bianbian.sunshow.net
- Script Function:
- 切换CCProxy的代理（是否使用二级代理）.
- #ce ------------------------------------------------
- $PATH = @ProgramFilesDir & "\CCProxy"
- $EXE = $PATH & "\" & "CCProxy.exe"
- $INI = $PATH & "\" & "CCProxy.ini"
- $TT = "CCProxy 6."
- $TX = "Youngzsoft"
- ; check running
- If Not ProcessExists("CCProxy.exe") Then
- MsgBox(0, "Error", "CCProxy未运行!")
- Exit
- EndIf
- ; run it! so activate the already-running one!
- RunWait($EXE, $PATH)
- ; try kill it!
- WinClose($TT, $TX)
- WinWait("CCProxy", "是否真的关闭代理服务器")
- ControlClick("CCProxy", "是否真的关闭代理服务器", "Button1")
- ; change PROXY setting
- $set = IniRead($INI, "system", "CascadingProxy", 0)
- If $set = 0 Then
- $set = 1
- Else
- $set = 0
- EndIf
- IniWrite($INI, "system", "CascadingProxy", $set)
- ; done! restart it!
- Run($EXE, $PATH)
- ?>
遵守创作共用协议，转载请链接形式注明来自http://bianbian.org 做人要厚道
October 14th, 2007 at 09:43:40
进来做个综合算术题
答对了,oh`yeah