Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access Importation depuis un fichier texte

Importation depuis un fichier texte

3 réponses
Avatar
Gilbert
Bonsoir,

Je veux pouvoir importer le texte SQL d'une requête depuis un fichier texte.
J'ai essayé avec
Open NomFichier For Input As #1
Do While Not EOF(1)
Input #1, StrTmp
StrTexte = StrTexte & StrTmp
Loop
Close #1

Le problème c'est que la commande Input utilise la virgule comme délimiteur
lors de la lecture. Toutes les virgules de ma requête disparaissent donc du
texte importé. Ce qui est plus que problématique pour du SQL.

Comment faire pour récupérer le SQL depuis un .txt (ou autre)?

Merci d'avance

Gilbert
Signaler un problème avec ce contenu

3 réponses

Supprimer
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
Avatar
Eric
Bonsoir,

Pas testé mais
Supprimes la boucle Do ... Loop et remplaces avec
Dim strTexte as String
strTexte = Input(Lof(1),1)
tu devrais récupérer tout le contenu du fichier Texte

Bonsoir,

Je veux pouvoir importer le texte SQL d'une requête depuis un fichier texte.
J'ai essayé avec
Open NomFichier For Input As #1
Do While Not EOF(1)
Input #1, StrTmp
StrTexte = StrTexte & StrTmp
Loop
Close #1

Le problème c'est que la commande Input utilise la virgule comme délimiteur
lors de la lecture. Toutes les virgules de ma requête disparaissent donc du
texte importé. Ce qui est plus que problématique pour du SQL.

Comment faire pour récupérer le SQL depuis un .txt (ou autre)?

Merci d'avance

Gilbert





--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
Gilbert
Merci
J'avais trouvé ça qui fonctionne
Do While Not EOF(1)
StrTmp = Input(1, #1)
StrTexte = StrTexte & StrTmp
Loop

Gilbert


"Eric" a écrit dans le message de
news:
Bonsoir,

Pas testé mais
Supprimes la boucle Do ... Loop et remplaces avec
Dim strTexte as String
strTexte = Input(Lof(1),1)
tu devrais récupérer tout le contenu du fichier Texte

Bonsoir,

Je veux pouvoir importer le texte SQL d'une requête depuis un fichier
texte.


J'ai essayé avec
Open NomFichier For Input As #1
Do While Not EOF(1)
Input #1, StrTmp
StrTexte = StrTexte & StrTmp
Loop
Close #1

Le problème c'est que la commande Input utilise la virgule comme
délimiteur


lors de la lecture. Toutes les virgules de ma requête disparaissent donc
du


texte importé. Ce qui est plus que problématique pour du SQL.

Comment faire pour récupérer le SQL depuis un .txt (ou autre)?

Merci d'avance

Gilbert





--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr



Avatar
Eric
re,

Oui ça marche aussi mais tu récupères 1 caractère après l'autre et donc
tu dois boucler jusqu'à atteindre la fin du fichier alors que ce que je
te propose est une lecture de tout le fichier texte en une seule
opération puisque LOF() retourne la longueur du fichier et récupération
dans une variable quelque soit le contenu du fichier.

De toute façon, l'essentiel est d'arriver au résultat voulu et ta
méthode le permet.

Merci
J'avais trouvé ça qui fonctionne
Do While Not EOF(1)
StrTmp = Input(1, #1)
StrTexte = StrTexte & StrTmp
Loop

Gilbert


"Eric" a écrit dans le message de
news:

Bonsoir,

Pas testé mais
Supprimes la boucle Do ... Loop et remplaces avec
Dim strTexte as String
strTexte = Input(Lof(1),1)
tu devrais récupérer tout le contenu du fichier Texte


Bonsoir,

Je veux pouvoir importer le texte SQL d'une requête depuis un fichier



texte.

J'ai essayé avec
Open NomFichier For Input As #1
Do While Not EOF(1)
Input #1, StrTmp
StrTexte = StrTexte & StrTmp
Loop
Close #1

Le problème c'est que la commande Input utilise la virgule comme



délimiteur

lors de la lecture. Toutes les virgules de ma requête disparaissent donc



du

texte importé. Ce qui est plus que problématique pour du SQL.

Comment faire pour récupérer le SQL depuis un .txt (ou autre)?

Merci d'avance

Gilbert





--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr






--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr