Visualizzazione dei risultati da 1 a 3 su 3

Discussione: cookie e session

  1. #1
    Utente di HTML.it L'avatar di jet
    Registrato dal
    Dec 2002
    residenza
    Chieti
    Messaggi
    866

    coockie e session

    Salve, se effettuo il login con user e psw giusti entro nel carrello, ma se opziono il checkbox, mi rimanda alla pagina di errore; il coockie non lo ricevo sul PC!


    • <form method="post" action="login.asp" target="_top">
      <tr>
      <td align="right" height="18" width="250" valign="top">
      <span class="project">user:</span>
      </td>
      <td height="18" width="374" valign="top">
      <input type="text" name="user" id="user" value="user" class="casella" size="20"/>
      </td>
      </tr>
      <tr>
      <td align="right" height="18" width="250" valign="top">
      <span class="project">psw:</span></td>
      <td height="18" width="374" valign="top">
      <input type="password" name="psw" id="psw" value="psw" class="casella" size="20"/>
      <input type="checkbox" name="MyCheckBox" value="yes"><tr>
      <td height="35" width="624" colspan="2" align="center" valign="bottom">
      <input type="submit" id="submit1" value="Invia" name="Invia" class="formbutton" />
      </td>
      </form>

    • pagina dopo il form

      <%

      user = Request.Form("user")
      psw = Request.Form("psw")
      MyCheckBox = Request.Form("MyCheckBox")

      strConn = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = " & _
      Server.MapPath("/mdb-database/My-db.mdb")

      Set conn = Server.CreateObject("ADODB.Connection")
      conn.Open strConn


      sSql= " SELECT utenti.User, Utenti.Psw, Utenti.Nome, Utenti.ID, Utenti.Cognome"
      sSql=sSql & " FROM Utenti"
      sSql=sSql & " WHERE Utenti.User = '" & user & "' AND Utenti.Psw = '" & psw & "'"


      Set rs = Server.CreateObject("ADODB.Recordset")
      Set rs = Conn.Execute(sSql)

      response.write user & "
      "
      response.write psw & "
      "
      response.write MyCheckBox

      If Not Rs.EOF Then
      autenticazione = True
      Else
      autenticazione =False
      End If
      Rs.Close

      if autenticazione = true and MyCheckBox = "Yes" then
      response.cookies("SalvaLogin").expires = DateSerial(2010,5,15)
      response.cookies("SalvaLogin")("user")=user
      response.cookies("SalvaLogin")("psw")=psw

      Response.Redirect("carrello.asp")
      else
      if autenticazione = true and MyCheckBox = "" then
      Session("Admin") = True
      Response.Redirect("carrello.asp")
      else
      Response.Redirect("errorlogin.asp?myCheckBox='" & MyCheckBox & "'")
      end if
      End if
      %>

  2. #2
    Utente di HTML.it L'avatar di jet
    Registrato dal
    Dec 2002
    residenza
    Chieti
    Messaggi
    866
    Dimenticavo, all'inizio della pagina carrello ho inserito:

    • <%
      If request.cookies("SalvaLogin")("user") <> "" Then
      Session("Admin") = True
      End IF
      If Not Session("Admin") Then
      Response.Redirect("errorlogin.asp")
      End If
      %>

  3. #3
    Utente di HTML.it L'avatar di jet
    Registrato dal
    Dec 2002
    residenza
    Chieti
    Messaggi
    866
    Ho risolto!
    yes invece di Yes o viceversa...

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2026 vBulletin Solutions, Inc. All rights reserved.