Progressione automatica su campo unito o concatenato

[Puntafiletto]

Salve a tutti!
Sono al battesimo del Forum e spero di darvi tutti gli elementi per provare a risolvere un problema che da giorni mi da il tormento
Ho costruito un DB con le segueti caratteristiche ma non riesco a fagli fare l'operazione che ora provo a spiegare.

Partendo da una tabella così strutturata:

FORNITORI
CODICE_FORNITORE|NOME_FORNITORE
XXX|Pippo
YYY|Pluto
ZZZ|Gastone


dovrei procedere a popolarne un'altra (CONTENITORI) dove ad ogni fornitore corrisponda un contenitore a numerazione automatica e progressiva il cui numero sia formato per una parte dal proprio CODICE_FORNITORE e per il resto da un numero che parta,per esempio, da 100.
Man mano che si vanno a creare i contenitori per fornitore questi dovranno assumere la seguente struttura:


CONTENITORI
Fornitore|Contenitore
Pippo|XXX100;
Pippo |XXX101;
Pippo |XXX102

e così via per tutti gli altri fornitori.

Grazie a quanti vorranno darmi delle preziose indicazioni.
Puntafiletto

[Holidaysoft.it]

Ciao,
quale db stai utilizzando?

[Puntafiletto]

OPS!!
Access 2007
Grazie

[Holidaysoft.it]

Ciao,
in un modulo vba devi creare la stringa sql per l'insert dove l'id è da creare come nell'esempio sotto riportato:

NEW_ID = "TR_" & Format(Date, "yy") & "_" & Format(IIf(IsNull(DMax("[Num_passaggio]", "[TB_GUIDA]", "[Num_passaggio] like 'TR_" & Format(Date, "yy") & "_????'")), 1, Right(DMax("[Num_passaggio]", "[TB_GUIDA]", "[Num_passaggio] like 'TR_" & Format(Date, "yy") & "_????'"), 4) + 1), "0000")


STRSQL2 = "INSERT INTO TB_GUIDA (Num_passaggio,Sistema, Id_Stato_Passaggio, Data_Modif_Coll,Data_Modif_Prd ) VALUES ('" & NEW_ID & "','TR','8','" & NOW_DATE & "','" & NOW_DATE & "');"

DoCmd.RunSQL STRSQL2

l'esempio crea un id come questo:

TR_12_0001
....
....
TR_12_0004

per far funzionare l'esempio su riportato, basta creare una tabella chiamata TB_GUIDA con una colonna di tipo text chiamata Num_passaggio.
Nel tuo caso devi modificare un pò di parametri (esempio cambiare TR con codice fornitore, ecc)

Ciao
Mik

[Puntafiletto]

Grazie mille.
Per me è Arabo ma ci proverò ugualmente.

[Puntafiletto]

Buonasera a tutti.
Sono in difficoltà, non riesco a mettere in pratica la soluzione propostami da Holidaysoft.it.

Mi potete aiutare?

Grazie.

Puntafiletto