error su script

[numapompilio]

<select size="1" name="zona" style="font-size: 8 pt; font-family: Arial; font-variant: small-caps; background-color: #FFFFFF; color: #000000">
<option value="">TUTTE</option>
<%
Set Con = Server.CreateObject("ADODB.Connection")
Set rsQuery = Server.CreateObject("ADODB.Recordset")
Path = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
Path = Path & Server.MapPath("public/offerte.mdb") & ";Mode=ReadWrite"
Con.Open Path
Set rs = Con.Execute("select zona from zona where paese= 'ARGENTINA' order by zona Asc")
while rs.eof = false
%>
<option value="<%=Rs(0)%>"><%=Rs(0)%></option>
<%
rs.MoveNext()
wend
rs.close
con.close
%>

</select>



con questo menu a discesa mi da questo errore di continuo :

Microsoft JET Database Engine error '80004005'

System resource exceeded
/public/addest.asp line 55

cioè qui

Set rs = Con.Execute("select zona from zona where paese= 'ARGENTINA' order by zona Asc")


ma è tutto a posto ???

come mai fa cosi ?

sapete trovare una soluzione ?

[steweb]

se usi execute determini già un recordset quindi questo lo puoi togliere

Set rsQuery = Server.CreateObject("ADODB.Recordset")


e poi :

"select zona from zona where paese= 'ARGENTINA' order by zona Asc"

aggiungi il campo paese

"Select zona, paese From zona Where paese ....."

Steweb