PortailPortail  AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  ConnexionConnexion  

Partagez | 
 

 Désinstaller/supprimer MàJ Windows, contenu du Prefetch, poi

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
poitevine
Apprenti expert


Féminin Nombre de messages : 204
Age : 38
Localisation : Vendée
Réputation : 0
Date d'inscription : 11/10/2005

Votre configuration PC
Processeur, RAM: Intel Centrino duo, 1024 Mo RAM, 1666 MHz
Carte graphique, disque dur: NVIDIA Ge Force Go 7300, ST98823A (74 Go, IDE)
Système d'exploitation, service pack: XP Pro SP3

MessageSujet: Désinstaller/supprimer MàJ Windows, contenu du Prefetch, poi   Mar 5 Fév - 9:02

(suite et fin du titre : points de restauration et compresser DD ?)

Bonjour, j'ai entendu dire qu'il était possible au bout d'un certain moment de supprimer (ou du moins désinstaller ?) les mises à jour Windows si celui-ci continue à normalement bien fonctionner : je parle des MàJ C:\WINDOWS\$NtUninstallKB******$, sauf celui $hf_mig$, que paraît-il on ne doit absolument pas toucher.

- Il y en a quand même de plusieurs sortes, même si ces MàJ commencent toutes par $NtUninstall et finissent pas $, lesquelles précisément à supprimer ? :

* les KB à 7 chiffres tout court (les + nombreuses),
* les KB finissant en + par _WM avec 1 ou 2 chiffres,
* les KB finissant en + par -v2,
* la XPSEPSCLP,
* la Wudf + 5chiffres,
* la Wdf + 5 chiffres,
* la wmp + 2 chiffres,
* la WMFDist + 2 chiffres,
* la winusb + 4 chiffres,
* et la MSCompPackV1,

- Le contenu du dossier C:\WINDOWS\Prefetch peut-il aussi être vidé sans mal ?

- Est-il préférable de faire ce genre de suppressions en passant par CCleaner ou directement ?

- Où et comment supprimer les points de restauration en trop ? Pour ne pas encombrer inutilement mon DD principal car je sais que les PR sont assez lourds (j'aimerais au moins garder celui du 20 Décembre, quand mon PC est revenu tout Windows refait de chez le réparateur, et 2 ou 3 autres tout de même > j'ai dû en arriver là, pas le choix, trop de dysfonctionnements car trop de fichiers trop corrompus et irréparables)

- J'ai vu aussi en faisant clic droit > Propriétés sur mon DD principal (C) la possibilité de compresser le lecteur pour augmenter l'espace disque disponible (case non cochée, mais cette possibilité n'existe pas sur mon autre DD nommé D), mais cela ne risque-t-il pas d'abîmer voire à nouveau corrompre et rendre irréparables tous les dossiers et fichiers, tous types qu'ils soient ? Faut-il compresser tout le DD C ou seulement quelques dossiers et fichiers seulement (tous types confondus) ?

Ne voulant pas faire de bêtises préjudiciables pour mon PC, je me renseigne bien avant de tenter quoique ce soit, pour être sûre. J'aimerais surtout pouvoir augmenter l'espace libre de C

Voir ma signature pour les renseignements concernant mon PC.

Merci svp !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Richard1
Modérateur


Masculin Nombre de messages : 4274
Age : 68
Localisation : Montréal-Canada
Réputation : 15
Date d'inscription : 16/05/2005

Votre configuration PC
Processeur, RAM:
Carte graphique, disque dur:
Système d'exploitation, service pack:

MessageSujet: Re: Désinstaller/supprimer MàJ Windows, contenu du Prefetch, poi   Mer 6 Mar - 23:39

Bonjour AMHI poitevine,

Supprime toutes ces mises-à-jour. Si une ne doit pas être supprimée, le système te le dira. (Il y a des mises-à-jour qu'on ne peut supprimer.) Il n'y a pas de danger à supprimer ce que tu montres.
Ensuite, va a Windows Update et regarde si tu as de nouvelles mises-à-jour.

Ne compresse pas les données de ton disque : c'est ma suggestion.

Points de restauration. Si tout est ok, pourquoi garder des points de restauration ? SI TOUT EST OK, décoche les points de restauration et ils seront tous supprimés. Ensuite, crée un nouveau point de restauration pour la date d'aujourd'hui.
En passant, dis-toi bien qu'on ordi, ça ne mord pas...

Bien AMHIcalement
Richard
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Richard1
Modérateur


Masculin Nombre de messages : 4274
Age : 68
Localisation : Montréal-Canada
Réputation : 15
Date d'inscription : 16/05/2005

Votre configuration PC
Processeur, RAM:
Carte graphique, disque dur:
Système d'exploitation, service pack:

MessageSujet: Re: Désinstaller/supprimer MàJ Windows, contenu du Prefetch, poi   Jeu 7 Mar - 21:12

Bonjour AMHI poitevine,

J'ai repensé à ce que je t'ai dit et, pour te simplifier la vie, je vais te donner un "outil" pour supprimer facilement toutes ces $NTuninstallKB***.

Je te donne ici un script. Sélectionne-le AU COMPLET.

Ensuite, ouvre le Bloc-Note de ton ordi et colle le script.

Sauvegarde sur ton bureau le fichier bloc-note sous le nom: supp.vbs (dans le tableau de la sauvegarde, assures-toi de mettre: tous les fichiers et non pas "fichier TXT seulement".

Ensuite, désactive ton antivirus et ton pare-feu.

Ensuite, va sur le bureau et clic sur le fichier supp.vbs

Sois patient. (2-5 minutes), il retracera tous les fichiers en question et te montrera le résultat de la recherche dans un tableau simple. Mets un crochet en haut (pour dire que tu veux tout supprimer) et clic en bas sur Supprimer.

Ce petit script supprimera correctement tous les fichiers en question.

Ensuite, réactive ton antivirus et ton pare-feu.

Bonne journée et donne des nouvealles.

Richard1

Voici le script en question. Il faut TOUT LE SÉLECTIONNER. (COPIE EN INCLUANT LA BARRE DE POINTILLÉS CI-DESSOUS) et INCLUS AUSSI LA BARRE DE POINTILLÉS À LA FIN :



' ----------------------------------------------------------
' Script de suppression des dossiers de désinstallation de
' hotfixes sous Windows 2000, XP, 2003 ...
'
' Syntaxe: delUninstall
'
'
' JC BELLAMY © 2003-2005
' Mises à jour :
' 16/08/2005 : ajout de la suppression des fichiers log
' 11/03/2008 : ajout d'affichage de la date des dossiers
' ----------------------------------------------------------
On error resume next
Const SW_HIDE=0
Const SW_SHOWNORMAL=1
ColorBack="""#FFFFD8"""
BGProgressON="blue"
BGProgressOFF=ColorBack
Const HKEY_CURRENT_USER = &H80000001
const HKEY_LOCAL_MACHINE = &H80000002
Const REG_SZ = 1
Const REG_EXPAND_SZ = 2
Const REG_BINARY = 3
Const REG_DWORD = 4
Const REG_MULTI_SZ = 7

Dim shell,fso,oIE,NbHF,HFFolders(),HFKeys(),HFarticle()
Set shell = WScript.CreateObject("WScript.Shell")
Set fso = WScript.CreateObject("Scripting.FileSystemObject")

shell.Popup "Veuillez patienter quelques instants ...",3,"Recherche des dossiers de correctif et service pack",64
' Autoriser le contenu actif à s'exécuter dans les fichiers de la zone Ordinateur local
LockDown="HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_LOCALMACHINE_LOCKDOWN\"
Keysec1=LockDown & "iexplore.exe"
Oldvalue1=shell.RegRead(Keysec1)
If Err.Number<>0 Then
Err.Clear
Oldvalue1=1
End If
shell.RegWrite Keysec1,0,"REG_DWORD"

Keysec2=LockDown & "Settings\LOCALMACHINE_CD_UNLOCK"
Oldvalue2=shell.RegRead(Keysec2)
If Err.Number<>0 Then
Err.Clear
Oldvalue2=0
End If
shell.RegWrite Keysec2,1,"REG_DWORD"

ficInit = GetPath() & "deluninstall.html"
Titre="Suppression des dossiers de désinstallation de hotfixes"
Set ts = fso.CreateTextFile(ficInit, True)
ts.writeline header
ts.writeline ScriptBtn


Windir=shell.ExpandEnvironmentStrings("%systemroot%")
Key="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\"
LastKey="HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Applets\Regedit\LastKey"
ts.writeline "Dossier système : " & Windir & ""
ts.writeline "
"
ts.writeline ""
ts.writeline ""
ts.writeline ""
ts.writeline ""

set fWindir=fso.GetFolder(Windir)
set collf=fWindir.SubFolders
Index=0
For each subf in collf
fName=subf.Name
fDate=subf.DateCreated
Sdate=Cadrage(Day(fDate)) & "/" & Cadrage(Month(fDate)) & "/" & Year(fDate)
lName=len(fName)
Uninst=false
Suffixe=""
If InStr(1,fName,"$",vbTextCompare)=1 then Suffixe=GetKeyFromFolder(fName)
If Suffixe<>"" Then
Index=Index+1
redim preserve HFFolders(Index),HFKeys(Index),HFarticle(Index)
NumArticle=""
HFFolders(Index-1)=fName
HFKeys(Index-1)=Suffixe
ts.writeline ""
HelpLink=Shell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\" & Suffixe & "\HelpLink")
If Err.number=0 Then
p=InstrRev(HelpLink,"=")
If p>0 Then NumArticle=Mid(HelpLink,p)
ts.writeline ""
else
Err.Clear
ts.writeline ""
End If
HFarticle(Index-1)=NumArticle
ts.writeline ""
ts.writeline ""
ts.writeline ""
ts.writeline ""
end if
Next
NbHF=Index
ts.writeline "
Suppr.Lien MSDNDossierDateClef BDR
Tout (dé)selectionner"
ts.writeline "
 "
ts.writeline "
 "
ts.writeline "
 
"
ts.writeline "
MSDN " & Numarticle & " " & fName & "" & SDate & "" & Suffixe & "
"
ts.writeline ""
ts.writeline ""
ts.writeline "
"
ts.writeline ProgressBar
ts.writeline "JCB © 2008"
ts.writeline ""
ts.close
codeRet=RunIE(640,480)
If coderet<=0 Then
If coderet=0 Then oIE.Quit
wscript.quit
end if
NbDel=0
For i = 1 To NbHF
Action=eval("oIE.document.strategyForm.CB" & i & ".checked")
Taux=i*100/NbHF
If Action Then
NbDel=NbDel+1
fso.DeleteFolder Windir & "\" & HFFolders(i-1),true
LogFile= Windir & "\" & HFKeys(i-1) & ".log"
If fso.FileExists(LogFile) Then fso.DeleteFile LogFile,true
shell.RegDelete Key & HFKeys(i-1) & "\"
msgerr=""
If err.number<>0 Then
msgerr=" Erreur suppression"
err.clear
End If
SetProgress "Suppr." & HFarticle(i-1) & msgerr,taux
else
SetProgress "      ",Taux
End If
Next
oIE.Quit
If NbDel>1 Then pluriel="s" else pluriel=""
wscript.echo NbDel & " désinstallation" & pluriel & " de hotfixes supprimée" & pluriel
' Restauration état
shell.RegWrite Keysec1,OldValue1,"REG_DWORD"
shell.RegWrite Keysec2,OldValue2,"REG_DWORD"
Wscript.quit

'--------------------------------------------------------------------
Function RunIE(W,H)
RunIE=1
' Ouverture d'Internet Explorer
Set oIE = WScript.CreateObject("InternetExplorer.Application")
Do While (oIE.Busy)
WScript.Sleep 100
Loop
oIE.navigate ficInit
oIE.Height = H
oIE.Width = W
oIE.MenuBar = 0
oIE.ToolBar = 0
oIE.StatusBar = 1
oIE.Top=(oIE.Document.ParentWindow.Screen.Height-oIE.Height)/2
oIE.Left=(oIE.Document.ParentWindow.Screen.Width-oIE.Width)/2
oIE.Visible = 2

shell.AppActivate Titre

' Attente d'action sur le bouton ou fermeture de la fenêtre
Do
WScript.Sleep 100
Selection=oIE.Document.Script.CheckSelect()
If Selection<>0 Then
oIE.Document.Script.ResetSelect
If oIE.document.strategyForm.allselect.checked Then StrFlag="true" else StrFlag="false"
For i = 1 To NbHF
execute("oIE.document.strategyForm.CB" & i & ".checked=""" & StrFlag & """")
Next
End If
FlagParam=oIE.Document.Script.CheckParam()
If FlagParam<>0 Then
param=oIE.Document.Script.GetParam()
oIE.Document.Script.ResetParam
typeobj=left(param,1)
path=mid(param,2)
Select Case typeobj
Case "1"
Shell.run "explorer /n,/root," & Windir & "\" & path & "\",1
Case "2"
Shell.RegWrite LastKey, Key & path
oIE.Visible = 0
shell.Run "REGEDIT",1,true
oIE.Visible = 1
End Select
End If
Check=oIE.Document.Script.CheckVal()
Loop While (Check = 0)
' Si on ferme directement IE sans passer par un bouton,
' cela provoque une erreur qui est détectée et alors
' on quitte le script
If Err <> 0 Then
RunIE=-1
Err.Clear
else
If Check=-1 Then RunIE=0
end if
End Function
'--------------------------------------------------------------------
' Fonction de récupération du répertoire courant
Function GetPath()
Dim path
path = WScript.ScriptFullName
GetPath = Left(path, InStrRev(path, "\"))
End Function
'--------------------------------------------------------------------
Function Header
s=""
s=s & "" & Titre & "" & VBCRLF
s=s & ""
header=s
End Function
'--------------------------------------------------------------------
Function ScriptBtn
s=" " & VBCRLF
s=s & "" & VBCRLF
s=s & "
"
ScriptBtn=s
End Function
'--------------------------------------------------------------------
Function ProgressBar
s=s & "" & VBCRLF
s=s & "
" & VBCRLF
s=s & "" & VBCRLF
s=s & "" & VBCRLF
For indl = 1 To 20
s=s & "" & VBCRLF
Next
s=s & "
    
" & VBCRLF
s=s & "
      
" & VBCRLF
ProgressBar=s
End Function
'--------------------------------------------------------------------
Sub SetProgress(lib,taux)
set objLib=oIE.Document.All("lib")
set objTab=oIE.Document.All("tabprog")
objTab.border="1"
k=int(taux/5)
objLib.innerhtml=lib
for numc= 1 to 20
set objCell=oIE.Document.All("c" & numc)
if numc<=k then className="progressON" else className="progressOFF"
objCell.className=className
next
End Sub
'--------------------------------------------------------------------
Function GetKeyFromFolder(folder)
GetKeyFromFolder=""
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\default:StdRegProv")
strKeyPath = "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall"
oReg.EnumKey HKEY_LOCAL_MACHINE,strKeyPath,arrSubKeys
trouve=false
For Each subkey In arrSubKeys
oReg.GetStringValue HKEY_LOCAL_MACHINE,strKeyPath & "\" & subkey,"UninstallString",UninstallString
If InStr(1,UninstallString,Folder,vbTextCompare)>0 Then
trouve=true
GetKeyFromFolder=subkey
exit function
End If
Next
End Function
'--------------------------------------------------------------------
Function Cadrage(n)
If n<=9 Then Cadrage="0" & CStr(n) Else Cadrage= CStr(n)
End Function
'--------------------------------------------------------------------
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Contenu sponsorisé




MessageSujet: Re: Désinstaller/supprimer MàJ Windows, contenu du Prefetch, poi   Aujourd'hui à 18:11

Revenir en haut Aller en bas
 
Désinstaller/supprimer MàJ Windows, contenu du Prefetch, poi
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
Le forum d'Aide Informatique pour tous :: Systèmes d'exploitation :: windows 2000 et Windows XP-
Sauter vers: