base de donnesRésolu

Question

salut 
comment est ce que je peuc créer une base de donnes ou il ya 2 table:
table 1
id ; auteur
1 ; bibi
2 ; koka
3 ; netfric

table 2
id de l'auter ; livre 
1                , bibi1
1                ,bibi2

ect...
merci d'avance

cs_Exploreur · Accepted Answer

Salut,

Voilà ce que l'on trouve, à toi d'en tirer profit....

http://www.vbfrance.com/codes/CREER-BASE-DONNEE-PROGRAMME_25157.aspx

http://www.vbfrance.com/codes/GENERATEUR-MODULE-CAPABLE-RECREER-VOS-BASES-DONNEES-ADDIN_8494.aspx

http://www.vbfrance.com/codes/CREER-SUPPRIMER-BASE-TABLE-CHAMP-LIER-EXCEL-ACCESS_7506.aspx

A+
Exploreur

 Linux a un noyau, Windows un pépin

netfric · Answer

merci et comment faire une insertion automatique d'id
        Set F = T.CreateField("id", dbText, 20)
        T.Fields.Append F

merci d'avance

chaibat05 · Answer

Bonsoir, avant le Set ..., il faut : Dim F As Field

I LIKE TO BE HERE WHEN I CAN

netfric · Answer

Dim F As Field
       Set F = T.CreateField("id", dbText, 20)
       T.Fields.Append F
        
    ca marche pas

chaibat05 · Answer

Pas assez d' info et ta réponse nous n' avance pas beaucoup ! J' espère que la notre t' aidera . >Déclares ta variable DataBase et ouvres là . Dim xDB As DataBase Set xDB = DBEngine.OpenDatabase(NomDeBase) >Déclares ta variable TabDef et crées ta table Dim T As TableDef Set T = xDB.CreateTableDef(NomDeTanle) >et ajoutes la à la collection TablesDef xDB.TableDefs.Append T >la tu peux ajouter tes champs Dim F As Field Set F= T.CreateField(xnom, xtype, xtaille) T.Fields.Append T Pour de plus amples informations, fais une recherche dans CS partie codes.

I LIKE TO BE HERE WHEN I CAN

Base de donnes

5 réponses

Votre réponse

Discussions similaires