Appena inserisco la select la pagina mi va in errore dopo che la carica per mezzora.

Cominciamo con il codice:


<%
Dim categorie
Dim categorie_cmd
Dim categorie_numRows

Set categorie_cmd = Server.CreateObject ("ADODB.Command")
categorie_cmd.ActiveConnection = MM_inserisci_STRING
categorie_cmd.CommandText = "SELECT * FROM Categorie order by NomeCat ASC"
categorie_cmd.Prepared = true

Set categorie = categorie_cmd.Execute
categorie_numRows = 0
%>

<select name="Categoria" id="NomeCat" onchange="Richiesta('subcatsel.asp?cat='+this.valu e,'sub','sub');">
<%
While (NOT categoria.EOF)
%>
<option value="<%=(categoria.Fields.Item("IDCat").Value)%> " <%If (Not isNull(request.form("Categoria"))) Then If (CStr(categoria.Fields.Item("IDCat").Value) = CStr(request.form("Categoria"))) Then Response.Write("selected=""selected""") : Response.Write("")%> ><%=(categoria.Fields.Item("categoria").Value)%> </option>
<%
categoria.MoveNext()
Wend
If (categoria.CursorType > 0) Then
categoria.MoveFirst
Else
categoria.Requery
End If
%>

</select>


TENETE CONTO CHE LA TABELLA CATEGORIE E' RELAZIONATA CON LA TABELLA Sottocategorie nel data-base.

Per la quale devo ancora fare la dimm e tutto.

Dov'è l'errore?