Gros probleme WINDOW
Résolu/Fermé
david7777777
Messages postés
74
Date d'inscription
lundi 24 mars 2008
Statut
Membre
Dernière intervention
30 juin 2009
-
26 mai 2008 à 18:51
david7777777 Messages postés 74 Date d'inscription lundi 24 mars 2008 Statut Membre Dernière intervention 30 juin 2009 - 8 juin 2008 à 12:35
david7777777 Messages postés 74 Date d'inscription lundi 24 mars 2008 Statut Membre Dernière intervention 30 juin 2009 - 8 juin 2008 à 12:35
A voir également:
- Gros probleme WINDOW
- Window movie maker - Télécharger - Montage & Édition
- Problème démarrage windows 10 - Guide
- Comment télécharger window 10 gratuitement ? - Accueil - Mise à jour
- Window live mail - Télécharger - Mail
- Window média player - Télécharger - Lecture
2 réponses
lucas490
Messages postés
158
Date d'inscription
vendredi 28 mars 2008
Statut
Membre
Dernière intervention
7 décembre 2012
16
26 mai 2008 à 19:07
26 mai 2008 à 19:07
Tu as un cheval de Troie s'est un programme qui permet à quelqu'un d'autre de controler ton ordi alors pour être sur qu'il ne t'embête plus il faut formater, installer un autre anti-virus que celui que tu as en ce moment
david7777777
Messages postés
74
Date d'inscription
lundi 24 mars 2008
Statut
Membre
Dernière intervention
30 juin 2009
8 juin 2008 à 12:35
8 juin 2008 à 12:35
bonjour j ai trouver la solution ! ce qu il faut : crée un fichier ! ouvrez votre bloc note > ecrivez dedant :
' ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
' Script VBS pour les problèmes WMI
' https://support.microsoft.com/en-us/help/319101
' script de ~Jean-Marc~ © 2004 http://doc.jm.perso.orange.fr
' ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
On Error Resume Next
Dim shell, fso, WinSysDir, RepoPath, RepoPath2
Set shell = WScript.CreateObject("WScript.Shell")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
' Arrêt du service Infrastructure de gestion windows
set scriptState = shell.Exec("%comspec% /c echo o|net stop winmgmt")
While (scriptState.Status = 0)
WScript.Sleep(100)
Wend
'Lire le répertoire windows
WinSysDir = Shell.RegRead("HKLM\Software\Microsoft\Windows NT\CurrentVersion\SystemRoot")
' Créer le chemin d'effacement des fichiers du repository
RepoPath = WinSysDir & "\System32\Wbem\Repository\*.*"
RepoPath2 = WinSysDir & "\System32\Wbem\Repository\FS\*.*"
'Effacement du contenu du répertoire repository
fso.DeleteFile RepoPath, true
fso.DeleteFile RepoPath2, true
fso.DeleteFolder RepoPath, true
'Configuration de Infrastructure de gestion windows en automatique (config d'origine XP)
shell.Exec("sc config winmgmt start= auto")
'fin
wscript.echo "Fin de la réparation." & vbcrlf & "Redémarrer le PC."
Set fso = Nothing
Set scriptState = Nothing
Set shell = Nothing
Wscript.quit
puis enregistrez le sous ce nom : WMI_Repair.vbs ! fermez le puis cliquer dessus ! il doit vous maitre un message qui dit que c est la fin de la reparation ! REDEMARREZ VOTRE ORDINATEUR ! et votre pare feu marchera ! voila !
' ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
' Script VBS pour les problèmes WMI
' https://support.microsoft.com/en-us/help/319101
' script de ~Jean-Marc~ © 2004 http://doc.jm.perso.orange.fr
' ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
On Error Resume Next
Dim shell, fso, WinSysDir, RepoPath, RepoPath2
Set shell = WScript.CreateObject("WScript.Shell")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
' Arrêt du service Infrastructure de gestion windows
set scriptState = shell.Exec("%comspec% /c echo o|net stop winmgmt")
While (scriptState.Status = 0)
WScript.Sleep(100)
Wend
'Lire le répertoire windows
WinSysDir = Shell.RegRead("HKLM\Software\Microsoft\Windows NT\CurrentVersion\SystemRoot")
' Créer le chemin d'effacement des fichiers du repository
RepoPath = WinSysDir & "\System32\Wbem\Repository\*.*"
RepoPath2 = WinSysDir & "\System32\Wbem\Repository\FS\*.*"
'Effacement du contenu du répertoire repository
fso.DeleteFile RepoPath, true
fso.DeleteFile RepoPath2, true
fso.DeleteFolder RepoPath, true
'Configuration de Infrastructure de gestion windows en automatique (config d'origine XP)
shell.Exec("sc config winmgmt start= auto")
'fin
wscript.echo "Fin de la réparation." & vbcrlf & "Redémarrer le PC."
Set fso = Nothing
Set scriptState = Nothing
Set shell = Nothing
Wscript.quit
puis enregistrez le sous ce nom : WMI_Repair.vbs ! fermez le puis cliquer dessus ! il doit vous maitre un message qui dit que c est la fin de la reparation ! REDEMARREZ VOTRE ORDINATEUR ! et votre pare feu marchera ! voila !