Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Creare campo contatore da codice

347 views
Skip to first unread message

Maicol

unread,
Oct 14, 2002, 12:57:40 PM10/14/02
to
Un saluto a tutti. Come da oggetto volevo sapere se e' possibile creare da
codice un campo di tipo contatore in una tabella . Se sě come ? Grazie a
tutti.


SimonenomiS

unread,
Oct 15, 2002, 3:13:34 AM10/15/02
to
"Maicol" <enzo...@libero.it> wrote in
news:8ICq9.30356$%M1.7...@twister2.libero.it:

> Un saluto a tutti. Come da oggetto volevo sapere se e' possibile
> creare da codice un campo di tipo contatore in una tabella . Se sě
> come ? Grazie a tutti.
>

URL: http://www.sitocomune.com/
Sezione: Tables
Titolo: Cos'č un ID? Contatori, numeri, e altro.

Ciao.

--
http://digilander.libero.it/winses

Roberto da casa

unread,
Oct 15, 2002, 8:41:46 AM10/15/02
to

"Maicol" <enzo...@libero.it> ha scritto nel messaggio
news:8ICq9.30356$%M1.7...@twister2.libero.it...

> Un saluto a tutti. Come da oggetto volevo sapere se e' possibile creare da
> codice un campo di tipo contatore in una tabella . Se sě come ? Grazie a
> tutti.

Se la tabella si chiama Tabella1 ed il campo contatore de creare si chiama
IDPippo, prova con questo codice VBA:

Dim dbs As Database
Dim tdf As TableDef
Dim fld As Field
Set dbs = CurrentDb()
Set tdf = dbs.TableDefs!Tabella1
Set fld = tdf.CreateField("IDPippo", dbLong)
fld.Attributes = fld.Attributes + dbAutoIncrField
tdf.Fields.Append fld
dbs.TableDefs.Refresh
Set dbs = Nothing
Set tdf = Nothing

Se poi, come normalmente č, il campo contatore IDPippo deve essere anche
chiave primaria di Tabella1, prova invece con quest'altro codice VBA:

Dim dbs As Database
Dim tdf As TableDef
Dim fld As Field
Dim idx As Index
Dim fldIndice As Field
Set dbs = CurrentDb()
Set tdf = dbs.TableDefs!Tabella1
Set fld = tdf.CreateField("IDPippo", dbLong)
fld.Attributes = fld.Attributes + dbAutoIncrField
tdf.Fields.Append fld
Set idx = tdf.CreateIndex("ChiavePrimaria")
Set fldIndice = idx.CreateField("IDPippo", dbLong)
idx.Fields.Append fldIndice
idx.Primary = True
tdf.Indexes.Append idx
dbs.TableDefs.Refresh
Set dbs = Nothing
Set tdf = Nothing


Maicol

unread,
Oct 15, 2002, 10:56:58 AM10/15/02
to

"SimonenomiS" <Si...@nomiS.it> ha scritto nel messaggio
news:Xns92A85E6618994...@193.70.192.192...

> "Maicol" <enzo...@libero.it> wrote in
> news:8ICq9.30356$%M1.7...@twister2.libero.it:
>
> > Un saluto a tutti. Come da oggetto volevo sapere se e' possibile
> > creare da codice un campo di tipo contatore in una tabella . Se sě
> > come ? Grazie a tutti.
> >
> URL: http://www.sitocomune.com/
> Sezione: Tables
> Titolo: Cos'č un ID? Contatori, numeri, e altro.

Grazie daro' un'occhiata.

Maicol

unread,
Oct 15, 2002, 10:56:59 AM10/15/02
to

"Roberto da casa" <r.ma...@libero.it> ha scritto nel messaggio
news:e2Uq9.33271$%M1.8...@twister2.libero.it...

Grazie Roberto provo subito. A proposito come stai? Spero bene !
>
>


Fabrizio

unread,
Oct 15, 2002, 11:05:16 AM10/15/02
to
On Tue, 15 Oct 2002 14:56:59 GMT, "Maicol" <enzo...@libero.it> wrote:

>
>"Roberto da casa" <r.ma...@libero.it> ha scritto nel messaggio
>news:e2Uq9.33271$%M1.8...@twister2.libero.it...
>>
>> "Maicol" <enzo...@libero.it> ha scritto nel messaggio
>> news:8ICq9.30356$%M1.7...@twister2.libero.it...

>Grazie Roberto provo subito. A proposito come stai? Spero bene !

O bella , ma Robè sei stato male ?

Ciao. Fabrizio

Karl Donaubauer

unread,
Oct 15, 2002, 11:03:45 AM10/15/02
to
Maicol schrieb:

> Un saluto a tutti. Come da oggetto volevo sapere se e' possibile
> creare da codice un campo di tipo contatore in una tabella . Se sì
> come ?

Un metodo breve e efficace è SQL p.e.
Currentdb.Execute "ALTER TABLE Tabella ADD COLUMN Campo COUNTER"

--
HTH
Karl
*********
Access-FAQ (tedesco): http://www.donkarl.com

Roberto da casa

unread,
Oct 15, 2002, 11:42:21 AM10/15/02
to

"Fabrizio" <fabrizio...@SPAMtiscalinet.it> ha scritto nel messaggio
news:5kboqugcf9aet4af9...@4ax.com...

> On Tue, 15 Oct 2002 14:56:59 GMT, "Maicol" <enzo...@libero.it> wrote:
>
> >
[CUT]

>
> O bella , ma Robè sei stato male ?

Si, ad inizio anno ho avuto un infarto e conseguente operazione a cuore
aperto.

>
> Ciao. Fabrizio

--
Roberto

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


Roberto da casa

unread,
Oct 15, 2002, 11:42:21 AM10/15/02
to

"Maicol" <enzo...@libero.it> ha scritto nel messaggio
news:%0Wq9.33933$%M1.8...@twister2.libero.it...
[CUT]

>
> Grazie Roberto provo subito. A proposito come stai? Spero bene !

Mi contento! :-)

Grazie!!

Roberto.


Fabrizio

unread,
Oct 15, 2002, 11:55:42 AM10/15/02
to
On Tue, 15 Oct 2002 15:42:21 GMT, "Roberto da casa"
<r.ma...@libero.it> wrote:

>
>"Fabrizio" <fabrizio...@SPAMtiscalinet.it> ha scritto nel messaggio
>news:5kboqugcf9aet4af9...@4ax.com...
>> On Tue, 15 Oct 2002 14:56:59 GMT, "Maicol" <enzo...@libero.it> wrote:
>>
>> >
>[CUT]
>>
>> O bella , ma Robè sei stato male ?
>
>Si, ad inizio anno ho avuto un infarto e conseguente operazione a cuore
>aperto.

Ma stai scherzando? dio mio Robè riguardati adesso .
Ragazzi non lo fate affaticare :-)
( la butto sul ridire , ma sono sconvolto )
Devo aver letto qlc su un qlc 3d tuo ( parlavi anche di dieta , mi
pare ) , ma non l'avevo preso sul serio.
Basta, basta per carità. Robè fai il bravo, adesso.

Ciao. Fabrizio

Massimiliano Amendola kksrl

unread,
Oct 15, 2002, 11:53:36 AM10/15/02
to
> > O bella , ma Robè sei stato male ?
>
> Si, ad inizio anno ho avuto un infarto e conseguente operazione a cuore
> aperto.
>

Fa venire i brividi a risentirlo. Ho seguito le tue vicissitudini anche se
all'epoca non scrivevo ancora. Fabrizio se vai a rivederti i post del
periodo vedrai quanti attestati di stima ha riscosso (e risposto uno a uno)
Roberto.

Sempre in gamba, Roberto,
ciao MAssimiliano


ciao Roberto,


warp

unread,
Oct 15, 2002, 3:39:24 PM10/15/02
to

>Access-FAQ (tedesco): http://www.donkarl.com


Impressionante il counter delle visite: oltre 794.000!!


Fabrizio

unread,
Oct 16, 2002, 3:14:03 AM10/16/02
to
On Tue, 15 Oct 2002 17:53:36 +0200, "Massimiliano Amendola kksrl"
<massimilia...@kksrl.com> wrote:

>> > O bella , ma Robè sei stato male ?
>>
>> Si, ad inizio anno ho avuto un infarto e conseguente operazione a cuore
>> aperto.
>>
>
>Fa venire i brividi a risentirlo.

>cut

Concordo.

> Fabrizio se vai a rivederti i post del
>periodo vedrai quanti attestati di stima ha riscosso (e risposto uno a uno)

Ti credo sulla parola , perchè sebbene lo conosca da poco ( da Luglio
circa , anche se posto da Agosto), .... ma no ma no , sto scrivendo
un'epitaffio e invece Robè è vivo e vegeto e adesso sta benone
(vero?). Per cui ridere ragazzi.
Adesso non mi viene in mente neanche una scemenza da dire ( da quando
Amanda è venuta da te ... ), però fate conto che l'ho detta :
FANCULO STI' INFARTI.

Ciao. Fabrizio

0 new messages