Newsgroup: it.comp.appl.access
Titolo: Etichette duplicate

Ciao,
ho un db in cui tengo i dati su cartelle raccoglitrici contenenti varia
documentazione. Ogni cartella contiene diversi depliants, di consiguenza
ogni record relativo ad una cartella include un campo che indica il numero
di depliants contenuti.
Il mio problema e' relativo alla necessita' di stampare delle etichette da
attaccare sui depliants che riportino il numero della cartella in cui sono
contenuti.
Come si fa' a stampare tante etichette per record quante sono indicate nel
relativo campo?
Grazie a tutti
Francesco Baralli


Intuisco che il problema è sicuramente legato alla non normalizzazione
del db e ti reinvito a procedere alla normalizzazione dello stesso.
Per intenderci è MOLTO + semplice lavorare su una tabella come:
IDCliente    Cliente
===============
1                PINCO                  Record1
2                PALLO                 Record2
3                BISO                     ....
4                SCRAUSO          RecordN
Piuttosto che su una roba tipo:
Quanti    PRIMO SECONDO TERZO QUARTO
====================================
4            PINCO  PALLO         BISO     SCRAUSO          Record1
Spero di essere riuscito a spiegarmi e perdonami se ho
frainteso qualcosa.
Bye, Ste

 si decideva a rispondere al tuo post...
[..]

4            PINCO  PALLO         BISO     SCRAUSO          Record1
LOL Giusto per mettere in chiaro le cose, eh?
:-D
--
Lorenzo Coronati
--
<<Nessuno sa che questa affermazione e' vera>>
(John D. Barrow)
--


Quando dici "so come farlo" presumo ti riferisca all' autocomposizione
report etichette...
E' del tutto evidente che è il metodo + facile, è altresì evidente che
per mantenere le cose su questo livello di semplicità occorre usare
una soluzione "brute-force" (l' autocomposizione infatti prende i dati
solo da una tabella/query).
Direi che la strada potrebbe essere crearsi una tabella temporanea
con gli n-record da stampare e passare quella al report etichette;
brute-force quanto vuoi ma funziona e te la cavi con poche linee
di codice.
Ad esempio:
================================================
Function CreaTempTab()
dim db as database
dim rss as recordset
dim rsd as recordset
dim fld as field
dim i
set db = currentdb
docmd.runsql "delete * from TmpTBL"
set rsd = db.openrecordset("select * from TmpTBL")
'TmpTBL sarà una tabella con un ID di tipo Contatore
set rss = db.openrecordset("select * from cartelle")
do while not rss.eof
    for i = 1 to rss!Numero_Depliants
         rsd.addnew
            for each fld in rss.fields
               rsd.fields.(
fld.name
).value = fld.value
            next
         rsd.update
    next
    rss.movenext
loop
rss.close
rsd.close
End Function
========================================================
Qualche "cappellina" ci potrebbe essere visto che sono andato
a memoria, ma il "succo" credo sia corretto e di immediata
comprensione....
E' chiaro che la soluzione non è delle + eleganti e neppure delle
+ veloci; imho in questi casi in genere la soluzione "migliore" è
comunque sempre la creazione di un file testo da copiare poi
sulla stampante, ma certamente così perdi la facilità del RAD
e se comunque nessuno viene a farti le pulci sul codice chissenefrega!!
Bye, Ste