VB 改变IE的IP

来源:百度知道 编辑:UC知道 时间:2024/05/20 11:05:47
改变当前自己的网页IP
改变后,去这里查:
http://www.ip138.com/
例如:原来是:河南郑州。改了后:显示:上海,美国等。
无论是修改注册表,还是怎样,只要能实现效果就可以了。
具体IP可以去 代理中国(http://www.proxycn.com/)去找。
用VB做到的,另加100

回某些人:。vb实现的是更改代理ip。你们知道个屁。楼主的意思是通过已得到的代理ip来自动更改。。难道你是傻子。多个代理ip。要手动一个改。。不会就不要叫。。看你就不会写吧。有本事就把代码写出来。
还过滤。。你的意思是通过数据包来操作。。还过滤过滤。还不是通过几个函数。要么就给出代码。没本事就别叫叫。

呵呵。搞笑。。楼上的不是vb做不到。是你不会vb。没学过。你就不要乱说,。懂吗。vb可以实现。

可将几个api函数放在模块中。写成public
'/// 代理

Private Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long
Private Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Private Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, lpData As Any, ByVal cbData As Long) As Long ' Note that if you declare the lpData parameter as String, you must pass it By Value.
Private Const REG_DWORD As Long = 4
Private Const REG_SZ = 1
Private Const HKEY_CURRE