Fonction de recuperation du contenu d'un fichier texte

Soyez le premier à donner votre avis sur cette source.

Snippet vu 14 207 fois - Téléchargée 36 fois

Contenu du snippet

ce petit bout de code permet de recuperer le contenu d'un fichier texte et de l'afficher.

Source / Exemple :


Dim nbre
Dim strTexte

Function Recuperation()

             '------------ Creation de la  reference pour le chemin d'acces 
             			fichier= "nonDuFichier" & nbre & ".txt"
             			repertoire="\Database\"
        chemin_acces= Server.MapPath (repertoire & fichier) 

             '------------Creation de l'objet FSO
             			Set FSO=Server.CreateObject("Scripting.FileSystemObject")

             '----------- Test de l'objet FSO
             			If FSO.FileExists(chemin_acces) Then
             			Set Out=FSO.OpenTextFile(chemin_acces,1, FALSE)
             			
             			strTexte=Out.ReadAll
             			
             			Else
             			Response.Write("FSO n'existe pas ou fin de la boucle")
             			Response.Write(strTexte)
             			End If

End Function

Recuperation()

A voir également

Ajouter un commentaire

Commentaires

vegetalain
Messages postés
745
Date d'inscription
mardi 25 mars 2003
Statut
Membre
Dernière intervention
14 juillet 2015
-
Merci pour ce code, ça marche bien, sauf que lorsqu'il y a des espaces dans le fichier texte, il n'affiche que le premier mot... :/ si le contenu est "coucou", il affiche "coucou", mais si c'est "salut mann", il n'affiche que "salut"... Le bout de code miracle qui fait tout s'afficher qq'un le connait??

Mercii !!
Et comment faire lorsque le texte est séparé par des séparateurs et que l'on veut répartir ce texte dans un tableau ? (les séparateurs permettant de changer de cellule<td></td> et les sauts a la ligne de définir les ligne <tr></tr>)
rtertert
tretert
erterte
retret
ertet

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.