48 - Inclusión de archivos (#include)


Simulador (Cuando presiona el botón "ejecutar el programa" se graban todos los cuadros de texto y se ejecuta el primero de la lista mostrando en una página el resultado)

Problema:

<%option explicit%>
<html>
<head>
<title>problema</title>
</head>
<body>
<!--#include file="libreria.asp"-->
<%
dim sitios
dim direc
sitios=array("Google","Yahoo","MSN")
direc=array("http://www.google.com","http://www.yahoo.com","http://www.msn.com")
MostrarHipervinculos sitios,direc
%>
</body>
</html>
<%

sub MostrarHipervinculos(sitios,direc)
  dim f
  for f=0 to ubound(sitios)
    response.write("<a href=""" & direc(f) & """>" & sitios(f) & "</a>" & "-")
  next
end sub

%>

Confeccionar un procedimiento que reciba dos vectores, uno representa los títulos de los hipervínculos y otro las direcciones de dichos hipervínculos. Almacenar este procedimiento en un archivo llamado "libreria.asp".

Hacer además una página (pagina1.asp) que incluya y llame a dicha procedimiento.


Ver solución

pagina1.asp







libreria.asp



Retornar