Errore Lettura da database

[arrows]

questo è il codice incriminato:

<% dim objconn
objconn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("/mdb-database/visitatori.mdb")

Set dbconn = Server.CreateObject("ADODB.Connection")
dbconn.Open objconn 
query="SELECT * FROM contatore" 
Set rs = dbconn.execute(query)   

rs.close
        set rs = nothing
		dbconn.close
		set dbconn = nothing

          
    %>

poi più in basso

<%response.write "" & rs("Visite") &""  %>

.
semplice no?
Ed ecco invece l'errore

Tipo di errore:
Errore di run-time di Microsoft VBScript (0x800A000D)
Tipo non corrispondente: 'rs'
/index.asp, line 114

dove sbaglio?
Ah il campo è numerico...

[99eros9]

chiudi e ripulisci l'istanza dell'oggetto recordset e poi lo utilizzi... è questo l'errore
rs.close
set rs = nothing
va posto alla fine, nel tuo caso

[arrows]

OK ora va ma non visualizza lo stesso il numero
ti posto il codice completo

<% dim objconn
objconn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("/mdb-database/visitatori.mdb")

Set dbconn = Server.CreateObject("ADODB.Connection")
dbconn.Open objconn 
query="SELECT * FROM contatore " 
Set rs = dbconn.execute(query)   
%> 
          
          
          
          
          
          <p align="center"><font size="4" color="#0000FF">Sei Il visitatore N°<%'response.write "" & rs("visite") &"" %>
<%
set rs = nothing
		dbconn.close
		set dbconn = nothing
		%>

[99eros9]

devi togliere l'apice, altrimenti è soltanto un commento

[arrows]

che errore assurdo, da imb******.
grazie x l'aiuto

[99eros9]

capita