Probleme avec l' aperçu des images de windows

Probleme avec l' aperçu des images de windows - Win NT/2K/XP - Windows & Software

Marsh Posté le 03-01-2005 à 19:06:10    

Mon probleme est que quand je veux ouvrir une image de n'importe quel type elle ne s'ouvre pas... J'ai mis à jour la dll de l'aperçu des images de windows et c'est sans résultat. :??:  
 
Virus??sa m'étonnerai car j'ai scanné mon ordi au peigne fin ad aware ,kaspersky, a² ,spybot et tout ça en mis à jour....sans résultat...
 
Si cela peut vous aidez mon system d'exploitation est windows XP professionel et ma configuration niveau hardware est exellente...
 
merci de m'aider :D  
@++ :jap:  
((^(^_(^_^)_^)^))


Message édité par bo0mer le 03-01-2005 à 19:13:33
Reply

Marsh Posté le 03-01-2005 à 19:06:10   

Reply

Marsh Posté le 03-01-2005 à 20:12:19    

S'il vous plait aidez moi...


Message édité par bo0mer le 03-01-2005 à 20:14:05
Reply

Marsh Posté le 03-01-2005 à 20:55:14    

Test avec irfanview ou xnview...

Reply

Marsh Posté le 03-01-2005 à 20:58:05    

Non je veux utiliser le logiciel de windows...
(pour moi quleque chose de non réparer est un echec)

Reply

Marsh Posté le 03-01-2005 à 21:22:29    

Quand tu dis que "ca s'ouvre pas" il se passe quoi exactement ?

Reply

Marsh Posté le 03-01-2005 à 21:35:32    

Rien le sablier apparait un dixieme de seconde et rien ne se passe :(

Reply

Marsh Posté le 04-01-2005 à 18:15:38    

J'ai trouver ce script VB sur internet qui permet de remettre par défault certaine clé mais il est truffé de faute si quelqu'un pourait me le corriger ou me dire si je peux le faire manuellement...
 
Le script:
 

Citation :

' Script de restauration de l'affichage des miniatures d'images
' dans l'explorateur de Windows
' Ce défaut est du à la disparition (ou corruption) d'une clef
' dans la basse de registre :
' HKEY_CLASSES_ROOT\.xxx\ShellEx
' HKEY_CLASSES_ROOT\.xxx\ShellEx\{BB2E617C-0920-11d1-9A0B-00C04FC2D6C1}
' valeur par défaut : {7376D660-C583-11d0-A3A5-00C04FD706EC}
'
' Syntaxe:
' restorepreview
'
' JC BELLAMY © 2003
' ----------------------------------------------------------
On error Resume Next
Dim shell  
Set shell = WScript.CreateObject("WScript.Shell" )
 
Ext = array(".art",".bmp",".dib",".gif",".jfif",".jpe",".jpeg",".jpg",".png",".wmf" )
SubKey="{BB2E617C-0920-11d1-9A0B-00C04FC2D6C1}\"
Value ="{7376D660-C583-11d0-A3A5-00C04FD706EC}"
 
TestHost
 
For i = LBound(Ext) To Ubound(Ext)
 Key="HKCR\" & Ext(i) & "\ShellEx\" & Subkey  
 Erreur=false
 valdef=shell.RegRead(Key)  
 If err.number<>0 Then  
  Erreur=true
  err.clear
 Else
  If valdef<>Value Then Erreur=true
  end if
 Msg="Extension " & Ext(i)
 If Erreur Then  
  shell.RegWrite Key,Value
  Result=""
  If err.number<>0 Then  
   Result=" non"
   err.clear
   end if  
  Result=Result & " corrigée"  
 else
  Result=" OK"
  End If
 wscript.echo Msg & chr(9) & Result
 Next
Wscript.quit
'--------------------------------------------------------------------
'Sous-programme de test du moteur
'Vu les sorties générées, c'est CSCRIPT (et non pas WSCRIPT)
'qui doit être utilisé de préférence
Sub TestHost
dim rep
strappli=lcase(Wscript.ScriptFullName)
strFullName =lcase(WScript.FullName)
i=InStr(1,strFullName,".exe",1)
j=InStrRev(strFullName,"\",i,1)
strCommand=Mid(strFullName,j+1,i-j-1)
if strCommand<>"cscript" then
 rep=MsgBox( _
 "Ce script doit être lancé avec CSCRIPT" & VBCRLF & _  
 "Cela peut être rendu permanent avec la commande" & VBCRLF & _
 "cscript //H:CScript //S /Nologo" & VBCRLF & _
 "Voulez-vous que ce soit fait automatiquement?", _
 vbYesNo + vbQuestion,strappli)
 if rep=vbYes  then  
  nomcmd="setscript.bat"
  Set ficcmd = fso.CreateTextFile(nomcmd)
  ficcmd.writeline "@echo off"
  ficcmd.writeline "cscript //H:CScript //S /Nologo"
  ficcmd.writeline "pause"
  ficcmd.writeline strappli
  ficcmd.writeline "pause"
  ficcmd.close
  shell.Run nomcmd, SW_SHOWNORMAL,true
  end if
    WScript.Quit
 end if
end sub
'--------------------------------------------------------------------


 
Merci beacoup à ceux qui m'aide! :)

Reply

Marsh Posté le 04-01-2005 à 18:46:41    

Utilise la balise [code] pour mettre le script et indique sur quelle ligne ca coince.
 
Tu peux aussi déjà mettre à jour le moteur de script si ce n'est pas fait à cette adresse :
http://www.microsoft.com/downloads [...] a22b832caa

Reply

Marsh Posté le 05-01-2005 à 12:29:01    

Escuzez moi je me suis trompé c'est simplement un .vbs j'ai confondu avec vb...
Quelqu'un saurait m'aider?

Reply

Marsh Posté le 05-01-2005 à 12:32:10    

j'ai plus simple, tu clique droit sur ton image, puis tu fais ouvrir avec, et tu choisis "Apercu des images windows"
et ensutie tu coches la case : "toujours utiliser ce programme..." :)

Reply

Marsh Posté le 05-01-2005 à 12:32:10   

Reply

Marsh Posté le 06-01-2005 à 07:19:16    

oui mais quand je fait ça il ne se passe rien justement...
 
C'est bizarre personne à de reponse pour réparer ce probleme...
 
Merci à ceux qui m'aide (^_^)

Reply

Marsh Posté le 09-01-2005 à 23:58:34    

j'ai exactement le meme problème que toi!!
si tu trouves une solution, fais le moi savoir :jap: , sinon je reg


Message édité par Fuchs le 09-01-2005 à 23:58:54
Reply

Marsh Posté le 04-02-2005 à 19:03:32    

[citation=1874138,0,1][nom]bo0mer a écrit[/nom][b] Mon probleme est que quand je veux ouvrir une image de n'importe quel type elle ne s'ouvre pas... J'ai mis à jour la dll de l'aperçu des images de windows et c'est sans résultat. :??:  
 
Essaie ce lien, sous Win2K, ça marche.
Il restaure les clés HS;
http://www.bellamyjc.net/fr/explor [...] orepreview
Démarre le VBS, clique OK et ça contrôle automatiquement les clés dans la BDR, ça les corrige si il faut.
 
L'AB

Reply

Marsh Posté le 04-02-2005 à 19:14:07    

[citation=1874138,0,1][nom]bo0mer a écrit[/nom][b] Mon probleme est que quand je veux ouvrir une image de n'importe quel type elle ne s'ouvre pas... J'ai mis à jour la dll de l'aperçu des images de windows et c'est sans résultat. :??:  
Salut,
Voilà le script en texte.
Tu fais un copier coller exact sans modifier et tu enregistres en restorepreview.vbs. Vérifie bien que tu n'as pas l'extension txt, sinon, tu corriges.
Ca s'applique à Win2K Pro et WinXP Pro :
 
' ----------------------------------------------------------
' Script de restauration de l'affichage des miniatures d'images
' dans l'explorateur de Windows
' Ce défaut est du à la disparition (ou corruption) d'une clef
' dans la basse de registre :
' HKEY_CLASSES_ROOT\.xxx\ShellEx
' HKEY_CLASSES_ROOT\.xxx\ShellEx\{BB2E617C-0920-11d1-9A0B-00C04FC2D6C1}
' valeur par défaut : {7376D660-C583-11d0-A3A5-00C04FD706EC}
'
' Syntaxe:
' restorepreview
'
' JC BELLAMY © 2003
' ----------------------------------------------------------
On error Resume Next
Dim shell  
Set shell = WScript.CreateObject("WScript.Shell" )
 
Ext = array(".art",".bmp",".dib",".gif",".jfif",".jpe",".jpeg",".jpg",".png",".wmf" )
SubKey="{BB2E617C-0920-11d1-9A0B-00C04FC2D6C1}\"
Value ="{7376D660-C583-11d0-A3A5-00C04FD706EC}"
 
TestHost
 
For i = LBound(Ext) To Ubound(Ext)
 Key="HKCR\" & Ext(i) & "\ShellEx\" & Subkey  
 Erreur=false
 valdef=shell.RegRead(Key)  
 If err.number<>0 Then  
  Erreur=true
  err.clear
 Else
  If valdef<>Value Then Erreur=true
  end if
 Msg="Extension " & Ext(i)
 If Erreur Then  
  shell.RegWrite Key,Value
  Result=""
  If err.number<>0 Then  
   Result=" non"
   err.clear
   end if  
  Result=Result & " corrigée"  
 else
  Result=" OK"
  End If
 wscript.echo Msg & chr(9) & Result
 Next
Wscript.quit
'--------------------------------------------------------------------
'Sous-programme de test du moteur
'Vu les sorties générées, c'est CSCRIPT (et non pas WSCRIPT)
'qui doit être utilisé de préférence
Sub TestHost
dim rep
strappli=lcase(Wscript.ScriptFullName)
strFullName =lcase(WScript.FullName)
i=InStr(1,strFullName,".exe",1)
j=InStrRev(strFullName,"\",i,1)
strCommand=Mid(strFullName,j+1,i-j-1)
if strCommand<>"cscript" then
 rep=MsgBox( _
 "Ce script doit être lancé avec CSCRIPT" & VBCRLF & _  
 "Cela peut être rendu permanent avec la commande" & VBCRLF & _
 "cscript //H:CScript //S /Nologo" & VBCRLF & _
 "Voulez-vous que ce soit fait automatiquement?", _
 vbYesNo + vbQuestion,strappli)
 if rep=vbYes  then  
  nomcmd="setscript.bat"
  Set ficcmd = fso.CreateTextFile(nomcmd)
  ficcmd.writeline "@echo off"
  ficcmd.writeline "cscript //H:CScript //S /Nologo"
  ficcmd.writeline "pause"
  ficcmd.writeline strappli
  ficcmd.writeline "pause"
  ficcmd.close
  shell.Run nomcmd, SW_SHOWNORMAL,true
  end if
    WScript.Quit
 end if
end sub
'--------------------------------------------------------------------
 
A+, V++
L'AB

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed