none
Effectuer un "copier/coller" de fichiers en VB RRS feed

  • Question

  • Bonjour, j'ai un fichier au bureau que je dois sauvegarder tous les jours depuis "mes documents"(C:\Users\Propriétaire\......) sur un lecteur réseau (Z:\....).

    Je fais "copier" sur le fichier qui est situé sur mon dossier Dropbox et je viens le coller sur le lecteur "Z"

    Je souhaite automatiser cette démarche via un bouton.

    merci de votre aide (encore une fois)

    mercredi 27 mai 2015 06:50

Réponses

  • Bonjour

    Pourquoi ne pas utiliser les extraits inclus dans VB ?

    Pour savoir si un fichier existe :
    Dim fileExists As Boolean
    fileExists = My.Computer.FileSystem.FileExists("C:\Test.txt")

    Pour recopier le fichier avec écrasement de l'ancien :
    My.Computer.FileSystem.CopyFile("C:\Source.txt", "C:\NewFolder\Dest.txt", True)

    Ceci dit, je trouve gênant d'écraser l'unique sauvegarde que l'on a.
    J'ajouterais dans le nom  : la date du jour, voire l'heure_minute_seconde.
    C'est plus  sûr quitte à faire le nettoyage de temps en temps.

    mercredi 3 juin 2015 07:03

Toutes les réponses

  • Bonjour

    l y a un code tout prêt dans "insérer un extrait"
    My.Computer.FileSystem.CopyFile("C:\Source.txt", "C:\NewFolder\Dest.txt")

    mercredi 27 mai 2015 08:41
  • Merci de cette réponse qui fonctionne très bien.

    Me reste un soucis , ce "copier coller" que je souhaite faire est une sauvegarde qui s'effectue tous les jours.Donc se qui veut dire que le fichier est déjà présent dans son emplacement de destination. Il me faudrait un bout de code à rajouter pour me demander si je veux remplacer le fichier existant, et le cas échéant supprimer le plus ancien.

    merci encore

    mardi 2 juin 2015 15:29
  • Bonjour

    Pourquoi ne pas utiliser les extraits inclus dans VB ?

    Pour savoir si un fichier existe :
    Dim fileExists As Boolean
    fileExists = My.Computer.FileSystem.FileExists("C:\Test.txt")

    Pour recopier le fichier avec écrasement de l'ancien :
    My.Computer.FileSystem.CopyFile("C:\Source.txt", "C:\NewFolder\Dest.txt", True)

    Ceci dit, je trouve gênant d'écraser l'unique sauvegarde que l'on a.
    J'ajouterais dans le nom  : la date du jour, voire l'heure_minute_seconde.
    C'est plus  sûr quitte à faire le nettoyage de temps en temps.

    mercredi 3 juin 2015 07:03
  • Merci pour le code! l'idée d'insérer une date en plus est pas bete,je vais y songer
    mercredi 3 juin 2015 16:11