IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
logo

FAQ VBScriptConsultez toutes les FAQ

Nombre d'auteurs : 16, nombre de questions : 108, dernière mise à jour : 2 mars 2019  Ajouter une question

 


Cette FAQ VB Script est le fruit de la collaboration de l'équipe de rédaction et des membres du forum VB.

Aidez-nous à faire vivre cette FAQ en participant au forum Vos contributions VBScript.

Pour toutes questions ou tous problèmes concernant cette FAQ, vous pouvez contacter par MP ThierryAIM ou bbil.

L'équipe de rédaction de Developpez.com vous remercie pour votre participation passée et à venir.

SommaireVB ScriptBase de donnée (1)
précédent sommaire suivant
 

En utilisant la bilbliothéque Microsoft DAO 3.6 Object Library :

Code vb : Sélectionner tout
1
2
3
4
5
6
7
8
9
10
Const dbInteger =3 
Const dbText = 10 
  
Set oDAO36 = CreateObject("DAO.DBEngine.36") 
Set oBase = oDAO36.CreateDatabase("Mabase.MDB", ";LANGID=0x0409;CP=1252;COUNTRY=0", 64) 
Set oTable = oBase.CreateTableDef("Table1") 
oTable.Fields.Append oTable.CreateField("Champ1", dbInteger) 
oTable.Fields.Append oTable.CreateField("Champ2", dbText, 50) 
oBase.TableDefs.Append oTable 
oBase.Close

Mis à jour le 15 novembre 2010 SfJ5Rpw8

Proposer une nouvelle réponse sur la FAQ

Ce n'est pas l'endroit pour poser des questions, allez plutôt sur le forum de la rubrique pour ça


Réponse à la question

Liens sous la question
précédent sommaire suivant
 

Les sources présentées sur cette page sont libres de droits et vous pouvez les utiliser à votre convenance. Par contre, la page de présentation constitue une œuvre intellectuelle protégée par les droits d'auteur. Copyright © 2024 Developpez Developpez LLC. Tous droits réservés Developpez LLC. Aucune reproduction, même partielle, ne peut être faite de ce site et de l'ensemble de son contenu : textes, documents et images sans l'autorisation expresse de Developpez LLC. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts.