Ciao ragazzi...è possibile che la sezione login del mio sito tutt' ad un tratto non funzioni più?Eppure non ho toccato nulla...effettuando il login mi da questo errore:
Microsoft JET Database Engine error '80040e37'
The Microsoft Jet database engine cannot find the input table or query 'UTENTI'. Make sure it exists and that its name is spelled correctly.
/login.asp, line 107
Posto il codice nella speranza ke qualcuno mi aiuti...
<%
'questa è la funzione x evitare l'inserimento di codice sql
Function CleanStr(sTesto)
'Se non e' una stringa vuota ...
If Len(sTesto)>0 Then
sTesto = Replace(sTesto,"'","''")
sTesto = Replace(sTesto, "*", "[*]")
sTesto = Replace(sTesto, "%", "[%]")
End If
CleanStr=sTesto
End Function
%>
<!--#include file="conn.asp"-->
<%
Dim Rs, strSQL, user, pass
user = CleanStr(request.form("username"))
pass = CleanStr(request.form("password"))
set Rs = server.createobject("ADODB.Recordset")
strSQL = "select * from UTENTI where username = '" & user & "' and password = '" & pass & "'"
Rs.Open strSQL, Conn, 3, 3
'se nessun utente corrisponde stampo un errore
if Rs.EOF then
response.write "<div align='center'><br><br><br>Spiacente! Login non corretto!<br>Se vuoi diventare anche tu un nostro cliente richiedi i dati d'accesso <a href='richdati.asp'>qui</a>.</div>"
response.end
else
Response.write"<div align='center'><br><br><br>Accesso effettuato, " & Session("nome") & "!<br>"
Response.write"Tra pochi secondi sarai reindirizzato alla home page.</div>"
%>
<META HTTP-EQUIV=REFRESH CONTENT="1;URL=http://www.internetlandcarrara.com/home.asp">
<%
end if
' chiudo il recordset
Rs.Close
set Rs = Nothing
%>
<!--#include file="connclose.asp"-->
Ovviamente ho omesso le parti di codice ke non servivano...ripeto:funzionava tutto...e poi così dal nulla mi dà questo errore...sapete aiutarmi?Non so più dove sbattere la testa :dipser:
Grazie 1000
Microsoft JET Database Engine error '80040e37'
The Microsoft Jet database engine cannot find the input table or query 'UTENTI'. Make sure it exists and that its name is spelled correctly.
/login.asp, line 107
Posto il codice nella speranza ke qualcuno mi aiuti...
<%
'questa è la funzione x evitare l'inserimento di codice sql
Function CleanStr(sTesto)
'Se non e' una stringa vuota ...
If Len(sTesto)>0 Then
sTesto = Replace(sTesto,"'","''")
sTesto = Replace(sTesto, "*", "[*]")
sTesto = Replace(sTesto, "%", "[%]")
End If
CleanStr=sTesto
End Function
%>
<!--#include file="conn.asp"-->
<%
Dim Rs, strSQL, user, pass
user = CleanStr(request.form("username"))
pass = CleanStr(request.form("password"))
set Rs = server.createobject("ADODB.Recordset")
strSQL = "select * from UTENTI where username = '" & user & "' and password = '" & pass & "'"
Rs.Open strSQL, Conn, 3, 3
'se nessun utente corrisponde stampo un errore
if Rs.EOF then
response.write "<div align='center'><br><br><br>Spiacente! Login non corretto!<br>Se vuoi diventare anche tu un nostro cliente richiedi i dati d'accesso <a href='richdati.asp'>qui</a>.</div>"
response.end
else
Response.write"<div align='center'><br><br><br>Accesso effettuato, " & Session("nome") & "!<br>"
Response.write"Tra pochi secondi sarai reindirizzato alla home page.</div>"
%>
<META HTTP-EQUIV=REFRESH CONTENT="1;URL=http://www.internetlandcarrara.com/home.asp">
<%
end if
' chiudo il recordset
Rs.Close
set Rs = Nothing
%>
<!--#include file="connclose.asp"-->
Ovviamente ho omesso le parti di codice ke non servivano...ripeto:funzionava tutto...e poi così dal nulla mi dà questo errore...sapete aiutarmi?Non so più dove sbattere la testa :dipser:
Grazie 1000