ciao a tutti,

ho un errore di tipo :

error '80020009'
Eccezione.

su questa riga:


if CInt(id) = rs1("id_colore") then



che mi blocca una procedura


vi posto una parte di codice:

sql= "select distinct descrizione from colori_lenti"
rs.open sql,conn,3,3


i=0

do while not rs.eof

descrizione = rs("descrizione")

sql1="SELECT * FROM colori_lenti where descrizione = '"&descrizione&"'"
rs1.open sql1,conn,3,3

id = rs1("id")
colore = rs1("colore")

rs1.close
sql1="SELECT id_colore FROM associazione_colori_lenti where id_lente = "&request("id_lente")&" and id_colore = "&id
rs1.open sql1,conn,3,3

'QUESTA è LA RIGA CHE MI DA' ERRORE
if CInt(id) = rs1("id_colore") then%>

<tr>
<td width="8%" style="border-style: none; border-width: medium" align="center" height="27">
<input type="checkbox" name="colore<%=i%>" value="<%=descrizione%>">
</td>
<td width="45%" style="border-style: none; border-width: medium" height="27">
<p align="center"><font face="Verdana" size="1" color="#0061C1">
<%=descrizione%></font></td>

<td width="11%" style="border-style: none; border-width: medium" height="27">
<p align="center"><font face="Verdana" size="1" color="#0061C1">
<%
rs1.close
sql1="SELECT assorbimento FROM colori_lenti where colore = '"&colore&"' order by assorbimento"
rs1.open sql1,conn,3,3

%><select name="assorbimento"><%

do while not rs1.eof


%><option value="<%=rs1("assorbimento")%>"><%=rs1("assorbime nto")%></option><%

rs1.movenext
Loop

%></select>
</font></td>
</tr>

<%
end if

i = i+1
rs1.close
rs.movenext
Loop