Visualizzazione dei risultati da 1 a 5 su 5

Discussione: Stato Sì/no nel db

  1. #1

    Stato Sì/no nel db

    mi potete dire cosa nn va?

    PRima scrivo il codice...poi l'errore che m da..

    ah..."stato" è un campo del db di tipo SI/NO

    <%
    Dim nome_ut
    Dim pass
    nome_ut = Replace(Request.Form("nome_utente"), "'", "''")
    pass = Replace(Request.Form("password"), "'", "''")


    Dim cn
    Set cn = Server.CreateObject("ADODB.Connection")
    cn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("db/utenti.mdb")
    Dim sql
    sql = "SELECT ID FROM Utenti WHERE user='" &nome_ut&_
    "' AND pass='" &pass& "' AND stato = '"true"'"

    Dim rs
    Set rs = cn.Execute(sql)

    Dim autenticato
    if rs.eof then
    autenticato = false
    else
    autenticato = true
    end if
    rs.Close
    cn.Close
    Set rs = Nothing
    Set cn = Nothing

    if autenticato = true then
    Session("Autenticato") = "OK"
    Response.Redirect("riservato.asp")
    else
    Response.Redirect("error.asp")
    end if
    %>


    File: C:\Active Server Page\drs2\login.asp
    Source: Errore di compilazione di Microsoft VBScript
    Error: 800A0401
    Description: Prevista fine istruzione
    Line: 13 Column: 46
    Code: "' AND pass='" &pass& "' AND stato = '"true"'"

  2. #2
    Utente di HTML.it L'avatar di Sypher
    Registrato dal
    Jun 2003
    Messaggi
    1,994
    così?
    codice:
    sql = "SELECT ID FROM Utenti WHERE user='" &nome_ut&_
           "' AND pass='" &pass& "' AND stato = 'true'"
    anche se non so se ci vanno gli apicetti intorno a true...
    La passera non dura perchè Sypher la cattura!

    "No one like us we don't care, we are millwall, super millwall, we are millwall from the DEN"

  3. #3
    ehi grazie...
    m sa ke era una questione di virgole...anche se nn so ancora se funziona perchè m da sto errore adesso

    File: C:\Active Server Page\drs2\login.asp
    Source: Microsoft OLE DB Provider for ODBC Drivers
    Error: 80040E07
    Description: [Microsoft][Driver ODBC Microsoft Access] Tipi di dati non corrispondenti nell'espressione criterio.
    Line: 16 Column: 0
    Code: Set rs = cn.Execute(sql)

  4. #4
    non racchiudere True tra apici

  5. #5
    ohhh....grazie.....

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 © 2025 vBulletin Solutions, Inc. All rights reserved.