ADODB.Field error '80020009' ...solo su un ambiente

[mosquito70]

Ciao a tutti,
solito problema da diventarci matti.
Mi spiego...

Eseguo questa parte di codice, per estrarre banalmente dei dati da una tabella

         <td class=testolabel>
         <% 
           if rs("USER_PROP") <> "XXXXX" then 
         
          		sqlanaguten =" SELECT CODI_UTEN "_
         		&"    from ANAGUTEN "_
         		&"    where NOME_UTEN='"& rs("USER_PROP") &"' "
         		
         		'response.write sqlanaguten
       
         		Set rsuten = cn.Execute(sqlanaguten)       
         %>
             
         " >  Visualizza dati 
         <% 
          		rsuten.Close
          		set rsuten= Nothing
          else          
         %>
           Inserisci dati          
         <% end if %>
         </td>

Succede che sulla macchina locale è tutto ok, ovvero passa all'else scrivendomi "Inserisci dati", mentre in esercizio (dove perarltro non posso eserguire alcun test, quindi nemmeno response.write) mi da questo (solito) errore, incomprensibile

ADODB.Field error '80020009'

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

/anagazie.asp, line 0

Ho letto vari interventi (anche qui), ma non riesco ad uscire!!
Come poter fare per andare sul sicuro, senza dover mettere mano sull'ambiente di esercizio?

Grazie dell'aiuto...

[optime]

racchiudi la tua if in un'altra

IF NOT RS.EOF THEN
.... qui metti il tuo codice
END IF

[mosquito70]

Intendi dire così?

<td class=testolabel>
         <% 
           if rs("USER_PROP") <> "XXXXX" then 
         
          		sqlanaguten =" SELECT CODI_UTEN "_
         		&"    from ANAGUTEN "_
         		&"    where NOME_UTEN='"& rs("USER_PROP") &"' "
         		
         		'response.write sqlanaguten
       
         		Set rsuten = cn.Execute(sqlanaguten)       
                         IF NOT RS.EOF THEN
         %>
             
         " >  Visualizza dati 
         <% 
                          END IF
          		rsuten.Close
          		set rsuten= Nothing
          else          
         %>
           Inserisci dati          
         <% end if %>
         </td>

Domani provo e vi faccio sapere.
Intano grazie mille

Paolo

[Mems]

Esatto.