Mostrando Codigo - Asp
EXPLICACION
Asp no acepta , por lo que con archivos html y utilizando Scripting.FileSystemObject
Para llamar a la pagina utilizariamos archivo.asp?include=archivo1.htm
<%
FileName = Server .MapPath ( Request .QueryString ( "include" ) )
Response .Write CreateObject ( "Scripting.FileSystemObject" ) .OpenTextFile _
( FileName, 1 , False , False ) .readall
%>
Entonces colocariamos el siguiente codigo
<%
FileName = Server .MapPath ( Request .QueryString ( "include" ) )
Select Case LCase ( FileName)
Case "archivo1.htm" , "archivo2.thm" : FileName = FileName
Case Else : FileName = "Acceso_denegado.htm" ' si no se encuentra el archivo
End Select
%>
ENLACE AL CODIGO
Si quieres enlazar desde tu pagina a este codigo
COMENTARIOS
Aun no existe ningun comentario para este Codigo.