Sauvegarde locale

Soyez le premier à donner votre avis sur cette source.

Vue 8 459 fois - Téléchargée 645 fois

Description

Fonctionnement de l'application :
-l'utilisateur choisi son répertoire de sauvegarde sur le réseau
-l'appli copie le dossier sur C:
-elle supprime dans le dossier sur le réseau les fichiers dont la dernière écriture remonte à n jours (7 dans le code)
-elle supprime les dossiers vides(tjrs sur le dossier hébergé sur le réseau)

Conclusion :


Application trés modeste réalisée dans le but de libérer de l'espace disque sur le serveur de stockage de l'entreprise ou je travaille(2% restant ^^), les utilisateurs ne faisant jamais le ménage. Cette appli leur fait en 10 secondes.

Merci à Renfield pour sa précieuse aide, notamment sur la fonction récursive.

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
29
Date d'inscription
lundi 3 mars 2008
Statut
Membre
Dernière intervention
26 mars 2008

Merci ^^
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
69
y'a pas grand chose a comprendre...

modifie

Public Sub CopieRepertoire(ByVal dirsource As String, ByVal dirdest As String)
'copie du répertoire source dans le répertoire destination de même nom
My.Computer.FileSystem.CopyDirectory(dirsource, dirdest, True)
'appel procédure traitement des fichiers
TraitementFichier(My.Computer.FileSystem.GetDirectoryInfo(dirsource))

End Sub

par

Public Sub CopieRepertoire(ByVal dirsource As String, ByVal dirdest As String)
'copie du répertoire source dans le répertoire destination de même nom
My.Computer.FileSystem.CopyDirectory(dirsource, dirdest, FileIO.UIOption.AllDialogs, FileIO.UICancelOption.DoNothing)
'appel procédure traitement des fichiers
TraitementFichier(My.Computer.FileSystem.GetDirectoryInfo(dirsource))

End Sub
Messages postés
29
Date d'inscription
lundi 3 mars 2008
Statut
Membre
Dernière intervention
26 mars 2008

Renfield au risque de paraître lourd je n'y comprend rien.Je ne suis pas programmeur, à la base j'ai une formation réseau.
DSL.Sinon tant pis
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
69
que dire de plus que la doc ?

My.Computer.FileSystem.CopyDirectory( ...source..., ...dest..., FileIO.UIOption.AllDialogs, FileIO.UICancelOption.DoNothing)
Messages postés
29
Date d'inscription
lundi 3 mars 2008
Statut
Membre
Dernière intervention
26 mars 2008

Euh je dois t'avouer que je ne sais pas comment manipuler le showUI.J'ai bien essayié mais que dalle.Et je dois mettre l'appli en ligne cette aprèm!Tu crois que tu pourrais me dire ou le mettre dans le code stp?
Afficher les 15 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.