Salve,
non riesco a capire come mai mi viene mostrata una data del tipo 25/12/1899 quando viene prelevata da un campo (di tipo data) di access.
Lo script che segue serve a fal loggare gli utenti a pagine riservate.
Una volta entrati faccio comparire (con una Session) nella pagina ok.asp la classica frase benvenuto... (nomeutente) ecc..
Vorrei far uscire anche la data: es. Benvenuto Mario Rossi sei iscritto dal (data), ma la data che compare non è quella registrata in access.
Come posso risolvere? Grazie.
pagina "elabora.asp"
codice:
<%
Dim nome_ut
Dim pass
nome_ut = Replace(Request.Form("nomeutente"), "'", "''")
pass = Replace(Request.Form("password"), "'", "''")
Dim cn
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("iscritti.mdb")
Dim sql
sql = "SELECT ID FROM db_iscritti WHERE nomeutente='" &nome_ut& "' AND password='" &pass& "'"
Dim rs
Set rs = cn.Execute(sql)
Dim autenticato
if rs.eof then
autenticato = false
else
autenticato = true
end if
Dim datainizio
if rs.eof then
datainizio = false
else
datainizio = true
end if
rs.Close
if datainizio = true then
sql = "SELECT datainizio FROM db_iscritti"
Set rs = cn.Execute(sql)
end if
cn.Close
Set rs = Nothing
Set cn = Nothing
if autenticato = true then
Session("datainizio") = datainizio
Session("Autenticato") = nome_ut
Response.Redirect("ok.asp")
else
Response.Redirect("errore.asp")
end if
%>
Pagina "ok.asp"
codice:
<%
if Session("Autenticato") = "" then Response.Redirect("login.htm")
%>
Benvenuto <%=Session("Autenticato")%>
Sei iscritto dal <%=Session("datainizio")%>
Risultato 1:
Benvenuto andreabolognesi Sei iscritto dal True
Risultato 2:
se inserisco Session("datainizio") = CDate(datainizio) in "elabora.asp" il risultato è
Benvenuto andreabolognesi Sei iscritto dal 29/12/1899