Précédent   Forum des professionnels en informatique > Systèmes > Windows > Windows XP
Windows XP Forum d'entraide Windows XP. Avant de poster : La F.A.Q Windows XP
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 24/07/2011, 16h31   #1
Invité de passage
 
Homme
Inscription : juillet 2011
Messages : 8
Détails du profil
Informations personnelles :
Sexe : Homme
Âge : 49

Informations forums :
Inscription : juillet 2011
Messages : 8
Points : 0
Points : 0
Par défaut administrateur avec xp

bonjour
J’ai voulu faire exécuter après regist sa ma répondu : la modification du registre a été désactivée par votre administrateur
L’administrateur c'est moi et je n'ai jamais fait ceci pour plus d'information je viens de réinstallé XP
Merci
johnny2004 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 24/07/2011, 18h09   #2
Membre Expert
 
Avatar de Guardian
 
Inscription : mars 2009
Messages : 716
Détails du profil
Informations forums :
Inscription : mars 2009
Messages : 716
Points : 1 452
Points : 1 452
C'est soit un virus, qui peut parfaitement avoir été conservé malgré la réinstallation d'XP, soit une clef altérée.

Donc, d'abord éliminer la possibilité que ce soit, comme c'est le plus souvent le cas, un virus.

Si ce n'est pas un virus, tu peux utiliser le code ci-dessous qui va corriger les clefs altérées :
C'est du VBS donc tu doit :
  1. Ouvrir le bloc-note
  2. copier le code dans le bloc-note
  3. sauvegarder le bloc-note dans un fichier repareg.vbs
Tu peux sauvegarder le fichier sur ton bureau pour plus de facilité ou ailleurs pour autant que tu puisses le retrouver et l'exécuter. (Le nom n'a pas d'importance, mais l'extension doit être .vbs)
Code VBS :
1
2
3
4
5
6
7
8
9
10
11
12
13
Set WshShell = WScript.CreateObject("WScript.Shell")
With WScript.CreateObject("WScript.Shell")

On Error Resume Next

.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools"
.RegDelete "HKCU\Software\Policies\Microsoft\Windows\System\DisableCMD"
.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr"
.RegDelete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\system\DisableTaskMgr"

End With

Mybox = MsgBox(jobfunc & enab & vbCR & "Finished!", 4096, t)
Guardian est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 24/07/2011, 21h21   #3
Invité de passage
 
Homme
Inscription : juillet 2011
Messages : 8
Détails du profil
Informations personnelles :
Sexe : Homme
Âge : 49

Informations forums :
Inscription : juillet 2011
Messages : 8
Points : 0
Points : 0
bonsoir
merci pour la reponse apres l'avoir enregistre en vbs j'en fais quoi
merci
johnny2004 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 24/07/2011, 21h29   #4
Membre émérite
 
Avatar de DOLPat®
 
Homme Patrick
Technicien maintenance
Inscription : février 2003
Messages : 425
Détails du profil
Informations personnelles :
Nom : Homme Patrick
Âge : 50
Localisation : France, Haut Rhin (Alsace)

Informations professionnelles :
Activité : Technicien maintenance
Secteur : Industrie

Informations forums :
Inscription : février 2003
Messages : 425
Points : 815
Points : 815
Bonsoir

Tu lances l'exécution du script en double-cliquant sur le nom du fichier.
__________________
À +
Pat.


Si vous avez trouvé chaussure à votre pied... euh solution à votre problème, n'oubliez pas de clôturer le sujet en le marquant comme:
¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
Delphi 2005 Édition Personnelle

Lazarus 0.9.31 r33481 FPC 2.5.1 x86_64-win64-win32/win64
DOLPat® est déconnecté   Envoyer un message privé Réponse avec citation 10
Vieux 24/07/2011, 21h37   #5
Invité de passage
 
Homme
Inscription : juillet 2011
Messages : 8
Détails du profil
Informations personnelles :
Sexe : Homme
Âge : 49

Informations forums :
Inscription : juillet 2011
Messages : 8
Points : 0
Points : 0
bonsoir
je l'ai enregistrer mes j'ai cliquer 2 fois sa n'a rien fais je l'ai juste renomer en vbs
merci
johnny2004 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 24/07/2011, 21h41   #6
Membre Expert
 
Avatar de Guardian
 
Inscription : mars 2009
Messages : 716
Détails du profil
Informations forums :
Inscription : mars 2009
Messages : 716
Points : 1 452
Points : 1 452
Tu as renommé quoi en vbs ?

Si le script a été correctement copié, sauvegardé et exécuté, tu dois avoir une fenêtre qui t'affiche le message "Finished!"
Guardian est déconnecté   Envoyer un message privé Réponse avec citation 10
Vieux 24/07/2011, 21h45   #7
Invité de passage
 
Homme
Inscription : juillet 2011
Messages : 8
Détails du profil
Informations personnelles :
Sexe : Homme
Âge : 49

Informations forums :
Inscription : juillet 2011
Messages : 8
Points : 0
Points : 0
se que ma donné ArielD je l'ai mis dans le bloc note aprés je 'lai enregistré et ensuite je l'ai renommé voila
merci
johnny2004 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 24/07/2011, 21h52   #8
Membre émérite
 
Avatar de DOLPat®
 
Homme Patrick
Technicien maintenance
Inscription : février 2003
Messages : 425
Détails du profil
Informations personnelles :
Nom : Homme Patrick
Âge : 50
Localisation : France, Haut Rhin (Alsace)

Informations professionnelles :
Activité : Technicien maintenance
Secteur : Industrie

Informations forums :
Inscription : février 2003
Messages : 425
Points : 815
Points : 815
Apparemment tu n'as pas correctement suivi les instructions...
Télécharge directement le fichier en pièce jointe, décompresse l'archive et exécutes le script.
Fichiers attachés
Type de fichier : zip RepareReg.zip (384 octets, 10 affichages)
__________________
À +
Pat.


Si vous avez trouvé chaussure à votre pied... euh solution à votre problème, n'oubliez pas de clôturer le sujet en le marquant comme:
¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
Delphi 2005 Édition Personnelle

Lazarus 0.9.31 r33481 FPC 2.5.1 x86_64-win64-win32/win64
DOLPat® est déconnecté   Envoyer un message privé Réponse avec citation 10
Vieux 24/07/2011, 22h27   #9
Invité de passage
 
Homme
Inscription : juillet 2011
Messages : 8
Détails du profil
Informations personnelles :
Sexe : Homme
Âge : 49

Informations forums :
Inscription : juillet 2011
Messages : 8
Points : 0
Points : 0
bonsoir
merci a vous tous je vous tien au courant
johnny2004 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 25/07/2011, 10h30   #10
Invité de passage
 
Homme
Inscription : juillet 2011
Messages : 8
Détails du profil
Informations personnelles :
Sexe : Homme
Âge : 49

Informations forums :
Inscription : juillet 2011
Messages : 8
Points : 0
Points : 0
Par défaut Orthographe

Bonjour
Ça c'est bien installé mais ça n'a rien fait. Si vous avez une autre solution je suis preneur
Merci à vous

en plus j'ai voulu faire une restauration systeme impossible de la faire
johnny2004 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 25/07/2011, 13h32   #11
Modérateur
 
Avatar de l_autodidacte
 
Homme Moncef
Directeur de lycée
Inscription : juillet 2009
Messages : 1 066
Détails du profil
Informations personnelles :
Nom : Homme Moncef
Âge : 56
Localisation : Tunisie

Informations professionnelles :
Activité : Directeur de lycée
Secteur : Enseignement

Informations forums :
Inscription : juillet 2009
Messages : 1 066
Points : 1 898
Points : 1 898
Envoyer un message via Skype™ à l_autodidacte
Salut;

Dans le code précité, je ne vois pas ce que représentent les termes "jobfunc" et "enab" et quelle en est l'utilité !

Un moyen pour savoir si le registre est accessible ou non est d'exécuter le code suivant et même s'il s'agit d'un virus(me semble-t-il), on aura droit à accéder au registre puisqu'il sera automatiquement ouvert à partit de ce
Code :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Option Explicit
Const Key = "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\"
Const sValue = "DisableRegistryTools"
Dim Obj, sData,WS

       sData = InputBox("Choisir une valeur :" & vbNewLine _
       & "0  =  Activer le registre" & vbNewLine _
       & "1  =  Désactiver le registre" & vbNewLine _
       & "Quel est votre choix ?",, 0)
 
  If sData <> "" And (sData <= 1 and sData>=0) Then
   Set Obj = WScript.CreateObject("WScript.Shell")
    Obj.RegWrite Key & sValue, sData, "REG_DWORD"
  Else MsgBox "Une erreur s'est produite suite à une" _
              & VbNewLine & "valeur entrée non valide. Recommencer" _
              & VbNewLine & "en mettant soit 0 soit 1.",VbCritical,"Erreur..."
        Wscript.Quit 
  End if
    If Err Then
     MsgBox Err.Description, vbOKOnly + vbCritical, "Erreur d'enregistrement","Reg Error"
    Else: MsgBox "Inscription dans le registre réussie", vbInformation,"RegWrite"
    End If
    Set Obj = Nothing
  Set WS=CreateObject("WScript.Shell")
  WS.Run "RegEdit.exe",1,True
  Set WS = Nothing
Si ce n'est pas le cas, on peut peut-être y accéder de la façon suivante:
1 - Menu Démarrer => Exécuter et tape gpedit.msc puis OK
2 - Développe l'arborescence : Stratégie Ordinateur Local\Configuration utilisateur\Modèles d'administration\Système
3 - Une fois arrivé sur Système, recherche dans le volet droit l'entrée Empêcher l'accès aux outils de modifications du registre et double-clique dessus.
4 - Dans la fenêtre qui s'affiche, choisis l'option Désactivé puis le bouton Appliquer.
5 - Ferme ensuite l'utilitaire. Un redémarrage peut s'avérer nécessaire dans ce cas.
__________________
Je me casse la tête avec mon PC qui me tape sur les nerfs!
MAIS A cœur vaillant rien d'impossible
l_autodidacte est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 25/07/2011, 14h24   #12
Invité de passage
 
Homme
Inscription : juillet 2011
Messages : 8
Détails du profil
Informations personnelles :
Sexe : Homme
Âge : 49

Informations forums :
Inscription : juillet 2011
Messages : 8
Points : 0
Points : 0
bonjour
ceci ne marche pas
Menu Démarrer => Exécuter et tape gpedit.msc puis OK

le code que tu ma donné je le place ou
merci de votre aide
je n'ai pas de virus et le disque dur et nouveau
johnny2004 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 25/07/2011, 15h29   #13
Membre du Club
 
Inscription : mars 2009
Messages : 31
Détails du profil
Informations personnelles :
Localisation : Algérie

Informations professionnelles :
Secteur : Administration - Collectivité locale

Informations forums :
Inscription : mars 2009
Messages : 31
Points : 48
Points : 48
Par défaut Salut

Décompresse ce fichier, exécute le et redémarre to pc, ça devrais marcher
Fichiers attachés
Type de fichier : rar regtools.rar (801 octets, 6 affichages)
ABDNED est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 25/07/2011, 18h36   #14
Modérateur
 
Avatar de l_autodidacte
 
Homme Moncef
Directeur de lycée
Inscription : juillet 2009
Messages : 1 066
Détails du profil
Informations personnelles :
Nom : Homme Moncef
Âge : 56
Localisation : Tunisie

Informations professionnelles :
Activité : Directeur de lycée
Secteur : Enseignement

Informations forums :
Inscription : juillet 2009
Messages : 1 066
Points : 1 898
Points : 1 898
Envoyer un message via Skype™ à l_autodidacte
Citation:
le code que tu m'a donné je le place où
Copie-le dans un éditeur de textes(Notepad ou Wordpad) puis enregistre-le sous Reg.vbs par exemple puis double-clique sur le fichier que tu viens de créer.
__________________
Je me casse la tête avec mon PC qui me tape sur les nerfs!
MAIS A cœur vaillant rien d'impossible
l_autodidacte est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 25/07/2011, 22h00   #15
Membre Expert
 
Avatar de Guardian
 
Inscription : mars 2009
Messages : 716
Détails du profil
Informations forums :
Inscription : mars 2009
Messages : 716
Points : 1 452
Points : 1 452
Citation:
Envoyé par johnny2004 Voir le message
je n'ai pas de virus
Tu ne trouves pas de virus me semble plus correct.
Sans cela tes symptômes n'ont aucune raison d'être.

Quelle version XP as-tu installée ?
(merci d'être très précis, c'est important)
Guardian est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 29/07/2011, 09h35   #16
Invité de passage
 
Homme
Inscription : juillet 2011
Messages : 8
Détails du profil
Informations personnelles :
Sexe : Homme
Âge : 49

Informations forums :
Inscription : juillet 2011
Messages : 8
Points : 0
Points : 0
bonjour
Me revoilà je ne suis pas partit coupure de internet de deux jours
Exacte pour la réponse je n’ai pas de virus il faut surtout que je dise je n’en n’ai pas trouvé
johnny2004 est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 11h50.


 
 
 
 
Partenaires

Hébergement Web