Résolu Important

Nyzah

Premium
Inscription
1 Octobre 2012
Messages
1 811
Réactions
540
Points
4 846
Bonjours/Bonsoir , ces pour savoir si quelqun aurait un logiciel pour changer de ip ou cacher mon ip car je me suis fait infecter il y a 1 semaine et je me fait ddos par des gamin . Merci
 

#TeamDz&FFF

Membre
Inscription
20 Octobre 2012
Messages
993
Réactions
260
Points
1 803
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 "Votre IP est protégée"



COPIE SA DANS BLOC NOTE ET ENREGISTRE LE EN .vbs
 
Haut