Ecrire un fichier texte depuis une page asp

Soyez le premier à donner votre avis sur cette source.

Snippet vu 20 659 fois - Téléchargée 87 fois


Contenu du snippet


Source / Exemple :


<%
Function EcrireDansFichier(Fichier, Contenu, Ajouter)

On Error Resume Next

If Ajouter = True Then
   LeMode = 8
Else 
   LeMode = 2
End If

  Set Fs = Server.Createobject("Scripting.FileSystemObject")
  Set LeFichierTexte = Fs.OpenTextFile(Fichier, LeMode, True)

  LeFichierTexte.Write Contenu

  LeFichierTexte.Close
  Set LeFichierTexte = Nothing
  Set Fs = Nothing

End Function
%>
<%
    'Pour creer/ecraser un fichier
    Call(Monfichier,"Ceci est mon texte", True)
    'Pour ajouter à la suite d'un fichier
    Call(Monfichier,vbCrLf & "Ceci est la 2ème ligne de mon texte", False)

%>

Conclusion :


Vous pouvez utiliser cette fonction et remplacer le texte par le contenu d'un formulaire

A voir également

Ajouter un commentaire

Commentaires

vegetalain
Messages postés
746
Date d'inscription
mardi 25 mars 2003
Statut
Membre
Dernière intervention
14 juillet 2015
-
euh... je ne comprends pas trop, si le fichier texte s'appelle par exemple "test.txt" on le signale où en fait???
cs_youda
Messages postés
5
Date d'inscription
lundi 4 septembre 2006
Statut
Membre
Dernière intervention
21 octobre 2008
-
bonjour a tous,
j'ai vraiment bcp besoin de ce code merci bcp.
mais comment on déclare le chemin du fichier et son nom ?
:s

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.