Frase diversa per ogni giorno [era: Aiuto!!]

[domus321]

ho bisogno di una mano: nel mio sito vorrei fare una cosa di questo tipo: avendo un database access, fare in modo che ogni giorno diverso mi carichi un record diverso del database. mi spiego con un esempio:
oggi è il xx/xx/xx ---> viene visualizzata la frase "xxxxxxxxxx"
domani sarà il yy/yy/yy ---> viene visualizzata la frase "yyyyyyyyyy"

[rixx]

ci sono migliaia di modi per fare una cosa simile...comincia ascrivere un po di codice..

[teorema55]

comincia a scrivere un po di codice..

e anche, per favore, a dare un titolo decente ai 3D, ESPLICATIVO, in modo che l'aiuto ricevuto da te sia accessibile anche ad altri utenti che potranno averne bisogno....

[teorema55]

Altro chiarimento necessario: hai bisogno che ad ogni apertura della pagina venga stampato un testo a caso preso da un database di testi (abbastanza facile da fare) oppure che il testo sia SEMPRE LO STESSO, in una certa data, ad ogni apertura della pagina da parte di un diverso utente, e che cambi ogni giorno (il che è MOLTO più complicato)?

[rixx]

si non è che ti sei proprio sprecato nelle spiegazioni tenendo conto che siamo noi che ti rispondiamo

[teorema55]

Comunque sia, se, come spero, si da' il primo caso, una possibilità è:

<%
cString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("database.mdb") 
Set objConn=Server.CreateObject("ADODB.Connection")
objConn.Open cstring

function random(numero)
   randomize()
   random = Int(Rnd() * numero) 
end function

function pensierino_del_giorno()

  sql = "SELECT COUNT(*) FROM tabella"
  Set rs = objConn.Execute(sql)

  dim numero
  numero = rs(0)

  rs.Close
  Set rs = Nothing

  sql = "SELECT testo FROM tabella"
  Set rs = server.createObject("ADODB.recordset")
  rs.open sql, objConn, 3, 3

  if not rs.eof then
  	rs.movefirst
    rs.move(random(numero))
	   pensierino_del_giorno = rs("testo")
  end if

rs.Close
Set rs = Nothing

end function

response.write("





<div align='center'>Il pensierino di oggi è "&pensierino_del_giorno()&"</div>")

objConn.close
set objconn=nothing
%>

Ad ogni caricamento della pagina viene stampato il contenuto del campo "testo" di un record a caso della tabella "tabella" del database "database"

[domus321]

Vi dico in particolare cosa devo fare, sono così sicuro che capirete.
vorrei visualizzare il santo del giorno, quindi ad ogni data dovrà corrispondere il nome del santo del giorno. ecco tutto.

Grazie!!!

[rixx]

allora la tabella del db sarà strutturata cosi:

nome del santo ------- giorno



fai sql="SELECT nome del santo FROM tabella WHERE giorno=" & date()

[domus321]

questa devo sostituirla nella riga in rosso?

<%
cString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("database.mdb")
Set objConn=Server.CreateObject("ADODB.Connection")
objConn.Open cstring

function random(numero)
randomize()
random = Int(Rnd() * numero)
end function

function pensierino_del_giorno()

sql = "SELECT COUNT(*) FROM tabella"
Set rs = objConn.Execute(sql)

dim numero
numero = rs(0)

rs.Close
Set rs = Nothing

sql = "SELECT testo FROM tabella"
Set rs = server.createObject("ADODB.recordset")
rs.open sql, objConn, 3, 3

if not rs.eof then
rs.movefirst
rs.move(random(numero))
pensierino_del_giorno = rs("testo")
end if

rs.Close
Set rs = Nothing

end function

response.write("





<div align='center'>Il pensierino di oggi è "&pensierino_del_giorno()&"</div>")

objConn.close
set objconn=nothing
%>

Grazie...

[rixx]

:master: ma n0n era il nome del santo del giorno VVoVe: