Comment "Copier" un fichier dans le Presse-Papier (ClipBoard) ?
vow
Messages postés54Date d'inscriptionmardi 18 septembre 2001StatutMembreDernière intervention27 juillet 2005
-
2 nov. 2002 à 11:53
vow
Messages postés54Date d'inscriptionmardi 18 septembre 2001StatutMembreDernière intervention27 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.
@++
Bricomix
Messages postés340Date d'inscriptionvendredi 11 octobre 2002StatutMembreDernière intervention14 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.
vow
Messages postés54Date d'inscriptionmardi 18 septembre 2001StatutMembreDernière intervention27 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".