Newsgroup: it.comp.appl.access
Titolo: Ciclo for each next

Problema:
Recordset di tipo ADO,accesso diretto alla tabella,nella tabella c'è un
campo che desidero riempire quando lo ritengo necessario con un dato
presente su una maschera.Secondo voi va bene un ciclo for each next
attraverso i campi del recordset per assegnarli il dato.
Io ci ho provato ma non ci sono riuscito,potreste rispondermi con un
esempio?
Grazie
Ciao
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 attraverso i campi del recordset per assegnarli il dato.
A quanti campi devi assegnare il valore?
Sib

Ciao
rs![nomecampo]=me.nomecontrollo
Saluti.
Emanuele.

Dipende dal numero di articoli scelti dal cliente.Per esempio se ho un
preventivo con trenta articoli, e il cliente me lo accetta, allora a 
quel punto devo inserire in ogni campo(lasciato appositamente vuoto)
relativo al record di quell'articolo, il numero di riferimento ID del
preventivo.


Ciao
ma qui ci simao impazziti!
Saluti.
Emanuele.

 Emanuele.
Hai perfettamente ragione,spiegata cosě sembra veramente una pazzia.
Dunque, il database č strutturato cosě:
Tab.Arch.Clienti in relazione uno-molti con la Tab.Arch.Prev. attraverso
il campo IDNome e il campo nome.La tab.Arch.Prev. č in relazione uno-
molti con la tabella Arch.Art.Prev. attraverso il campo IDPrev. e il
campo
NumPrev.
C'č poi una tabella nominata "Appoggio"
(praticamente un clone della tabella Arch.Art.Prev.)ed č quella che 
uso per inserire gli articoli scelti dal cliente (non sto adesso a
spiegare
tutto il meccanismo delle maschere che uso), 
sa alla fine il mio cliente decide di acquistare apro
un recordset basato sulla tabella Appoggio inserisco il numero di rife_
rimento nel campo Num.Prev. e spedisco i record nella tabella
Arch.Art.Prev.
facendo poi pulizia nella tabella appoggio.
Sicuramente non sarň stato capace a spiegarmi.
Ti ringrazio lo stesso.


Ciao 
che è perl'appunto una pazzia....
ma come cavolo hai strutturato l'archivio?
mi dispiace ma da quello che dici non riesco a capirne il senso.
prova a chiedere agli altri
Saluti.
Emanuele.

 tutto il meccanismo delle maschere che uso), 
Potresti creare una form legata alla tabella appoggio con un campo
casella di riepilogo, impostando la possibilità di scelta multipla.
Una volta selezionate le voci desiderate con un bottone comando puoi
trascrivere i "selected.items" nella tabella di destinazione.
Comunque, sono io stesso "poco convinto" di quanto suggerito sopra, mi
sembra che come ha scritto il nostro amico dovresti rivedere il flusso
del tuo database per evitare una ridondanza di dati.
Ciao Gianpaolo 


Appunto per questo l'ho fatto, se al cliente va bene confermo il
preventivo
assegnando ad ogni articolo il proprio indirizzo e inviando 
i dati alla tab Arch.Art.Prev.. 
La tabella appoggio come dici giustamente,
l'ho associata ad una casella di riepilogo in un form, e alla fine
di ogni preventivo, che sia andato a buon fine o no la svuoto sempre.
Ciao


 di ogni preventivo, che sia andato a buon fine o no la svuoto sempre.
Non ho ben chiaro il problema in ogni caso, dal comando puoi prelevare
le selezioni presenti nella tabella riepilogo con un codice tipo questo:
    Dim DB As Database
    Dim frm As Form, ctl As Control
    Dim varitm As Variant
    Dim prt As Recordset
    Set DB = CurrentDb
    Set frm = "nome della tua form"
    Set prt = DB.OpenRecordset("Nome della tua tabella temporanea")
    Set ctl = frm.NomeDellaCasellaCombinata
 DB.Execute "DELETE * From Nome della tua tabella temporanea"
    For Each varitm In ctl.ItemsSelected
        prt.AddNew
        prt("NomeCampoNelRecordset") = ctl.ItemData(varitm)
        prt.Update
    Next varitm
Spero di aver intuito giusto.
Ciao Paolo


                         GRAZIE
CIAO.
