Newsgroup: it.comp.appl.access
Titolo: Query di accodamento??

salve a tutti, ho un problema con la creazione di una tabella.
Il mio
database č composto da una tabella che ha i seguenti campi:
ID Giorno
Contatore
Responsabile Testo
Frequenza Numerico
ed un'altra tabella:
ID Giorno Contatore
Responsabile Testo
Cliente Testo
Orario Data
Ho
creato una maschera per riempire la prima tabella. Supponiamo che i valori
siano i seguenti:
ID Giorno Responsabile Frequenza 
   1         paolo
2
   1         marco        3
   2         paolo        2
una volta
inseriti i dati nella prima tabella vorrei che la seconda tabella fosse
cosě formata:
ID Giorno Responsabile     Cliente           Orario
1          paolo     da inserire      da inserire
ID Giorno Responsabile
Cliente           Orario 
    1          paolo     da inserire      da
inserire
ID Giorno Responsabile     Cliente           Orario 
    1
marco    da inserire      da inserire
ID Giorno Responsabile     Cliente
Orario 
    1          marco    da inserire      da inserire
ID Giorno
Responsabile     Cliente           Orario 
    1          marco    da
inserire      da inserire
ID Giorno Responsabile     Cliente
Orario 
    2          paolo     da inserire      da inserire
ID Giorno
Responsabile     Cliente           Orario 
    2          paolo     da
inserire      da inserire
ID Giorno, come responsabile, deve essere
uguale alla prima tabella ed in piů deve esserci un record per ogni
responsabile e per un numero pari alla frequenza.
Io avevo pensato di fare
una query di accodamento ma riesco ad ottenere un solo record per ogni
responsabile e non un numero pari al campo frequenza.
E' questa la strada
che devo seguire o esiste una piů semplice?
Vi ringrazio anticipatamente.
A presto
--------------------------------
Inviato via 
http://usenet.iol.it

 che devo seguire o esiste una piů semplice?
Lo puoi fare con i recordset via codice.
Ti apri il recordset tabella d'origine e fai un ciclo su tutti i record. Per
ogni record leggi il valore della frequenza e aggiungerai nell'altro
recordset che intanto avrai aperto, quello della tabella destinataria, tanti
record quant'č il valore della frequenza.
Pertanto
set rstFrom = currentdb.openrecordset("Origine")
set rstTo = currentdb.openrecordset("Destinazione")
rstFrom.movefirst
do until rstFrom.EOF
  freq = rstFrom.fields("Frequenza")
  for i = 1 to freq
    rstTo.addnew
    rstTo.fields("Responsabile") = rstFrom.fields("Responsabile")
    rstTo.fields("Orario") = "Da definire"
    rstTo.fields("Cliente") = "Da definire"
    rstTo.update
  next
  rstFrom.movenext
loop
rstFrom.close
rstTo.close
set rstFrom = Nothing
set rstTo = Nothing
Antonio

194Z133Z156Z218...@usenet.iol.it...
Ti ringrazio
moltissimo dell'aiuto che mi hai dato, non ci sarei mai arrivata. Scusami
ma ti faccio un'altra domanda.
Il codice che mi hai scritto lo devo
inserire in un modulo e creare un pulsante che sull'evento onClick richiama
la funzione o va messo altrove??
Grazie e ciao!!!!!



Noto con piacere che ti ho portato sulla cattiva strada. ;-)
Ciao
Roberto

 wrote in message
PEGu6.9853$dJ6.6...@news.infostrada.it...

-----------------------------------
Scusate se mi intrometto ma l'argomento mi interessa cosě ho provato la
routin di Antonio;
ma il Sistema mi risponde:
"Variabile oggetto o variabile del blocco With non impostata"
facendo il debug il problema pare che sia su
rstTo.Close
Che io ho dichiarato come recordset, cosě come rstFrom
Dove sta il problema?
Mario

 wrote in message
9YHu6.10206$dJ6.6...@news.infostrada.it...

E' vero...
Tu pensa che avevo scritto offline il messaggio senza il codice, ma solo con
l'indicazione per farlo...
Poi l'ho ripreso e ho fatto l'aggiunta...
Vabbè... siamo in quaresima... e poi si chiama Luisa...
Antonio

 la funzione o va messo altrove??
Dipende come si evolve la tua elaborazione. Se l'utente vuoi lasciare il
compito di eseguire l'aggiornamento, o tu sei l'utente, prememndo un
pulsante, ok. Se vuoi farlo in automatico potresti farlo alla chiusura della
maschera, insomma vedi un po' tu.
Antonio

 wrote in message
99hgu9$hc9$1...@serv1.albacom.net...

E' strano. Controlla come hai scritto la variabile nella dichiarazione e nel
metodo close. Controlla se non hai prima fatto il nothing dell'oggetto.
Comincia con questo che č quello che mi viene in mente su due piedi...
A me funziona...
Antonio

 Antonio
Comunque č l'ennesima dimostrazione della saggezza dei proverbi.
Nessuno vorrebbe divenire zoppo, ma č ineluttabile che:
"Chi va con lo zoppo impara a zoppicare"  ;-)
Buon inizio di ora legale.
Roberto

 Buon inizio di ora legale.
Buon ultimo lunedi del mese...
Antonio