Créer une base de donnée directement sous vb6 [Résolu]

Signaler
Messages postés
22
Date d'inscription
lundi 26 mai 2008
Statut
Membre
Dernière intervention
13 juin 2008
-
Messages postés
22
Date d'inscription
lundi 26 mai 2008
Statut
Membre
Dernière intervention
13 juin 2008
-
Après pas mal de recherche sur les bases de donnée,je ne trouve pas ce que je veus :(
En effet j'aimerais que mon programme vb me génere lui même une base  de donnée,pour enregistrer des données entrées par l'utilisateur .
J'en viens à me demander si c'est vraiment possible.
Merci d'avance pour vos reponse .

6 réponses

Messages postés
13280
Date d'inscription
lundi 13 décembre 2004
Statut
Modérateur
Dernière intervention
3 février 2018
35
salut,

http://www.codyx.org/snippet_creer-base-donnees-access_608.aspx

++
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp
Messages postés
22
Date d'inscription
lundi 26 mai 2008
Statut
Membre
Dernière intervention
13 juin 2008

Je m'auto repond,donc l'extension du fichier n'est tout simplement pas bonne XD,
mais enregistrer ça base de données sous .accdb
Voila,le jour ou quelqu'un aura le même problème 
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
65
quel type de base Access ?
Messages postés
22
Date d'inscription
lundi 26 mai 2008
Statut
Membre
Dernière intervention
13 juin 2008

Une base access qui ne contient que du texte
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
65
Access, XML, Texte, Ini ....

as toi de voir (ou autre base, bien sur)
Messages postés
22
Date d'inscription
lundi 26 mai 2008
Statut
Membre
Dernière intervention
13 juin 2008

Merci beaucoup pour vos reponse :)
Même si j'ai trouvé un autre moyen sur le forum ^^
Malheureusement j'ai une autre erreur -_-
 

Voici mon code pour créer ma base de donnée:(jusque la ça va)

Private Sub cmdvalider_Click()
 racine = "C:"
 numero = TxtNuméroChantier.Text        'La base de donnée prend le numéro de chantier
 fin = ".mdb"
 dbName = racine + numero + fin   'chemin ou est enregistrer notre base de donnée soit C:\(numero chantier).mdb
 If (Len(Dir(dbName))) Then
 Kill dbName                       'Supression du numero  si il existe déjà :-o
 End If


Set db = DBEngine.Workspaces(0).CreateDatabase(dbName, dbLangGeneral) 'creation de la base de donnée avec comme nom dbName


Call createTableChantier 'appel du sous programme createtablechantier
Call createDetecteurS    'appel du sous programme createdetecteurS
End Sub

Mais pour réouvrir ma base de donnée avec ce code:

Private Sub Command2_Click()
Dim x As Database
Set x = OpenDatabase(dbName)
end Sub

J'ai une erreur d'execution '3343'
Format de base de données non reconnu.
Je comprend pas vraiment : \