Query SQL e valori record

[ettore8]

Ciao a tutti !

In una pagina ho una query SQL INSERT INTO.
La tabella su cui agisce la query, ha un campo contatore e, ovviamente tramite la query non lo aggiungo ma lascio fare tutto ad access solo che, nel resto del codice della pagina avrei bisogno di quel valore ...
Es:

sql = "INSERT INTO tabella (campo1, campo2) VALUES ('ciao1', 'ciao2')

set rec = conn.execute(sql)

--> Response.write rec("ID") <--

ovviamente mi da errore dicendo che non c'è il campo. come posso fare ?

Grazie

ettore

P.s. : nella query, per inserire le date, come carattere delimitatore cosa devo usare ? Grazie

[orcim]

devi eseguire la query tramite l'aperture del recordset:

sql = ...
Set rec = Server.CreateObject("ADODB.Recordset")
rec.Open sql, cn, 3, 3
Do While Not rec.EOF

id = rec("id")

response.write id &"
"

rec.MoveNext
Loop
rec.close

cn.close
set rec = nothing
set cn = nothing

Per l'insrimento utilizza la sintassi:

#"&DataOggi&"#

[ettore8]

Ti ringrazio per la risposta ma non va ...

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

sql = "INSERT INTO ...

rec.Open sql, con, 3, 3

L'errore restituito è questo :

ADODB.Recordset (0x800A0BB9)
Gli argomenti non sono di tipo valido, non sono compresi nell'intervallo consentito o sono in conflitto.

Ovviemente, ho già verificato che i valori che do ai campi sono corretti dal punto di vista tipo campo - valore.

Aiuti ?

Grazie

[viki1967]

controlla il nome della tua connessione al dbase... nell'esempio di orcim è chiamata "cn"... coincide con la tua?

[ettore8]

VVoVe: VVoVe:

Avevo sbagliato a scrivere con al posto di conn

Ma ho ancora il problema di prima ...

response.Write(rec("tID"))

Mi dice :

ADODB.Recordset (0x800A0CC1)
Impossibile trovare l'oggetto nell'insieme corrispondente al nome o al numero richiesto.

[viki1967]

sql = ...

Set rec = Server.CreateObject("ADODB.Recordset")
rec.Open sql, cn, 3, 3
Do While Not rec.EOF

id = rec("id")

response.write id &"
" 

rec.MoveNext
Loop
rec.close

conn.close
set rec = nothing
set conn = nothing

[ettore8]

Codice :

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

sql = "INSERT INTO tabella (campo1, campo2) VALUES ('cmp1', 'cmp2')

rec.Open sql, conn, 3, 3

do while not rec.EOF
id = rec("tID")
response.Write id & "
"
rec.movenext
loop

Errore:

ADODB.Recordset (0x800A0E78)
L'operazione non è consentita se l'oggetto è chiuso.

Se cambio la query e metto una banalissima SELECT, tutto funziona

Grazie ancora

[viki1967]

dove chiudi il recordset?

[ettore8]

Alla fine della pagina, chiudo rs, conn e faccio Set rs = nothing !

Il fatto è che se metto una query SELECT, il codice funziona ... VVoVe:

[viki1967]

prova ad escludere chiusura e distruzione del recordset.