Copier un fichier vers la freebox Résolu

Question

Bonjour a toutes et tous, forum bonjour 

Configuration: Windows 7 / Excel 2007

VBA >>> Excel 2007

Après de multiples essais je ne parviens pas a COPIER un fichier provenant de mon Disque dur (E:) vers ma freebox révolution.

Si svp quelqu'un a le temps et veut bien m'aider sur ce coup la, je lui en serait bien reconnaissant et par avance merci.

Ci-joint petit bout de code pour essai et pour info FREEBOX est bien dans l'arborescence de 

windows sous le nom de FREEBOX.

Quand je clic dessus il m'affiche bien le répertoire de la freebox ou j'ai accès.

Merci a vous pour votre temps et votre savoir, un bon W-end a vous

Cdlt Ray



'### Envoi COPIER un fichier vers FREEBOX
Private Sub Label1_Click()

Dim SourceFichier, DestinationFichier

    SourceFichier = "E:\Videos\Alex cross.avi"

    DestinationFichier = "ftp:hd1.freebox.fr/Disque dur"

FileCopy SourceFichier, DestinationFichier

End Sub

blux · Accepted Answer

Salut,

y'a un truc que je pige pas, tu fais précéder le nom du fichier par ftp/machin_chose, or ce protocole n'est pas compris en natif par VB qui fait simplement de la copie.

Dans ton explorateur de fichier (et j'ai pas dit navigateur, hein ?), quand tu cliques sur ta freebox, tu as quoi dans la barre d'adresse ?

dudulleray · Answer

Bonjour a tous, forum

Personne pour m'aider svp, je n'arrive toujours pas, un petit coup
de main serait le bienvenue.

merci a vous bonne journée

Cdlt Ray

dudulleray · Answer

Salut yoda

Tout d'abord merci de m'avoir répondu, c'est gentil a toi.


FREEBOX est bien dans l'arborescence de windows sous le nom de FREEBOX


Oui effectivement, car voila longtemps déja, j'ai créer une icone baptiser "\FREEBOX\Disque dur" sans utiliser la lettre (Z) sur mon bureau
et quand je clic dessus j'ai accès au D-D de la Free et je peux glisser un fichier pour le copier.

Dans l'arborescence de windons le D-D apparait sous la lettre (Z:) et j'ai accès tout comme un autre D-D

Donc dans mon programme en cours avec Ecxel 2007 en VBA je souhaiterai cliquer sur un bouton ou label et copier une vidéo vers le D-D de la Freebox

malgré des recherches assidues sur le net et forum, je n'arrive pas et c'est pas faute d'avoir essayer.

Mème avec la lettre (Z:) j'ai aussi essayer mais non toujours pas

merci a toi et bonne journée

Ray

dudulleray · Answer

Re

dans la barre d'adresse j'ai excatement ceci >>> Disque dur (\FREEBOX) (Z:)

Pour ftp c'est sur des infos du net alors j'ai également fait des essais

Merci

Ray

dudulleray · Answer

RE

je viens de faire de nouveau essais et j'ai l'erreur d'execution 76 chemin accès introuvable


'### Envoi COPIER un fichier vers FREEBOX
Private Sub Label1_Click()

Dim SourceFichier As String
Dim DestinationFichier As String

    SourceFichier = "E:\Videos\Alex cross.avi"
    DestinationFichier = "Disque dur(\FREEBOX)(Z:)"

FileCopy SourceFichier, DestinationFichier       '*** ligne passe jaune erreur

End Sub

dudulleray · Answer

j'ai essayer comme tu dit


DestinationFichier = "\FREEBOX"    '*** erreur fichier


alors essayer comme ceci


DestinationFichier = "\FREEBOX\Vidéos\Alex cross.avi"


et autre facon encore mais non erreur 75 chemin / fichier

dudulleray · Answer

Re Salut blux

je viens de refaire plusieurs essais et avec le code ci-dessous c'est bon ca marche

il faut bien sur attendre que le fichier se copie c'est rapide 15 secondes environ

me demande comment j'en sait rien, par contre il se pourrait que j'ai du oublier plusieurs fois l'accent aigu sue le e de Vidéos ce qui engendrai l'erreur 

du moins c'est ce que je pense


'### Envoi COPIER un fichier vers FREEBOX
Private Sub Label1_Click()

Dim SourceFichier As String
Dim DestinationFichier As String

    SourceFichier = "E:\Videos\Alex cross.avi"
    DestinationFichier = "\FREEBOX\Disque dur\Vidéos\Alex cross.avi"

FileCopy SourceFichier, DestinationFichier

MsgBox "transfert terminé"

End Sub

dudulleray · Answer

Salut Blux et yoda

Donc au dernier essai fait, ca fonctionne bien, envoyer mon fichier dans l'un des 5 répertoires de la Freebox.

Pour le temps de transfert, en fait ca dépends de la grosseur du fichier.

Faut juste ne pas faire d'erreur dans l'énoncé dur nom du répertoire 

Merci beaucoup a vous pour votre aide, je suis bien heureux que ca marche enfin

je vous souhaite une excellente journée

et encore un grand merci.

Cordialement Ray

Copier un fichier vers la freebox

8 réponses

Votre réponse

Discussions similaires