Ver Mensaje Individual
  #6 (permalink)  
Antiguo 16/05/2005, 18:25
Avatar de Cap.Buscapina
Cap.Buscapina
 
Fecha de Ingreso: octubre-2004
Ubicación: Argentina
Mensajes: 836
Antigüedad: 20 años, 7 meses
Puntos: 4
tenes que tener una carpeta BANNER con todos los banners que queres rotar y ademas denominarlos con los días que queres mostrar (lun-mier-vier.gif/mar-dom.gif)


fijate si te sirve:

fecha=date()
dia=Weekday(fecha)//con esto obtengo el número del día de la semana(1 es domingo,2 es lunes,...)
dia=WeekDayName(dia, True)
'con lo siguiente , creas el objeto y abres la carpeta "banner"

Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.GetFolder(server.mappath("banner/"))
Set filex = folder.Files

' luego de abrir , con un bucle revisas todos los archivos que tienes en la carpeta banner
For Each listing in filex
cantidad=cantidad+1

'de esta formas obtienes el nombre del archivo por cada vez que gira el bucle

titulo=listing.name


' solo restaría comprobar que en el nombre del archivo esté el día que buscas

if InStr(1,titulo,dia,1) then

'si lo encuentra, lo muestras mediante response.write
response.write "<img src=""banner/" & titulo & """ alt=""" & dia & """>"

else

'si no encuentra no hace nada

end if


' y vuelve a realizar el bucle

next
set folder=nothing



response.write cantidad ///// con esto solamente es para ver cuantos banners en total tienes

response.write dia /// es para ver el valor de l a variable dia


este codigo te selecciona los banner segun el día del servidor.
para rotarlos usá javascript.


cualquier otra idea , será bienvenida
suerte
__________________
by Capitán Buscapina
.