How to block your IP from Skype Resolvers | Block & Unblock |

[TheBoss]

How to block your IP from Skype Resolvers | Block & Unblock |
1. Paste the code you want into notepad.
2. Save as a .vbs file
3. Run the .vbs by double clicking, done!
4. For installing the patch:
4a. Go to Tools> Options> Advanced>
Connections:
4b. Enter these details:
4bi. Proxy Protocol: Socks5
4bii. Host: 127.0.0.1
4biii. Port: 9050
4c. UNCHECK port 80 and 443
4ci.http://i.imgur.com/WtG9FKS.png
4cii. Enter port 9050 for incoming.
4d. Save the changes and restart Skype.
============================================
C O D E
============================================
Hide your IP Patch
============================================
Set objShell = WScript.CreateObject("WScript.Shell")
ss= objShell.RegRead ("HKEY_CURRENT_USER\Software\Skype\Phone\SkypePath ")
ss= """" + ss + """"
'Add Block rule
objShell.run "netsh advfirewall firewall add rule name=""SkypeBlockTCP"" dir=out action=block program=" + ss + " enable=yes protocol=any profile=any"
'Add Allow rule
objShell.run "netsh advfirewall firewall add rule name=""SkypeAllowToProxy"" dir=out action=allow program=" + ss + " enable=yes remoteip=127.0.0.1"
'Turn On firewall
objShell.run "Netsh advfirewall set allprofiles state on"
msgbox "Skype is blocked from resolvers..."
===========================================
Remove Patch
===========================================
Set objShell = WScript.CreateObject("WScript.Shell")
objShell.run "netsh advfirewall firewall delete rule name=""SkypeBlockTCP"""
objShell.run "netsh advfirewall firewall delete rule name=""SkypeAllowToProxy"""
msgbox "Skype is no longer blocked from resolvers..."
===========================================
E N D
===========================================

Enjoy![/align]