www.MegaLab.it

da **Fujiko** » mar dic 16, 2008 3:51 pm

no mi sono sbagliata.. è la tabella interna che ho chiamato tab_utenti ma il file .mdb si chiama utenti...
comunque mi arrendo... [bb]

non ci riesco, mi dice - HTTP 500 errore interno del server - [iechair]

eppure ho scritto come mi hai detto, questa è la mia pagina login.asp
<%
Dim conn
Dim stringaConnessione

Set conn = Server.CreateObject("ADODB.Connection")
"driver={Microsoft Access Driver(*.mdb)};dbq=" & Server.MapPath("mdb-database/utenti.mdb")
conn.Open(stringaConnessione)
%>

<%
username = Replace( trim(request.form("NomeUtente")), "'", "''")
password = Replace( trim(request.form("Password")), "'", "''")

sql = "SELECT * FROM utenti WHERE NomeUtente='" & username & "' AND Password='" & password & "' "
Set rs = conn.Execute(sql)

' se non ho righe mostro un messaggio di errore altrimenti uno di benvenuto
if rs.EOF then
response.write("Autenticazione Fallita! Username e password non accettati")
else
response.write("Benvenuto!")
end if

' chiudo la connessione
conn.close
%>

uffff basta mi vado a nascondere.. [crash]

............... [bb]

da **Fujiko** » mar dic 16, 2008 6:44 pm

ok sono stata tutto il pomeriggio a controllare e cambiare questo benedetto codice...
a 'sto punto credo che sia un problema del server .... internet explorer............ [boh]

dove devo controllare nel mio PC pannello di controllo, strumenti di amministrazione.. e poi? io ho internet explorer 6... si lo so sono un po' indietro.............. Rumez tu mi sapresti indicare???
grazie

da **Rumez** » mar dic 16, 2008 6:49 pm

hai sbagliato a copiare il codice...

Codice: Seleziona tutto: <% Dim conn Dim stringaConnessione stringaConnessione = "driver={Microsoft Access Driver(*.mdb)};dbq=" & Server.MapPath("mdb-database/utenti.mdb") Set conn = Server.CreateObject("ADODB.Connection") conn.Open(stringaConnessione) username = Replace( trim(request.form("NomeUtente")), "'", "''") password = Replace( trim(request.form("Password")), "'", "''") sql = "SELECT * FROM tab_utenti WHERE NomeUtente='" & username & "' AND Password='" & password & "' " Set rs = conn.Execute(sql) ' se non ho righe mostro un messaggio di errore altrimenti uno di benvenuto if rs.EOF then response.write("Autenticazione Fallita! Username e password non accettati") else response.write("Benvenuto!") end if ' chiudo la connessione conn.close %>

ti consiglio di provare direttamente su aruba visto che non te ne intendi di server web [;)]

da **Fujiko** » mar dic 16, 2008 7:46 pm

Rumez ha scritto:hai sbagliato a copiare il codice...
............
ti consiglio di provare direttamente su aruba visto che non te ne intendi di server web

niente..

grazie Rumez sei veramente gentile.........seguirò il tuo consiglio
ti farò sapere come è andata......... [^]

da **Fujiko** » gio dic 18, 2008 4:06 pm

Eccomi!
Ho ricreato il mio sito con frontpage, con dreamweaver avevo sbagliato dall'inizio(sito locale, configurazione...)
quindi ho ricreato la pagina con il campo utente, password e pulsante (index.html) ..
Rumez ho riportato il codice che mi hai scritto (cominciando anche un po' a capirlo..), ma poiché la pagina l'ho cambiata vorrei sapere se così va bene:

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>home page</title>
</head>
<body>
<form ACTION="login.asp" id="form1" name="form1" method="POST">
<p> </p>
<p><input type="text" name="NomeUtente" size="20"></p>
<p><input type="password" name="Password" size="20"></p>
<p><input type="button" value="accedi" name="B1"></p>
</form>
</body>
</html>

il form action... id, name, va bene?

questa invece è l'altra pagina (login.asp) :

<%
Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("/mdb-database/utenti.mdb")
%>

<%
username = Replace( trim(request.form("NomeUtente")), "'", "''")
password = Replace( trim(request.form("Password")), "'", "''")
SQL = "SELECT * FROM utenti WHERE NomeUtente = '" & username & "' AND Password = '" & password & "' "
Set rs = Conn.Execute(SQLtemp)
if rs.EOF then
response.write("Autenticazione Fallita! NomeUtente e Password errati")
else
response.write("Benvenuto")
end if
conn.Close

Almeno questa volta non mi da errore http..server..
però non succede niente.. perché??

grazie

da **Rumez** » gio dic 18, 2008 4:22 pm

Fujiko ha scritto:Eccomi!
Ho ricreato il mio sito con frontpage, con dreamweaver avevo sbagliato dall'inizio(sito locale, configurazione...)
quindi ho ricreato la pagina con il campo utente, password e pulsante (index.html) ..
Rumez ho riportato il codice che mi hai scritto (cominciando anche un po' a capirlo..), ma poiché la pagina l'ho cambiata vorrei sapere se così va bene:

vediamo un po' [devil]

Fujiko ha scritto:<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>home page</title>
</head>
<body>
<form ACTION="login.asp" id="form1" name="form1" method="POST">
<p> </p>
<p><input type="text" name="NomeUtente" size="20"></p>
<p><input type="password" name="Password" size="20"></p>
<p><input type="button" value="accedi" name="B1"></p>
</form>
</body>
</html>

devi mettere <input type="submit" value="accedi" name="B1" /> per far si che il pulsante faccia il "submit" della pagina. In parole povere vuol dire che mandi i parametri inseriti alla pagina che è impostata nell'action del form. Nel nostro caso specifico i campi NomeUtente e Password verranno inviati alla pagina login.asp che si occuperà di elaborarli.

Fujiko ha scritto:il form action... id, name, va bene?

si

Fujiko ha scritto:questa invece è l'altra pagina (login.asp) :

<%
Dimm conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("/mdb-database/utenti.mdb")
%>

<%
username = Replace( trim(request.form("NomeUtente")), "'", "''")
password = Replace( trim(request.form("Password")), "'", "''")
SQL = "SELECT * FROM utenti WHERE NomeUtente = '" & username & "' AND Password = '" & password & "' "
Set rs = Conn.Execute(SQLtemp)
if rs.EOF then
response.write("Autenticazione Fallita! NomeUtente e Password errati")
else
response.write("Benvenuto")
end if
conn.Close

Almeno questa volta non mi da errore http..server..
però non succede niente.. perché??

grazie

non succede niente perché il tuo pulsante essendo di tipo "button" non eseguiva il submit per cui la pagina login.asp non veniva chiamata.

attenta alla stringa di connessione: verifica che il percorso che hai messo sia il reale percorso del tuo database
attenta alla stringa SQL: verifica che il nome della tabella e il nome dei campi siano esattamente quelli che hai messo nel database

da **Fujiko** » gio dic 18, 2008 4:44 pm

Ciao! WOW, Grazie per la risposta immediata!!

[rotolo]

funziona!!!!!!!!!!!
[...]

che cosa strana perché mi funziona solo in locale? quando digito la password mi apre la finestra login.asp
sul browser mi da di nuovo errore [XX(]

è pazzesco non è possibile!

da **Rumez** » gio dic 18, 2008 5:21 pm

quando lo metti su aruba dici che ti da errore? e che errore ti da?

da **Fujiko** » gio dic 18, 2008 5:27 pm

Rumez ha scritto:quando lo metti su aruba dici che ti da errore? e che errore ti da?

il solito errore: HTTP 500 errore interno del server [V]

non capisco, i response.write non compaiono......non è che devo creare una pagina di collegamento se avviene l'accesso ??

da **Rumez** » gio dic 18, 2008 5:31 pm

riesci a mandarmi tramite pm username e password che provo a vedere?

non quelli di aruba..quelli da inserire nel form

da **Rumez** » gio dic 18, 2008 6:18 pm

controlla di aver racchiuso il codice asp tra i tag <% e %> perché mi viene restituito questo errore:

Codice: Seleziona tutto: The Script block lacks the close of script tag (%>).

da **Fujiko** » gio dic 18, 2008 6:26 pm

Rumez ha scritto:controlla di aver racchiuso il codice asp tra i tag <% e %> perché mi viene restituito questo errore:
Codice: Seleziona tutto
The Script block lacks the close of script tag (%>).

fatto... ma non cambia nulla.... hai visto la tabella? forse è lì che ho sbagliato..boh!

da **Rumez** » gio dic 18, 2008 8:15 pm

fai prima ad allegare il file login.asp [:D]

così almeno lo correggo e poi puoi vedere..

da **Rumez** » ven dic 19, 2008 9:28 am

Codice: Seleziona tutto: <% Dim conn Dim stringaConnessione stringaConnessione = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("utenti.mdb") Set conn = Server.CreateObject("ADODB.Connection") conn.Open(stringaConnessione) username = Replace( trim(request.form("NomeUtente")), "'", "''") password = Replace( trim(request.form("Password")), "'", "''") sql = "SELECT * FROM utenti WHERE NomeUtente='" & username & "' AND Password='" & password & "' " Set rs = conn.Execute(sql) ' se non ho righe mostro un messaggio di errore altrimenti uno di benvenuto if rs.EOF then response.write("Autenticazione Fallita! Username e password non accettati") else response.write("Benvenuto!") end if ' chiudo la connessione conn.close %>

devi solo correggere il percorso del database nella stringa di connessione..ho provato da me e funziona

da **Fujiko** » lun dic 22, 2008 11:22 am

Rumez ha scritto:
Codice: Seleziona tutto
<% stringaConnessione = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("utenti.mdb") ....................................... %>

devi solo correggere il percorso del database nella stringa di connessione..ho provato da me e funziona

Salve Rumez, (scusa se ti rispondo solo ora.. ho trascorso il week end fuori casa...)
Dunque, ho provato a cambiare la stringa di connessione come mi hai detto, ma come al solito mi funziona solo in locale.
Su Aruba la stringa di connessione è la prima che mi hai dato, non capisco cos'è che non va... ho provato a scaricare un sito bello e fatto con password da Aruba e quando inserisco la password ..apre "magicamente" la pagina..
il codice è un po' più lungo... ma se io decidessi di usare direttamente questo, mi sapresti indicare poi come si fa a creare vari accessi per le rispettive pagine........?

Grazie ancora, ciao

da **manutwl** » mer mar 02, 2011 10:14 am

salve a tutti io ho creato un sito con weebly e vorrei inserire all'interno una sezione dove ogni cliente entra e si scarica le sue cose, si tratta di un sito di un commercialista e quindi i dati inserito sono sensibili, come posso fare???'
grazie mille

www.MegaLab.it

Creare un sito con login e pass con autentiche diverse

Re: Creare un sito con login e pass con autentiche diverse

Re: Creare un sito con login e pass con autentiche diverse

Re: Creare un sito con login e pass con autentiche diverse

Re: Creare un sito con login e pass con autentiche diverse

Re: Creare un sito con login e pass con autentiche diverse

Re: Creare un sito con login e pass con autentiche diverse

Re: Creare un sito con login e pass con autentiche diverse

Re: Creare un sito con login e pass con autentiche diverse

Re: Creare un sito con login e pass con autentiche diverse

Re: Creare un sito con login e pass con autentiche diverse

Re: Creare un sito con login e pass con autentiche diverse

Re: Creare un sito con login e pass con autentiche diverse

Re: Creare un sito con login e pass con autentiche diverse

Re: Creare un sito con login e pass con autentiche diverse

Re: Creare un sito con login e pass con autentiche diverse

Re: Creare un sito con login e pass con autentiche diverse

Chi c’è in linea