Comment créer une table avec vb6

Question

J'aimerais savoir comment créer une table dans une base de donné que j'ai créer

mais je veux le faire à partir de vb6
merci

Makabey · Answer

Tu as le choix entre l'ADO et le DAO (que je favorise).
Je peux t'aider, d'autre te donnerons des exemples en ADO qui supposément est plus rapide... reste à prouver, je me suis pas donné la peine de l'essayer alors j'ai aucune certitude.  Si qqun peux expliquer clairement la diff en avantages et inconvénient, Go!

Désolé, pour une fois c'est pas une réponse  :sad)

Nitocris · Answer

Je cherche aussi a faire ça, mais j'ai trouvé un moyen qui peut t'aider, tu passe par les requêtes sql
tu déclare ta base tu l'ouvre et aprés tu fait
base.execute (commande_SQL)
en occurence pour faire ce que tu veux:
commande_Sql = Create table nom_de_la_table (nom_champ1 Char,nomchamp2 integer, nomchamp3 float)
etc tu met les champs et leurs type c'est déjà bien.
Moi je cherche a faire ça dans une boucle mais trés chaud a comprendre.
aller bonne chance!!!

}{aNsO| · Answer

Bon, je n'est pas essayer encore, mais je crois que sa va peut etre m'aider... du moins à comprendre le principle :o)
Merci... je t'en donne des nouvelles et si j'arrive suffisemment à comprendre je pourrai peut-être t'aider avec ton problème...

}{aNsO| · Answer

Merci de t'être essayé, mais je ne crois pas que sa m'aide beaucoup :oP
Sans rancune :o)

}{aNsO| · Answer

appAccess.NewCurrentDatabase App.Path& "\Budget.mdb       Set Data = db1.OpenDatabase(App.Path & "\Budget.mdb")
        
base.Execute Create Table budget(Références, Dates, Descriptions)

Désolé j'ai tout essayé et je n'y comprend toujours rien, peux-tu m'Aider stp :o)

Nitocris · Answer

Je te fais un exemple:

Public Sub ajout_table()
Dim dbs As Database 'vient de la bibliothèque DAO
'****************************************************
'POUR OUVRIR UNE BASE AUTRE QUE CELLE OUVERTE
'Dim chemin_base As String
'chemin_base = "E:\NITOCRIS	est_06	oto.mdb"
'Set dbs = OpenDatabase(chemin_base)
'********************************************************
Set dbs = CurrentDb 'c'est la base actuellement lancer
'Execution de requêtes Sql via VBA
dbs.Execute ("Create Table Test_toto (Nom Char(35),prénom Char(35))")
End Sub

'Je l'ai tester ça créer une table Test_toto avec vairiables string de 35 de long. 
Bonne chance :-)

cs_moha007 · Answer

RIEN BAYRIEN BAYRIEN BAYRIEN BAYRIEN BAYRIEN BAYRIEN BAYRIEN BAY

Comment créer une table avec vb6

7 réponses

Discussions similaires