Non trovo l'errore! VI PREGO AIUTATEMI!!!!!!

[stefanoCavriana]

<%

dim StrSLQ, strConn


' Definisci la connessione
Set objConn = Server.CreateObject("ADODB.Connection")

' Definisci stringa di connessione
strConn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("../database/prodotti.mdb")

' Apri la connessione
objConn.Open strConn

'Selezione SQL
StrSQL = "SELECT categoria FROM Italiano"

' objConn.Open strConn
Set rs = Server.CreateObject("ADODB.Recordset")


%>

<form>
<select>
<%
do
%>
<option> <% Response.Write(rs.Fields.Item("categoria").Value) %> </option>
<%
rs.MoveNext()
Loop while (NOT (rs.EOF))
%>
</select>
</form>

<%

' Chiudi la connessione
objConn.Close

' Distruggi l'oggetto
Set objConn = Nothing

%>

[optime]

----------------------------------------------------
standing ovation per il titolo del thread. urge (ri)lettura attenta e consapevole del regolamento.
----------------------------------------------------

[engi62]

può darsi che io mi sbagli (non uso lo stesso tipo di connessione) ... ma non vedo dove associ la stringa StrSQL al recordset rs .... crei rs ... ma sei sicuro che gli dici "esegui l'azione che ho chiamato StrSQL"?

engi