[VB6] problemi DB e fields

[yyzyyz]

ciao, problema:
ho un database aperto con una tabella xxx, se voglio salvare dei dati in una tabella yyy come devo fare senza kiudere la connessione con la tabella xxx ?

ps. ho la necessità di passare dei dati da una tabella xxx ad una yyy, ma senza kiudere la conessione con la tabella xxx, è fattibile? e soprattutto mi avete capito? :gren:

[Dave83]

Sì è fattibile
Basta ke usi x esempio un recordset cn cui apri la tabella xxx e cn un altro recordset apri la tabella yyy
poi copi ogni riga della tabella xxx in yyy

[yyzyyz]

:quipy: qualke esempio ?

PS. come faccio a puntare il record su un determitato id?
rs.index = 3 ???

help me

[Dave83]

Ehm il fatto è ke nn programma + in vb6, cmq +o- è così

Dim conn As ADODB.Connection
Dim rs1 as ADODB.Recordset
Dim rs2 as ADODB.Recordset

conn.ConnectionString(strconn) 'strconn è la stringa di connessione al database
rs1.open("xxx",conn)
rs2.open("yyy",conn,2,2)
do while not rs1.eof
    rs2.addnew()
    rs2.item("nomecampo")=rs1.item("nomecampo")  'nn ricordo se la proprietà item è giusta
    rs2.update
    rs1.movenext
next
rs1.close
rs2.close
conn.close

[yyzyyz]

grazie x il codice, ascolta ma io posso aggiornare i dati dalla tabella xxx alla tabella yyy senza creare una coneessione secondaria ?
Cioè, nell'esempio ke mi hai dato, lavorare solo con rs1 ?

grazie

[Dave83]

Non lo so, io lo so fare così :tongue:

[yyzyyz]

grazie x la dritta sono a buon punto