Newsgroup: it.comp.appl.access
Titolo: Numerare progressivamente (al volo ) i record di una tbl

Come da oggetto, è possibile tramite query Sql numerare progressivamente dei
record contenuti in una tbl qualsiasi (senza utilizzare il campo contatore)?
Es tbl MarcheAutomobili
            Ferrari
            Ford
            Audi
-->
1    Audi
2     Ferrari
3    Ford
Grazie per le eventuali risposte,
Lucy

 ha scritto nel messaggio
news:74WP9.48434$R45.2...@news2.tin.it...

Personalmente  uso il codice.
Un semplice ciclo. Conto i record e poi con un for..next il gioco è fatto.
Ovviamente ho aggiunto un campo numerico alla tabella, prima della funzione.
Esempio:
Public Sub AggiungiNumeri()
On Error Resume Next
Dim rcs As Recordset, i As Long
Set rcs = CurrentDb.OpenRecordset("TuoRecordset")
rcs.MoveLast
rcs.MoveFirst
For i = 1 To rcs.RecordCount
    With rcs
    .Edit
    !CampoNumerico = i
    .Update
    .MoveNext
    End With
Next i
rcs.Close
End Sub
Ciao, Carlo

 ha scritto nel
messaggio news:FKWP9.48719$R45.2...@news2.tin.it...

Ciao Carlo  , e a tutto il NG.... per cortesia puoi spiegarmi piu in
dettaglio la Funzione che hai elaborato in questo post ? il debug mi da un
errore sulla riga ".Edit" del codice e inoltre vorrei sapere come
utilizzarla dato che mi interessa molto.
Grazie e buona serata!
Paolo


Nell'esempio .Edit permette di "editare" appunto un campo che si chiama (per
esempio) "CampoNumerico" con un valore ti tipo long.
La funzione serve a dimostrare come si possa aggiungere un valore
progressivo in un campo di tipo numerico.
Nel caso specifico Lucy aveva una tabella senza questo campo numerico.
Quindi il primo passo è stato quello di aggiungere tale campo,
successivamente, tramite la sub, si è popolato il campo con una serie di
numeri unici e progressivi.
In dettaglio la sub:
Dichiarazione di variabili,
Apertura del set di record (la tabella o query) che deve essere editabile,
Conteggio dei record presenti nel recordset,
Muoversi dal primo all'ultimo record inserendo nel campo appropriato il
valore del contatore (variabile i di tipo long).
Chiusura del recordset.
Ciao, Carlo


Grazie Carlo .... sei stato come sempre gentilissimo e chiaro! adesso tocca
a me...mettermi al lavoro!
Ti auguro un felicissimo anno nuovo! esteso naturalmemte a tutto il NG :))
Paolo

 Paolo
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 Roberto
Ciao Roberto, e a tutto il NG, credo di essere il primo a darti il buon anno
...nel nuovo anno e ne sono contento dato che i tuoi suggerimenti, e dei
colleghi del NG, sono sempre molto molto preziosi ed è sopratutto con quelli
che sto capendo molto meglio le logiche del linguaggio VBA.
In effetti una delle cose che mi sfuggive sempre erano i riferimenti da
impiegare se si utilizza una versione di Access superiore alla '97.
Ti auguro un felicissimo 2003, sereno, e senza dubbio ti leggero sempre con
attenzione e molta stima........
Con riconoscenza
Paolo



Anche se leggo il Ng solo ora mi associo agli auguri ed ai ringraziamenti
...
Lucy



Un felice 2003 a te.
--
Roberto



Tanti auguri a te di un Buon Anno Nuovo.
--
Roberto
