J'aimerais pouvoir r=E9cup=E9rer le contenu d'un fichier texte=20
puis l'ins=E9rer dans un champs M=E9mo d'un formulaire...tout=20
cela par un click sur un bouton du formulaire.
J'ai r=E9cup=E9rer la fonction "ouverture document" de
http://access.seneque.free.fr/ouverture_document.htm
La fonction me donne le chemin d'acc=E8s et le nom du=20
fichier dans une bo=EEte de dialogue...
Comment r=E9cup=E9rer le texte du fichier et l'inscrire dans=20
un champs par la suite??
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
mumu
bonjour,
Open "adresse de ton fichier texte" For Input As #1 Do While Not EOF(1) Line Input #1, chX ici tu stock ta ligne (chX) quelque part soit dans un tableau mais faut le construire avant soit dans une table
Loop ensuite tu as tout ton fichier dans la table ou le tableau il te reste a le renvoyer dans ton champ memo
ou alors tu as aussi la fonction TransferText qui stock directement tout ton texte dans une table faut lui donner les parametres d'importation avant (la structure de ton texte)
voila je sais pas si j'ai été bien claire mumu
-----Message d'origine----- Bonjour,
J'aimerais pouvoir récupérer le contenu d'un fichier texte
puis l'insérer dans un champs Mémo d'un formulaire...tout
cela par un click sur un bouton du formulaire.
J'ai récupérer la fonction "ouverture document" de http://access.seneque.free.fr/ouverture_document.htm
La fonction me donne le chemin d'accès et le nom du fichier dans une boîte de dialogue... Comment récupérer le texte du fichier et l'inscrire dans un champs par la suite??
Merci beaucoup!
Doft .
bonjour,
Open "adresse de ton fichier texte" For Input As #1
Do While Not EOF(1)
Line Input #1, chX
ici tu stock ta ligne (chX) quelque part
soit dans un tableau mais faut le construire avant
soit dans une table
Loop
ensuite tu as tout ton fichier dans la table ou le tableau
il te reste a le renvoyer dans ton champ memo
ou alors tu as aussi la fonction
TransferText
qui stock directement tout ton texte dans une table
faut lui donner les parametres d'importation avant (la
structure de ton texte)
voila je sais pas si j'ai été bien claire
mumu
-----Message d'origine-----
Bonjour,
J'aimerais pouvoir récupérer le contenu d'un fichier
texte
puis l'insérer dans un champs Mémo d'un
formulaire...tout
cela par un click sur un bouton du formulaire.
J'ai récupérer la fonction "ouverture document" de
http://access.seneque.free.fr/ouverture_document.htm
La fonction me donne le chemin d'accès et le nom du
fichier dans une boîte de dialogue...
Comment récupérer le texte du fichier et l'inscrire dans
un champs par la suite??
Open "adresse de ton fichier texte" For Input As #1 Do While Not EOF(1) Line Input #1, chX ici tu stock ta ligne (chX) quelque part soit dans un tableau mais faut le construire avant soit dans une table
Loop ensuite tu as tout ton fichier dans la table ou le tableau il te reste a le renvoyer dans ton champ memo
ou alors tu as aussi la fonction TransferText qui stock directement tout ton texte dans une table faut lui donner les parametres d'importation avant (la structure de ton texte)
voila je sais pas si j'ai été bien claire mumu
-----Message d'origine----- Bonjour,
J'aimerais pouvoir récupérer le contenu d'un fichier texte
puis l'insérer dans un champs Mémo d'un formulaire...tout
cela par un click sur un bouton du formulaire.
J'ai récupérer la fonction "ouverture document" de http://access.seneque.free.fr/ouverture_document.htm
La fonction me donne le chemin d'accès et le nom du fichier dans une boîte de dialogue... Comment récupérer le texte du fichier et l'inscrire dans un champs par la suite??
Merci beaucoup!
Doft .
Doft
Merci!! Cela fonctionne à merveille... Mais ne saurais-tu pas comment faire pour qu'il reconnaisse également les sauts de ligne? J'ai essayé ceci:
Do While Not EOF(1) Line Input #1, LeTexte TexteInserer = TexteInserer + LeTexte + Chr(10) Loop
Mais le Chr(10) me fait des caractères bizarres dans mon champs mémo mais ne fait pas de retour à la ligne...
Merci!!
DOft
Merci!!
Cela fonctionne à merveille...
Mais ne saurais-tu pas comment faire pour qu'il
reconnaisse également les sauts de ligne?
J'ai essayé ceci:
Do While Not EOF(1)
Line Input #1, LeTexte
TexteInserer = TexteInserer + LeTexte + Chr(10)
Loop
Mais le Chr(10) me fait des caractères bizarres dans mon
champs mémo mais ne fait pas de retour à la ligne...