texto_ejemplo="Este es un texto de ejemplo por tutores.org"
Set objFSO =CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.CreateTextFile("c:rchivo_texto.txt", True)
objFile.Write(texto_ejemplo)
objFile.close
Set objFile=nothing
Set objFSO=nothing
%>
ENLACE AL CODIGO
Si quieres enlazar desde tu pagina a este codigo
<!-- Inicio enlace Tutores.org -->
<a title="Tutores.org - Insertar linea de texto en un archivo .txt" href="http://www.tutores.org/codigo/1257/" target="_blank">Insertar linea de texto en un archivo .txt</a>
<!-- Final enlace Tutores.org -->