Immagine casuale sulla home

[Rick21]

Come faccio in asp? Non dev'essere dinamica...

O ci sono degli script già fatti?

[Roby_72]

In ASP e non deve essere dinamica?

Roby

[Rick21]

Mi sono espresso male scusa, nel senso che una volta caricata la pagina non ho bisogno che le immagini cambino. Semplicemente vorrei che ne scegliesse una a caso da un DB e la inserisse nella home.

Come faccio?

[Rick21]

Non so come dire di scegliere un ID a caso dal DB delle immagini.

[Roby_72]

Cerca nel forum, troverai molte discussioni.

Roby

[supergeniux]

che db?

[Rick21]

Vi ringrazio! Ho trovato...prima cercavo con "immagine casuale" e non portava buoni frutti

[Dirk Pitt]

Con questo codice verifico se la session logo è valorizzata (per evitare il caricamento di una nuova immagine ad ogni aggiornamento di pagina, con conseguente appesantimento), se lo è richiama l'immagine dalla session.
In caso contrario genero un numero a caso tra quelli dell'ID immagine e poi con una query richiamo l'immagine con quell'ID.

<%
If (Session("logo") = "") then
%>

<%

sqlstring = "SELECT Max(ID) AS MaxID, Min(ID) AS MinID FROM logo" 
Set objRs = Server.CreateObject("ADODB.Recordset")
objRs.ActiveConnection = objConn
objRs.Open sqlstring

maxID = objRs("MaxID")
minID = objRs("MinID")

Randomize
rndID = Int((maxID - minID + 1) * Rnd + minID) 


objRs.Close
Set objRs = Nothing

sqlstring2 = "SELECT TOP 1 * FROM logo WHERE ID >=" & rndID
Set objRs = Server.CreateObject("ADODB.Recordset")
objRs.ActiveConnection = objConn
objRs.Open sqlstring2

logo = objRs("url_logo")

response.write "<td background='cgi-bin/logo/" & logo & "' height='150' valign='top' colspan='3'>[img]images/logo.gif[/img]</td>"

Session("logo") = logo

objRs.Close
Set objRs = Nothing
objConn.Close
Set objConn = Nothing

Else
logo = Session("logo")
response.write "<td background='cgi-bin/logo/" & logo & "' height='150' valign='top' colspan='3'>[img]images/logo.gif[/img]</td>"

End If
%>

Con database Access.