error '80020009'

[Lan]

Ciao a tutti,

ho il seguente errore con una pagina di login...

quando mi collego alla pagina, mi da l'errore:

error '80020009'

Questo è il codice della pagina...

prima di questo codice creo una if dove gli dico che se le variabili user e password sono vuote allora mi restituisca un valore "abc"

Sql = "select Matricola_Dipendente, Cognome_Dipendente, Nome_Dipendente, Conto_Dipendente, User_Dipendente, Password_Dipendente, Livello_Dipendente from AnagraficaDipendente where User_Dipendente = '" & user & "' and Password_Dipendente = '" & password & "'"   
'response.write sql:response.end
set rs = con.execute(sql) 

IF rs.EOF and user = rs("user_dipendente") and password = rs("password_dipendente") then

%>
			<tr><form action="pagina1.asp" method="get">
				<td>
				<table>
				<tr><td>User</td><td><input type="text" name="user" size="20"></td></tr>
				<tr><td>Password</td><td>
					<input type="text" name="password" size="20"></td></tr>
				</table>
				</td>
			</tr></form> 
			
<% 

rs.MoveNext 

else
%>
			<tr>
				<td>ok</td>
			</tr>
<%
end if
%>

qualche idea o suggerimento?

[weppos]

Invece del codice potresti dire il messaggio di errore?

[Lan]

ADODB.Field error '80020009'

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

[Lan]

da notare che se io inserisco una user e una password giusta sulla barra degli indirizzi questo funziona...
mentre se inserisco solo il nome della pagina con le variabili vuote mi da errore...

[weppos]

Stai cercando di eseguire una azione su un record che non eiste.
Prima controlla

if nomerecordset.EOF then
' non ci sono record
else
' esegui
end if

[Lan]

ok ma che if devo fare per digli ok se non ci sono record ridammi il form di login?

[weppos]

L'ho scritto sopra l'if.
Con .EOF controlli se il recordset è vuoto.