Page 1 sur 1
[PROBLEME] Comment supprimer les dates des fichiers ?
Posté : 10 oct 2018 20:26
par ThiWeb
Bonjour,
Je cherche à supprimer massivement la date de création de pleins de fichiers dans pleins de sous-dossiers.
J'ai trouvé un logiciel appelé
Attribute Changer en version 9.10b qui est censé s'en occuper.
Le problème, c'est que pour les fichiers Word (.DOC .DOCX), ces derniers gardent TOUT :
Auriez-vous une solution ?
Merci à tous,
ThiWeb
Re: [PROBLEME] Comment supprimer les dates des fichiers ?
Posté : 10 oct 2018 21:11
par LaDidi21
@ThiWeb :
Pas trop compris...
Tu veux supprimer l'attribut "Contenu créé" ?
Ce n'est pas un attribut du fichier (FileSystem) mais un attribut contenu dans le document.
Ce n'est pas, non plus, un stream associé au fichier.
Re: [PROBLEME] Comment supprimer les dates des fichiers ?
Posté : 10 oct 2018 23:02
par ThiWeb
Bah je veux supprimer/remplacer la date de ce document et des centaines d'autres par celle d'aujourd'hui...
ThiWeb
Re: [PROBLEME] Comment supprimer les dates des fichiers ?
Posté : 10 oct 2018 23:48
par Joselito
Une routine en VBA qui ouvre tous les fichiers Word les uns à la suite des autres et les sauvent sous un nom différent.
La date de création sera mise à jour ainsi que celle de la dernière modification.
Re: [PROBLEME] Comment supprimer les dates des fichiers ?
Posté : 11 oct 2018 08:13
par LaDidi21
@ThiWeb :
Indique CLAIREMENT les attributs que tu veux supprimer/remplacer car ils ne sont pas tous "au même endroit".
Sinon, si ce sont des attributs dans le document, +1 / Joselito : VBA.
Re: [PROBLEME] Comment supprimer les dates des fichiers ?
Posté : 11 oct 2018 08:54
par ThiWeb
@Joselito : VBA, c'est pas dans mes compétence, et une routine qui ouvre 200 fichiers dans X sous-dossiers, bonjour le bordel
mais c'est une bonne idée
@LadiDi : Les 3 dates que tu vois sur le screen
ThiWeb
Re: [PROBLEME] Comment supprimer les dates des fichiers ?
Posté : 11 oct 2018 14:32
par LaDidi21
@ThiWeb :
https://support.office.com/en-us/articl ... d4622c6b75
Donc VBA => soluce :
https://docs.microsoft.com/fr-fr/visual ... ew=vs-2017
ou
MetaClean :
https://www.adarsus.com/en/metaclean.html
https://www.adarsus.com/downloads/WithJ ... WinJRE.zip
Si tu ne veux pas utiliser l'application Java, tu trouveras MStool.exe sous "C:\Program Files (x86)\Adarsus\MetaClean Control\resources\" qui accepte des paramètres :
Code : Tout sélectionner
// Assembly MStool, Version 2.1.2.0
...
private static void Main(string[] args)
{
try
{
if (((args.Length != 3) || (args[0].Length < 8)) || !args[2].Contains("metaclean"))
{
Console.WriteLine("MetaClean Tool v.2.1.2");
Environment.Exit(0);
}
string path = args[0];
string str2 = args[1];
string str3 = null;
string str4 = null;
if (!File.Exists(path))
{
Console.WriteLine("ficheroNoExiste");
Environment.Exit(0);
}
else if (IsFileReadOnly(path))
{
Console.WriteLine("PermisosEscritura");
Environment.Exit(0);
}
else
{
str3 = Path.GetExtension(path).ToLower();
}
BorraMetadatos metadatos = new BorraMetadatos {
operacion = str2
};
if (metadatos.IsFileLocked(path))
{
Console.WriteLine("ficheroAbierto");
Environment.Exit(0);
}
else if (IsPassworded(path))
{
Console.WriteLine("ficheroProtegido");
Environment.Exit(0);
}
if ((((str3.Contains(".doc") || str3.Contains(".dot")) || (str3.Contains(".docx") || str3.Contains(".docm"))) || str3.Contains(".dotx")) || str3.Contains(".dotm"))
{
str4 = metadatos.WordDocument(path);
}
else if ((((str3.Contains(".xls") || str3.Contains(".xlt")) || (str3.Contains(".xlsx") || str3.Contains(".xlsm"))) || (str3.Contains(".xltx") || str3.Contains(".xltm"))) || str3.Contains(".xlsb"))
{
str4 = metadatos.ExcelDocument(path);
}
Console.WriteLine(str4);
}
catch (Exception exception)
{
Console.WriteLine("Error: " + exception.Message);
}
}
=>
________________________________________________________________________________
Pour les amateurs de Java cr@cking...
"C:\Program Files (x86)\Adarsus\MetaClean Control\MetaClean Control\properties\MyResources_en_US.properties" contient
Code : Tout sélectionner
jTextFieldCodActivacion=Paste the activation code generated after payment process here.
cadenaActivacionIncorrecta=Invalid activation code
activacionCorrecta=Activation completed successfully. Restart the program to load changes
cadenaActivacionDeOtroEquipo=The activation code entered does not match the identification code of your computer (MetaClean-ID).
msgErrorReNewTrial=Wrong activation code.
"view\EE.class" contient :
Code : Tout sélectionner
jLabelCodActivacion
jTextFieldCodActivacion
ficheroActivacionNoExiste
cadenaActivacionDeOtroEquipo
cadenaActivacionIncorrecta
activacionCorrecta
