Créer une table et des champs dans une base access
Contenu du snippet
Ceci est un exemple pour créer une table et des champs dans une base Access existante.
Article du MSDN :
Syntaxe de CreateField :
CreateField(name, type, size)
name : Facultatif. Donnée de type Variant (sous-type String) attribuant un nom unique au nouvel objet Field.
type : Facultatif. Constante déterminant le type de données du nouvel objet Field.
size : Facultatif. Donnée de type Variant (sous-type Integer) qui indique la taille maximale, en octets, d'un objet Field contenant du texte. Cet argument n'est pas pris en compte dans le cas de champs numériques ou de taille fixe.
Les constantes pour l'argument 'type'
Constante Description
--------- -----------
dbBigInt Big Integer
dbBinary Binary
dbBoolean Boolean
dbByte Byte
dbChar Char
dbCurrency Currency
dbDate Date/Time
dbDecimal Decimal
dbDouble Double
dbFloat Float
dbGUID GUID
dbInteger Integer
dbLong Long
dbLongBinary Long Binary (OLE object)
dbMemo Memo
dbNumeric Numeric
dbSingle Single
dbText Text
dbTime Time
dbTimeStamp Time Stamp
dbVarBinary VarBinary
Source / Exemple :
Dim dbsBase As dao.Database
Dim accTable As dao.TableDef
Set dbsBase = dao.OpenDatabase(strCheminBase & "c:\Test.mdb")
Set accTable = dbsBase.CreateTableDef("tbl_Test")
With accTable
.Fields.Append .CreateField("Nom", dbText)
.Fields.Append .CreateField("Prénom", dbText)
.Fields.Append .CreateField("Adresse1", dbText)
.Fields.Append .CreateField("Adresse2", dbText)
.Fields.Append .CreateField("CodePostal", dbText)
.Fields.Append .CreateField("Ville", dbText)
End With
dbsBase.TableDefs.Append accTable
dbsBase.Close
Set dbsBase = Nothing
Conclusion :
Article du MSDN :
Syntaxe de CreateField :
CreateField(name, type, size)
name : Facultatif. Donnée de type Variant (sous-type String) attribuant un nom unique au nouvel objet Field.
type : Facultatif. Constante déterminant le type de données du nouvel objet Field.
size : Facultatif. Donnée de type Variant (sous-type Integer) qui indique la taille maximale, en octets, d'un objet Field contenant du texte. Cet argument n'est pas pris en compte dans le cas de champs numériques ou de taille fixe.
Les constantes pour l'argument 'type'
Constante Description
--------- -----------
dbBigInt Big Integer
dbBinary Binary
dbBoolean Boolean
dbByte Byte
dbChar Char
dbCurrency Currency
dbDate Date/Time
dbDecimal Decimal
dbDouble Double
dbFloat Float
dbGUID GUID
dbInteger Integer
dbLong Long
dbLongBinary Long Binary (OLE object)
dbMemo Memo
dbNumeric Numeric
dbSingle Single
dbText Text
dbTime Time
dbTimeStamp Time Stamp
dbVarBinary VarBinary
A voir également
- Créer une table et des champs dans une base access
- Php table - Conseils pratiques -PHP
- Créer des mots mélés - Forum Java
- Comment créer une application android - Forum VB.NET
- Ajouter un champ dans une table sql ✓ - Forum ASP / ASP.NET
- Ajout de champs dans une table de sql server - Forum VB.NET
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.