ASP.NET - Como requerir la direccion desde asp

 
Vista:

Como requerir la direccion desde asp

Publicado por yazo (2 intervenciones) el 16/01/2006 11:24:01
Hola:

Tengo un archivo que he llamado aletoria.asp, el cual genera la dirección de una imagen aleatoriamente, su codigo es el siguiente:
Código:
<%
Set ObjetoFSO = Server.CreateObject("Scripting.FileSystemObject")

'nos selecciona la carpeta en la que esta el archivo
Set ObjetoCarpeta = ObjetoFSO.GetFolder(Server.MapPath("imagenes"))

i=0
cuenta=0
For each Fichero in ObjetoCarpeta.Files
cuenta=cuenta+1
Next

if cuenta>0 then cuenta=cuenta-1
redim archivo(cuenta)

For Each Fichero in ObjetoCarpeta.Files
archivo(i)=Fichero.Name
i=i+1
Next

Randomize
minimo = 0
maximo = cuenta
numero = Int(((maximo-minimo+1) * Rnd) + minimo)

'response.write archivo(numero)

Set Fichero = Nothing
Set ObjetoCarpeta = Nothing
Set ObjetoFSO = Nothing

%>

<%= archivo(numero)%>

Devuelve la dirección de la imagen aleatoria.

Me gustaría modificarle para que desde index.htm llamaramos a aleatoria.asp y nos devuelva la dirección de la imagen.

Es decir me gustaría poner en index.htm lo siguiente para ver una imagen aleatoriamente:

<img src="aleatoria.asp">

aleatoria.asp devuelve la ruta de la imagen, y como cada ves aleatoria.asp genera una ruta diferente asi tengo la imagen aleatoria en index.htm.

¿Como lo puedo hacer?

Muchas Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder