begin process at 2010 02 10 10:41:34
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Visual Basic 6

 > 

Système

 > 

Fichier & Disque

 > 

Unp'tit coup de main siouplait !!!!


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

Unp'tit coup de main siouplait !!!!

mercredi 26 juillet 2006 à 11:51:16 | Unp'tit coup de main siouplait !!!!

keygen2

Bonjour à tous,
Je suis au support informatique d'une boite de presse qui fonctionne beaucoup aux mails (facture, propals, devis etc etc...) J'ai donc beaucoup crash de ".pst" et je passe donc beaucoup de temps à réparer et à réimporter. Il n'est pas encore question de migrer la boite (~3000 utilisateurs) vers Ofiice 2003 (beaucoup de macros incompatibles) donc je cherche un moyen de limiter les dégats, ou du moins les prévenir.
J'ai imaginé un script qui se lance au démarage et qui contrôle la taille du fichier ".pst". S'il est en dessous d'une certaine taille, pas de problème, s'il est au dessus ou égal, un message apparait et prévient l'utilisateur qu'il risque de perdre ses mails, donc qu'il est temps de faire du ménage...(un message à définir quoi...)
Voilà, comme je l'ai dit plus haut, j'ai imaginé ce script... Je ne suis pas développeur, je fais donc appel aux connaissances de ceux qui les détiennent. Sachant que je déplace en général le ".pst" et qu'il n'est pas forcément toujours à la même place. Je fais appel à quelqu'un qui sait car ce n'est pas mon cas, merci d'avance en tout cas.

je post une ébauche de script que j'aimerais mettre en place:

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile("C:\Documents and Settings\toto\Local Settings\Application Data\Microsoft\Outlook\Outlook.pst")
alerte = "Votre messagerie contient beaucoup trop de mails, pensez à faire du nettoyage ou vous perdrez tout... Contactez l'informatique pour plus de précisions"
info = "Taille de fichier messagerie correcte."
IF objFile.Size > 1800000000 THEN
MsgBox alerte
ELSE
MsgBox info
END IF


Un truc dans ce genre là mais en mieux...
mercredi 26 juillet 2006 à 12:20:39 | Re : Unp'tit coup de main siouplait !!!!

Ulala2

bonjour,

si tu veux, j'ai fait une bonne doc qui explique comment gérer son pst à l'usage des utilisateurs (suppression des emails dans le dossier élements supprimés, compression du fichier...). je peux te l'envoyer. rien qu'en compressant, j'ai vu des PST de 1,5go réduire à 700Mo.

(sinon, j'ai aussi la doc comment récupérer un mail définitvement supprimé au passage)

sinon pour la réparation des pst, j'utilise ontrack-recovery qui fonctionne très bien, mais c'est long surtout pour des fichiers pst > 2go.

en ce qui concerne le script, c'est une bonne idée, je laisse un auter membre de répondre sur ce quoi tu bloques.
mercredi 26 juillet 2006 à 12:32:54 | Re : Unp'tit coup de main siouplait !!!!

Ulala2

bonjour,

j'ai exécuter le script, il marche très bien.

Que souhaites-tu améliorer ?

mercredi 26 juillet 2006 à 13:11:37 | Re : Unp'tit coup de main siouplait !!!!

keygen2

Merci de tes réponses,
Comme je le dis plus haut, les fichiers PST ne sont pas tous au même endroit sur les postes des utilisateurs, j'aimerai que le script aille chercher lui même l'emplacement du PST principal dans le registre (le script sera déployé par AD ou LDMS)
mercredi 26 juillet 2006 à 14:17:18 | Re : Unp'tit coup de main siouplait !!!!

Ulala2

bonjour,

Dans ma base de registre, il semble que ce soit la clé suivante qui est utilisée : (outlook 2003)

HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\ComDlg32\OpenSaveMRU\pst

par contre, je n'ai pas d'exemple pour lire la valeur en VBS, mais en VB6.
mercredi 26 juillet 2006 à 15:47:40 | Re : Unp'tit coup de main siouplait !!!!

keygen2

J'avais déjà vu cette clé, mais elle n'est pas cohérente, la première clé est :
aet un nom de chemin (en général celui par défaut)
et si tu changes le pst de place il te rajoute une valeur:
bet le nouveau chemin
Et ainsi de suite si tu le fais souvent, donc impossible de savoir laquelle est la bonne.
Je continue de chercher, merci
mercredi 26 juillet 2006 à 16:00:14 | Re : Unp'tit coup de main siouplait !!!!

Ulala2

bonjour,

par défaut, le fichier est situé ici :
lecteur:\Documents and Settings\<utilisateur>\Paramètres locaux\Application Data\Microsoft\Outlook

sous AD il y a une stratégie de redirection des pst sinon, mais cela forcera à déplacer le pst au bon endroit.
mercredi 26 juillet 2006 à 16:45:50 | Re : Unp'tit coup de main siouplait !!!!

keygen2

J'ai peu être trouvé une piste.
Sur HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\ComDlg32\OpenSaveMRU\pst
il créé une clé avec le chemin en dur du PST par défaut



+ une clé qui change de valeur à chaque fois que le PST par défaut est changé de place, la clé "MRUList"
Sa valeur liste toutes les clés, mais elle met en premier la clé utilisée.
Je m'explique, j'ai changé quatre fois le nom de mon PST.
La première fois, (Outlook.pst) il n'y avait que la clé :
a = "chemin"
MRUList
= a

2eme fois (Fred.pst)
a = "chemin"
b = "nouveau chemin"
MRUList = ba

3eme fois (Toto.pst)
a = "chemin"
b = "nouveau chemin"
c = "nouveau,nouveau chemin"
MRUList = cba

4eme fois (de nouveau Outlook.pst))
a = "chemin"
b = "nouveau chemin"
c = "nouveau,nouveau chemin"
MRUList = acb

J'espère que j'ai été assez clair (On se réveille au fond de la classe SVP!!!! )
Ce qui complique considérablement les choses. Il faudrait que le script soit capable de lire la première valeur d'une chaine de caractère et d'aller lire la clé de registre qui lui correspond.
Trop balaise le truc...
mercredi 26 juillet 2006 à 16:59:43 | Re : Unp'tit coup de main siouplait !!!!

Ulala2

bonjour,

non pas tellement dur, il suffit juste de savoir comment lire une valeur de la bdr. tu récupéres dans une variable string le contenu de MRUList, et le premier digit de la string semble etre le nom de la clé a lire.
lundi 4 septembre 2006 à 23:51:12 | Re : Unp'tit coup de main siouplait !!!!

etienn11

Membre Club

Bonjour,

Y-a-t-il moyen de lancer la compression du fichier PST par un script ?

Merci d'avance.

Pascal.


1 2

Cette discussion est classée dans : script, taille, pst, mails, unp


Répondre à ce message

Sujets en rapport avec ce message

Envoyer un mails via un script vbs [ par cootz ] Bonjour, Je ne peut pas ajouter de composants donc je cherche une méthode basée sur winsock ou autres ...J'ai essayé des methode comme : CreateObject backup pst script vbs [ par steeldrum ] Salut amis développeurs, après maintes et maintes recherches sur le net, je m'en remet à vous, car je ne m'en sors plus. Que je vous explique : Je sou Script pour lister les fichiers pst sur un ordinateur sur le réseau [ par Folarin ] Bonjour a tous,j'aurais besoin d'un coup de main. Voici la problèmatique :Voici mon script : Dim ordinateurordinateur=inputbox("Entrez le nom d'ordina la recherche de fichier et à lister sur un fichier txt en vbs [ par Folarin ] Bonjour a tous,j'aurais besoin d'un coup de main. Voici la problèmatique :Voici mon script : Dim ordinateurordinateur=inputbox("Entrez le nom d'ordina Script AD, comptabilitasationd'éléments [ par mamash_bek ] Bonjour,Je dois comptabiliser certains éléments sur l' AD mais le traitement est un peu long avec le RecordCount. N'est-il pas possible de passer par Adresse de Messagerie Outlook [ par ninou77 ] Bonjour,Je dois réaliser un inventaire des comptes de messagerie sur plus de 400 pcs, et j'essai de faire un script qui me permettrait de remonté l'ad script de rotation VBA [ par davyzzz2 ] Bonjour.Je cherche un script pour me permettre de faire plusieurs rotations d'objets vectoriels sous CorelDraw3X.Pour le moment  j'arrive à faire pivo bonjour problem de script [ par ugo22g ] bonjour a tous et toutes voila mon probleme jais créer un site et jais ses ereur de script <div class="errorTitle" affichage et redimensionnement des userform et différents controls en fonction de la taille de l'écran [ par hidozo ] Bonjour,Je réalise des outils en VBA sous Excel.Je travaille sur un écran15,4", ou un 19" et maintenant sous un 8,9"comment faire pour que l'userform script visual basic [ par kurtaliasdiablo ] Bonjour à tous,Je suis un tout nouveau en visual basic et je n'en ai jamais fait avant. Je connais déjà d'autres languages comme le C ou le Java.J'ai


Nos sponsors


Sondage...

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,406 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales