Salve a tutti,
ho un problema con questo codice:
codice:
<%
If (Session("logo") = Null) 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")
'response.write maxID & minID
'response.end
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' style='padding-top: 10px; padding-left: 10px;' 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' style='padding-top: 10px; padding-left: 10px;' colspan='3'>[img]images/logo.gif[/img]</td>"
End If
%>
Ecco la cosa non funziona, nel senso che se entro per la prima volta nella pagina, la session("logo") è chiaramente NULL, quindi dovrebbe eseguire la prima parte di codice. Invece esegue la seconda parte, che invece andrebbe seguita se la session è diversa da NULL.
Voi che ne dite?