Geckozone

Bonjour,
je frole la crise de nerf là lol !!
Voilà deux fois que mon compte disparais avec a peine un mois d'intervalle ! J'ai réussi la premiere fois à les remettre je ne sais même pas comment !! et là impossible de retrouver mes messages !!!
Bon j'ai plusieurs profiles :

xlxaw6cb.Fabien
z83gqsfo.default

Apparement mes dossiers et mes messages sont ici : c:\*****\Application Data\Thunderbird\Profiles\xlxaw6cb.Fabien\Mail\pop.free.fr

mais je ne suis pas sur du tout car je les retrouve là aussi :
c:\*****\Application Data\Thunderbird\Profiles\z83gqsfo.default\Mail

Vu que j'avais tenté de suivre vos conseils la premiere fois, j'avais déplacé des dossiers ms je ne me souviens plus où !!

*****EDIT**** : ayèèè j'ai réussi a retrouvé mes messages !! Maintenant j'aimerai simplment un outil fiable pour les sauvegarder (un outil qui fait ça tout seul bien sauf mozbackup!!) comme ça je sauvegarde mes messages, et je cahnge de logiciel parce que thunderbird est même pas capable de tourner correctement ! Ils pourraient au moins faire une mise à jour !!!!!

Ou alors, si je garde thunderbird (parce q'au fond quand même àa m'embete de changer) j'aimerai effacer ts mes profiles et tout recréer comme il faut avec les sous dossiers et tout, pour qu'après j'ai juste à déplacer les fichiers contenant les messgaes si c'est possible !!

Merci beaucoup en tout cas !!

Ah oui si quelqu'un pouvait trouver la faille ça serai nickel ^^



Message envoyé avec : Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322; .NET CLR 2.0.50215; Avalon 6.0.5070; WinFX RunTime 3.0.50215)

Pourquoi veux tu qu'il fasse une mise à jour de leur logiciel quand il n'y a aucune faille sur thunderbird 1.5.2

Là 1.5.2 est très bien pour le moment il faudrait être fou pour changer de courrielleur.

Si tu as retrouver tout tes messages c'est très bien.

Si tu veux savoir ou se trouvent les dossiers courrier précis d'un compte tu vas dans outils --> Paramètres des comptes, tu cliques sur ton compte pop et tu vas dans paramètres serveur.

Tout en bas tu vas trouver le chemin de ton dossier

Tu le selectionnes, tu fais un clic droit copier puis dans windows demarrer--->executer

tu fais un clic droit coller puis ok

Tu vas atterir dans ton dossier via l'explorateur.

Tu descends dans le repertoire père, tu refais un clic droit sur le dossier que tu étais et tu fais envoyer vers dossier compressé

T'aurais alors un zip de tout tes mails de ton comptes

Pour les remettres (s'il disparaisse) t'auras cas suivre tout ce que je viens de te dire mais a la fin au lieu de compresser le dossier tu le decompresse (si jamais sa disparait)

Avec ces indics tu devrais bien t'en sortir.

Bonne chance

Je ne peux pas mieux te dire !!!!

Fab1608 es tu le meme invité que Ceasar
le plus simple étant donné que tu as des mails répartis sur plusieurs profil c'est d'appliquer ceci

tu cree un nouveau profil, cree tes comptes et ne fait pas de releve de courrier

dans "dossier locaux" tu cree un dossier que tu nommes transfert et fermes tb
tu vas dans ton nouveau profil et verifie que tu retrouves un fichier transfert sans extension

maintenant tu copie dans un de tes anciens profil un des fichiers (sans extension) contenant tes mails et le renommes en transfert (en respectant la casse) et le colle a la place de l'autre
tu ouvre tb et verifie que tes mails sont présents dans le dossier transfert
tu les deplace dans un autre dossier de façon a vider le dossier transfert

tu refait la manip pour chaque fichier a récupérer sur tout tes anciens profils

une fois que tu as un profil au poile le plus simple est de faire un copier coller de ce profil et c'est la meillleure des sauvegarde
tu peux également installer l'extension Mboximport qui permet d'importer/exporter les dossiers contenant tes mails
http://extensions.geckozone.org/mboximport

Message envoyé avec : Mozilla/5.0 (Windows; U; Windows NT 5.1; fr; rv:1.8.0.3) Gecko/20060426 Firefox/1.5.0.3

Bon je viens de modifier quelques scripts.

Le premier permet de lister tous les softs installées sur windows XP, je précise il s'appuie sur WMI, FSO et la base de registre, il écrit un fichier progList.txt à la racine du C.

Le deuxième identifie les hotfixs pour plus de clareté, idem il écrit un listKB.txt
à la racine du C egalement. Celui utilise WMI et FSO seulement.

Je suppose qu'il existe une classe WIN32 en WMI pour tous les softwares mais la doc microsoft étant incomplète, je n'ai rien trouvé.

Il faudra enregistrer les sources dans un fichier texte avec le blocnote par exemple puis enregistrer sous, changer l'option .txt en tout les fichiers et taper par exemple progList.vbs pour le premier et listKB.vbs, enregister les sur le bureau par exemple.

Pour les utiliser il faudra WindowsScriptHost téléchargeable à cette adresse :
http://www.microsoft.com/downloads/deta ... layLang=fr

Une fois installer, il faut être administrateur (ca j'ai pas vérifié mais bon)
Il faut aussi que le service COM soit activé et associé (normalement il doit y être) donc ne tiens pas compte de ces lignes si les scripts ne fonctionnent pas c'est que ces services sont problament désactivés.

Ensuite quand tout l'environnement sera prêt : WSH installé, les scripts .vbs sur le bureau.

Tu fais un clic droit sur l'un des scripts --> Propriété --> tu selectionnes l'emplacement du type C:\Documents and Settings\...\... un clic droit copier

Puis demarrer --> executer --> cmd --> Ok !
Une fenêtre DOS s'ouvre.
Tu tapes : CD "clic droit coller et tu fermes le guillemet"
Cela va ressembler à CD "C:\Documents and Settings\...\..." tu tapes entrer

maintenant tu tapes cscript progList.vbs puis entrer, progList.vbs va s'executer (c'est aussi lent que la génération de la liste des programmes installés par windows)

pour lancer le deuxième script idem tu tapes cscript listKB.vbs

Une fois ceci tu peux ouvrir l'explorateur aller dans disque local C: et tu y retrouveras les deux fichiers générés par les scripts listKB.txt et progList.txt

Tu peux les ouvrir et nous faire part de tes résultats

Allez pour les hotfix j'en ai 57 d'installées qui dit mieux !

Bon dans les messages qui suivent tu trouveras les sources, donc rien à craindre...




[/url]

Const HKLM = &H80000002 'HKEY_LOCAL_MACHINE
strComputer = "."
strKey = "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\"
strEntry1a = "DisplayName"
strEntry1b = "QuietDisplayName"
strEntry2 = "InstallDate"
strEntry3 = "VersionMajor"
strEntry4 = "VersionMinor"
strEntry5 = "EstimatedSize"

Set objReg = GetObject("winmgmts://" & strComputer & _
"/root/default:StdRegProv")
objReg.EnumKey HKLM, strKey, arrSubkeys
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.CreateTextFile("C:\progList.text")
WScript.Echo "Installed Applications" & VbCrLf
objFile.writeLine "Installed Applications" & VbCrLf
For Each strSubkey In arrSubkeys
intRet1 = objReg.GetStringValue(HKLM, strKey & strSubkey, _
strEntry1a, strValue1)
If intRet1 <> 0 Then
objReg.GetStringValue HKLM, strKey & strSubkey, _
strEntry1b, strValue1
End If
If strValue1 <> "" Then
WScript.Echo VbCrLf & "Display Name: " & strValue1
objFile.writeLine VbCrLf & "Display Name: " & strValue1
End If
objReg.GetStringValue HKLM, strKey & strSubkey, _
strEntry2, strValue2
If strValue2 <> "" Then
WScript.Echo "Install Date: " & strValue2
objFile.writeLine "Install Date: " & strValue2
End If
objReg.GetDWORDValue HKLM, strKey & strSubkey, _
strEntry3, intValue3
objReg.GetDWORDValue HKLM, strKey & strSubkey, _
strEntry4, intValue4
If intValue3 <> "" Then
WScript.Echo "Version: " & intValue3 & "." & intValue4
objFile.writeLine "Version: " & intValue3 & "." & intValue4
End If
objReg.GetDWORDValue HKLM, strKey & strSubkey, _
strEntry5, intValue5
If intValue5 <> "" Then
WScript.Echo "Estimated Size: " & Round(intValue5/1024, 3) & " megabytes"
objFile.writeLine "Estimated Size: " & Round(intValue5/1024, 3) & " megabytes"
End If
Next
objFile.Close

count = 0
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colQuickFixes = objWMIService.ExecQuery _
("Select * from Win32_QuickFixEngineering")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.CreateTextFile("C:\listKB.text")
For Each objQuickFix in colQuickFixes
hotFixID = objQuickFix.HotFixID
If Left(hotFixID , 2) = "KB" Then
count = count + 1
description = objQuickFix.Description
Wscript.Echo "Description: " & description
Wscript.Echo "Hot Fix ID: " & hotFixID
objFile.writeLine ("Description: " & description)
objFile.WriteLine ("Hot Fix ID: " & hotFixID)
End If
Next
Wscript.Echo "Nombres de hotFix :: " & count
objFile.WriteLine "Nombres de hotFix :: " & count
objFile.Close

Bon courage !

Bon y a plus eut les indentations alors je ressaye celui-ci c'est progList.vbs aussi

Const HKLM = &H80000002 'HKEY_LOCAL_MACHINE
strComputer = "."
strKey = "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\"
strEntry1a = "DisplayName"
strEntry1b = "QuietDisplayName"
strEntry2 = "InstallDate"
strEntry3 = "VersionMajor"
strEntry4 = "VersionMinor"
strEntry5 = "EstimatedSize"

Set objReg = GetObject("winmgmts://" & strComputer & _
"/root/default:StdRegProv")
objReg.EnumKey HKLM, strKey, arrSubkeys
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.CreateTextFile("C:\progList.text")
WScript.Echo "Installed Applications" & VbCrLf
objFile.writeLine "Installed Applications" & VbCrLf
For Each strSubkey In arrSubkeys
intRet1 = objReg.GetStringValue(HKLM, strKey & strSubkey, _
strEntry1a, strValue1)
If intRet1 <> 0 Then
objReg.GetStringValue HKLM, strKey & strSubkey, _
strEntry1b, strValue1
End If
If strValue1 <> "" Then
WScript.Echo VbCrLf & "Display Name: " & strValue1
objFile.writeLine VbCrLf & "Display Name: " & strValue1
End If
objReg.GetStringValue HKLM, strKey & strSubkey, _
strEntry2, strValue2
If strValue2 <> "" Then
WScript.Echo "Install Date: " & strValue2
objFile.writeLine "Install Date: " & strValue2
End If
objReg.GetDWORDValue HKLM, strKey & strSubkey, _
strEntry3, intValue3
objReg.GetDWORDValue HKLM, strKey & strSubkey, _
strEntry4, intValue4
If intValue3 <> "" Then
WScript.Echo "Version: " & intValue3 & "." & intValue4
objFile.writeLine "Version: " & intValue3 & "." & intValue4
End If
objReg.GetDWORDValue HKLM, strKey & strSubkey, _
strEntry5, intValue5
If intValue5 <> "" Then
WScript.Echo "Estimated Size: " & Round(intValue5/1024, 3) & " megabytes"
objFile.writeLine "Estimated Size: " & Round(intValue5/1024, 3) & " megabytes"
End If
Next
objFile.Close

Bon tampis, ca marchera quand même avec moins de clareté