Ecrire un fichier texte depuis une page asp

Soyez le premier à donner votre avis sur cette source.

Snippet vu 20 967 fois - Téléchargée 89 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
cs_youda Messages postés 5 Date d'inscription lundi 4 septembre 2006 Statut Membre Dernière intervention 21 octobre 2008
21 oct. 2008 à 14:33
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
vegetalain Messages postés 747 Date d'inscription mardi 25 mars 2003 Statut Membre Dernière intervention 11 août 2022
4 août 2008 à 14:31
euh... je ne comprends pas trop, si le fichier texte s'appelle par exemple "test.txt" on le signale où en fait???

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.