[Access] Inizializzare contatore

[kadorit]

Ho un campo contatore che si incrementa di uno per ogni occorrenza inserita, ora se vado a cancellare dei record il contatore parte dal numero dei record totali, compreso quelli cancellati, esiste un modo per farlo ripartire dal numero di record presenti sulla tabella e non da quelli totali?

[Misterxxx]

Elimini il campo contatore, salvi, poi lo rimetti con lo stesso nome ... riparte da 1.

[kadorit]

Non lo posso cancellare è in relazioni con altre tabelle, perderei tutti i dati immessi fino a quel punto

[Misterxxx]

Se c'è una relazione non puoi ovviamente cancellarlo e la cosa è più complessa.
Sulla guida in linea è indicato cmq il metodo.
La domanda è scontata: ma perchè lo faresti?

[holifay]

come dicevano prima di me è più complesso, ma c'è un sistema semplice, basta che lo usi attentamente:

Function imposta_contatore()
DoCmd.RunSQL ("ALTER TABLE nome_tabella ALTER COLUMN nome_campo_contatore COUNTER (x)")
End Function

mettilo in una procedura e provalo.

X = numero da cui vuoi che parta il nuovo contatore modificato. Tieni conto che se cancelli dei record appena inseriti la procedura ti può essere utile, perchè imponi X= valore del contatore dell'ultimo record, ma se invece hai cancellato dei record in mezzo al dB allora non va bene perchè troveresti dei valori di contatore non più univoci...
In questo caso c'è il sistema di Misterxxx (è il più comodo) o qualcosa anche d'altro. Se ti serve lo provo perchè non mi è mai servito e poi lo posto.

[kadorit]

bella soluzione, posta anche l'altra
grazie

[longline]

Il contatore dovrebbe essere utilizzato solo come generatore di ID univoci, senza significato per l'utente.

[kadorit]

Stavo provando a soluzione di holifay però non va perchè il campo è in relazione con altri campi di altre tabelle.

[holifay]

Se i campi sono in relazione c'è poco da fare, se non cancellare la relazione, aggiornare l'indice e ricrearla. Come vedi diventa sempre più "complicato" e poco agevole. Se è una cosa che vuoi comunque fare (e magari con frequenza) ti può essere utile automatizzare la creazione delle relazioni. Il codice da usare (supponendo di avere due campi in relazione tra loro con lo stesso nome ID_campo) è di questo tipo:

function crea_relazione()
Dim rel_nuova As relation
Set rel_nuova = CurrentDb.CreateRelation("0", "tabella_primaria", "tabella_secondaria", attributes)
        relnuovo.Fields.Append relnuovo.CreateField("ID_campo")
        relnuovo.Fields![ID_campo].ForeignName = "ID_campo"
        CurrentDb.Relations.Append rel_nuova
end function

Per i valori della costante "attributes" guarda sulla guida di Access. E' una costante che definisce il tipo di relazione:

dbRelationUnique 		La relazione è uno-a-uno 
dbRelationUpdateCascade 	Gli aggiornamenti vengono eseguiti in successione. 
dbRelationDeleteCascade 	Le eliminazioni vengono eseguite in successione.

Comunque, come ti hanno detto, il campo contatore di solito non deve avere significato per l'utente del Dbase. Se ne vuoi uno da modificare liberamente ti conviene creare un campo numerico che puoi incrementare a tuo piacere (con una procedura) ed usare per tutti gli scopi che vuoi.