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"
Pagina "ok.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 %>
Risultato 1:codice:<% if Session("Autenticato") = "" then Response.Redirect("login.htm") %> Benvenuto <%=Session("Autenticato")%> Sei iscritto dal <%=Session("datainizio")%>
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

Rispondi quotando