création d'une table

3 réponses

Mutchafu

15/10/2003 à 13:43

Pourriez-vous m'expliquer comment access peut me cr=E9er une=20
table, soit via une requete, soit via du code.

J'aimerais qu'il me cr=E9e une table contenant :
Id_perso (autonumber)
dat_date (date)
dat_heure (heure)

Et surtout ... qu'il impl=E9mente la table automatiquement=20
pour que j'obtienne toutes les dates de l'ann=E9e dans le=20
champ dat_date.

Donc quand je clic sur un bouton il doit me cr=E9er cette=20
table et l'impl=E9menter, je devrais par le suite=20
manuellement remplir le champ heure.

Merci d'avance, j'espere que c'est possible.

3 réponses

DUPARC

15/10/2003 à 17:58

peut-etre une solution

tu cree ta table shema avec aucune donnees dedans puis en utilisant la
commande suivante :
DoCmd.CopyObject, "Copie Employés", acTable, "Employés"
"Mutchafu" a écrit dans le message
news: 2b63701c39311$892d99a0$
Pourriez-vous m'expliquer comment access peut me créer une
table, soit via une requete, soit via du code.

J'aimerais qu'il me crée une table contenant :
Id_perso (autonumber)
dat_date (date)
dat_heure (heure)

Et surtout ... qu'il implémente la table automatiquement
pour que j'obtienne toutes les dates de l'année dans le
champ dat_date.

Donc quand je clic sur un bouton il doit me créer cette
table et l'implémenter, je devrais par le suite
manuellement remplir le champ heure.

Merci d'avance, j'espere que c'est possible.

Gaël Schmitt

15/10/2003 à 18:01

Bonjour,

Va voir là :
http://support.microsoft.com/default.aspx?idF3103

Gael.

"Mutchafu" a écrit dans le message de
news:2b63701c39311$892d99a0$
Pourriez-vous m'expliquer comment access peut me créer une
table, soit via une requete, soit via du code.

J'aimerais qu'il me crée une table contenant :
Id_perso (autonumber)
dat_date (date)
dat_heure (heure)

Et surtout ... qu'il implémente la table automatiquement
pour que j'obtienne toutes les dates de l'année dans le
champ dat_date.

Donc quand je clic sur un bouton il doit me créer cette
table et l'implémenter, je devrais par le suite
manuellement remplir le champ heure.

Merci d'avance, j'espere que c'est possible.

Raymond

15/10/2003 à 19:30

Bonsoir.

je t'ai fait une procédure qui fonctionne, mais les champs date n'ont pas de
format ni inputmask. tu complètera les index également.

Dim Unedate As Date
Dim MaBase As DAO.Database
Dim Matable As DAO.TableDef
Dim RS As DAO.Recordset
Dim Fld As DAO.Field
Set MaBase = CurrentDb()
Set Matable = MaBase.CreateTableDef("NouvelleTable")
Set Fld = Matable.CreateField("Id_perso", dbLong)
Fld.OrdinalPosition = 1
Fld.Attributes = dbAutoIncrField
Matable.Fields.Append Fld
Set Fld = Matable.CreateField("Madate", dbDate)
Fld.OrdinalPosition = 2
Matable.Fields.Append Fld
Set Fld = Matable.CreateField("MonHeure", dbDate)
Fld.OrdinalPosition = 3
Matable.Fields.Append Fld
MaBase.TableDefs.Append Matable
RefreshDatabaseWindow
Set RS = MaBase.OpenRecordset("NouvelleTable")
For Unedate = DateSerial(Year(Date), 1, 1) To DateSerial(Year(Date), 12, 31)
RS.AddNew
RS!madate = Unedate
RS!monheure = #12:00:00 AM#
RS.Update
Next
RS.Close
Set MaBase = Nothing
Set Matable = Nothing
Set Fld = Nothing
Set RS = Nothing

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.

"Mutchafu" a écrit dans le message de
news:2b63701c39311$892d99a0$
Pourriez-vous m'expliquer comment access peut me créer une
table, soit via une requete, soit via du code.

J'aimerais qu'il me crée une table contenant :
Id_perso (autonumber)
dat_date (date)
dat_heure (heure)

Et surtout ... qu'il implémente la table automatiquement
pour que j'obtienne toutes les dates de l'année dans le
champ dat_date.

Donc quand je clic sur un bouton il doit me créer cette
table et l'implémenter, je devrais par le suite
manuellement remplir le champ heure.

Merci d'avance, j'espere que c'est possible.

création d'une table

3 réponses

Veuillez sélectionner un problème