Changer le nom du pc ( en 4 ligne ) !!!!!

Soyez le premier à donner votre avis sur cette source.

Snippet vu 14 520 fois - Téléchargée 41 fois

Contenu du snippet

La manière la plus simple de changer le nom du PC

Source / Exemple :


dim Modif = createobject("WScript.shell")
Modif.regWrite "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\ComputerName\ActiveComputerName", "NouveauNom"
Modif.regWrite "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\ComputerName\ComputerName", "Nouveau Nom"

Conclusion :


Et c'est tout !!!
Attention : si vous êtes en réseau (local), il ne fonctionnera plus, car le nom de votre pc sera changé.
Il suffit alors de le reconfigurer !

A voir également

Ajouter un commentaire

Commentaires

Messages postés
19
Date d'inscription
mardi 6 juillet 2004
Statut
Membre
Dernière intervention
9 novembre 2007

Un trojan en VB.... pauv' gars !

break
nop
Messages postés
12
Date d'inscription
samedi 30 juin 2001
Statut
Membre
Dernière intervention
17 janvier 2006

Utile pour mon trojan, je prend la source.........Merci

end Sub
Messages postés
962
Date d'inscription
samedi 19 janvier 2002
Statut
Membre
Dernière intervention
2 août 2010
1
Ben la c sur 4 lignes dah ,fo juste ecrire dans le registre!

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.