Asp - Leer codigo asp de un archivo
Códigos Asp
Este codigo lo utilizamos en Tutores.org para mostrar los codigos de un archivo asp. Tambien puede ser utilizado para otros lenguajes, .html, .Php ...
Tutores.org
Mostrando Codigo - Asp
EXPLICACION
debemops modificar 76419264.Asp Por el path correcto hacia el archivo que queremos ver el codigo.
Tambien se puede hacer mediante un request("archivo") donde recogeriamos el nombre del archvo mediante una variable o formulario.
CODIGO
<% 'Codigo ofrecido por Tutores.org %>
- <%
- 'Codigo ofrecido por tutores.org
- nombre_archivo_asp=server.mappath("76419264.Asp") ' el path del archivo asp
- Set fs = CreateObject("Scripting.FileSystemObject") ' Creamos el objeto
- Set archivo_asp = fs.OpenTextFile(nombre_archivo_asp, 1, False)
- contador=0
- do while not archivo_asp.AtEndOfStream
- contador=contador+1
- lee_linea=archivo_asp.readline ' Leemos el archivo
- response.write server.htmlencode(lee_linea) & "<br>"
- loop
- archivo_asp.Close ' cerramos el objeto
- set archivo_asp=nothing
- set fs=nothing
- %>
ENLACE AL CODIGO
Si quieres enlazar desde tu pagina a este codigo<!-- Inicio enlace Tutores.org -->
<a title="Tutores.org - Leer codigo asp de un archivo" href="http://www.tutores.org/codigo/619/" target="_blank">Leer codigo asp de un archivo</a>
<!-- Final enlace Tutores.org -->
<a title="Tutores.org - Leer codigo asp de un archivo" href="http://www.tutores.org/codigo/619/" target="_blank">Leer codigo asp de un archivo</a>
<!-- Final enlace Tutores.org -->
COMENTARIOS