Comment "Copier" un fichier dans le Presse-Papier (ClipBoard) ?

vow Messages postés 54 Date d'inscription mardi 18 septembre 2001 Statut Membre Dernière intervention 27 juillet 2005 - 2 nov. 2002 à 11:53
vow Messages postés 54 Date d'inscription mardi 18 septembre 2001 Statut Membre Dernière intervention 27 juillet 2005 - 9 juil. 2003 à 07:40
Comment faire un copier (genre copier-coller) d'un fichier (le "copier" sans le "coller") ?
Je sais utiliser le clipboard, mais apparemment, ça ne fonctionne qu'avec le texte et les images (méthodes SetText et SetData).
J'ai bien essayé le SetData avec les fichiers mais ça ne fonctionne pas.
Merci d'avance.
@++

7 réponses

Bricomix Messages postés 340 Date d'inscription vendredi 11 octobre 2002 Statut Membre Dernière intervention 14 février 2005
2 nov. 2002 à 14:10
Je pense qu'il faut faire ça :

Dim strFile as String
Dim FreeCanal as Integer
FreeCanal = FreeFile
Open "chemindufichiersource" For Binary as #FreeCanal
strFile = String$(Lof(FreeCanal),chr$(0))
Get #FreeCanal,,strFile
Close #FreeCanal
Open "chemindufichierdestination" For Output as #FreeCanal
Print #FreeCanal,strFile
Close #FreeCanal

Voilà, normalement ça devrait marcher. Sur ce, bonne prog à toi, vow.

:-p Bricomix :-p
0
Bricomix Messages postés 340 Date d'inscription vendredi 11 octobre 2002 Statut Membre Dernière intervention 14 février 2005
2 nov. 2002 à 14:12
Euh, Excuse moi de mon erreur, il faut remplacer ça :

Open "chemindufichierdestination" For Output as #FreeCanal
Print #FreeCanal,strFile
Close #FreeCanal

par ça :

clipboard.settext (ou setdata) strfile

:-p Bricomix :-p
0
vow Messages postés 54 Date d'inscription mardi 18 septembre 2001 Statut Membre Dernière intervention 27 juillet 2005
2 nov. 2002 à 15:15
Merci d'avoir essayer de m'aider.
Mais ce n'est pas le contenu du fichier qui m'intéresse mais le fichier lui-même...
J'ai remarqué que si j'essaie de copier un fichier quelconque (en utilisant Ctrl+C dans le gestionnaire de fichiers, par exemple), le Presse-papier ("clipbrd.exe") m'indique le chemin complet du fichier. J'ai essayé la commande "ClipBoard.SetText CheminFichier", mais je savais d'avance que ce n'était que du texte qui était enregistré dans le presse-papier.

A noter que "ClipBoard.SetData CheminFichier" retourne l'erreur "un objet est requis".

Pouvez-vous m'aider encore ?
Merci d'avance.
0
vow Messages postés 54 Date d'inscription mardi 18 septembre 2001 Statut Membre Dernière intervention 27 juillet 2005
2 nov. 2002 à 15:16
Désolé pour la faute d'orthographe (essayer -> essayé)
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
LeJi Messages postés 2 Date d'inscription jeudi 3 juillet 2003 Statut Membre Dernière intervention 3 juillet 2003
3 juil. 2003 à 20:48
Bonjour,

voici je pense la réponse à ta question

http://www.mvps.org/access/api/api0049.htm

LeJi :)
0
LeJi Messages postés 2 Date d'inscription jeudi 3 juillet 2003 Statut Membre Dernière intervention 3 juillet 2003
3 juil. 2003 à 20:56
-------------------------------
Réponse au message :
-------------------------------

> Bonjour,
>
> voici je pense la réponse à ta question
>
> http://www.developerfusion.com/show/224/
>
> LeJi :)
>
0
vow Messages postés 54 Date d'inscription mardi 18 septembre 2001 Statut Membre Dernière intervention 27 juillet 2005
9 juil. 2003 à 07:40
Merci beaucoup :)

~~~~ Vow ~~~~
0
Rejoignez-nous