L'operazione non è consentita se l'oggetto è chiuso ADODB.Field (0x80020009)

[giovanni1975]

ciao aiutooooooo

questa striga:

SQL="SELECT * FROM "&tabella&""
Set rec = Server.CreateObject("ADODB.Recordset")
Set Rec=Conn.Execute(SQL)
While Not rec.EOF
dim ragsoc
ragsoc = rec("ragionesociale")

    <% rec.MoveNext
Wend
rec.close%>

L'errore è generico e non mi viene restituito su nessuna linea.
Come devo fare?

[Roby_72]

La connessione la apri?
La dim mettila fuori dal ciclo.

Roby

[giovanni1975]

certo che la apro, con un include file che ha questo codice:

<%
Dim Conn
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath("../../mdb-database/aziende.mdb")
%>

la variabile l'ho messa fuori..

[optime]

non si fa così

Set Rec=Conn.Execute(SQL)


ma così

Rec.open sql, Conn

[Roby_72]

Usa questa:

Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.MapPath("/mdb-database/aziende.mdb")

Roby

[giovanni1975]

Ho inserito
come hai detto

Rec.open sql, Conn

ma non va...

sempre lo stesso errore.

[optime]

che vuol dire NON VA? s'è spenta? è stitica?

[giovanni1975]

che non funziona.

[optime]

vabbè, ciao. o ti spieghi, o ciccia

[giovanni1975]

che anche inserendo la stringa

Rec.open sql, Conn

non funziona.