PDA

View Full Version : ساخت فیلتر شکن



Rasul75
سه شنبه 31 تیر 1393, 12:34 عصر
سلام دوستان
کسی سورس فیلترشکن با ویژوال بیسیک رو نداره؟
اصلا میشه باش فیلترشکن ساخت؟؟

Dr Saeed
سه شنبه 31 تیر 1393, 16:28 عصر
سلام دوستان
کسی سورس فیلترشکن با ویژوال بیسیک رو نداره؟
اصلا میشه باش فیلترشکن ساخت؟؟


این جور سوال ها تو انجمن ممنوعه :)

امید وارم ازش استفاده درست شه

برای قسمت general

Dim Reg As Object

برای کانکت کردن

Private Sub Command1_Click()Set Reg = CreateObject("wscript.shell")
Reg.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre ntVersion\Internet Settings\ProxyServer", "187.111.192.3:8080", "REG_SZ"
Reg.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre ntVersion\Internet Settings\ProxyEnable", "1", "REG_DWORD"
Reg.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre ntVersion\Internet Settings\ProxyHttp1.1", "1", "REG_DWORD"
End Sub

برای دیسکانکت کردن
Private Sub Command2_Click()Set Reg = CreateObject("wscript.shell")
Reg.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre ntVersion\Internet Settings\ProxyServer", "", "REG_SZ"
Reg.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre ntVersion\Internet Settings\ProxyEnable", "0", "REG_DWORD"
Reg.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre ntVersion\Internet Settings\ProxyHttp1.1", "0", "REG_DWORD"
End Sub





در ضمن این نوع ای پی ها فقط سایت فیسبوک رو باز میکنه و سایت دیگه ای باز نمیشه :) موفق باشید

Rasul75
سه شنبه 31 تیر 1393, 17:36 عصر
ممنون
ولی کاش گسترده تر بود برنامش