Programmation du bouton enregistrer (visual basic 6)
cs_idelphonse
Messages postés17Date d'inscriptionmercredi 1 juin 2005StatutMembreDernière intervention18 juillet 2007
-
5 juil. 2005 à 11:03
Doro81079
Messages postés380Date d'inscriptionvendredi 22 avril 2005StatutMembreDernière intervention24 février 2015
-
5 juil. 2005 à 20:48
j'aimerais avoir le code qu'on peut écrire sur un bouton pour enregistrer les saisies effectuées dans les textbox dans une base de données access.
merci.
Doro81079
Messages postés380Date d'inscriptionvendredi 22 avril 2005StatutMembreDernière intervention24 février 201556 5 juil. 2005 à 20:46
bonjour,
ajoute la bibliothèque "Microsoft active x data object 2.x library" x dans 2.x est un chiffre (projet=>références=> et la biblio)
si tu veux mettre un controle adodc pour pouvoir naviguer dans ta BD va a la fiche 503777
option explicit
dim tabase as new adodb.connection
dim tatable as new adodb.recordset
la partie ecrite en bleu devrait se trouver dans form_Load
et dans ce cas tabase.close devrait se trouver dans le bouton quitter
mais si tu ne veux q'ajouter des données tu peux tout mettre dans le bouton enregistrer
private sub cmdenr_click()
tabase.provider="Microsoft.oledb.4.0"
tabase.open "data source = chemin et nom de ta base.mdb"
tatable.open "tatable",tabase,adopendynamic,adlockoptimistic
tatable.addnew
tatable("Nom duchamp")= controle associe au champ (ex:text1.text)
'ainsi de suite pour toutes les textbox
tatable.update
tabase.close
voila sinon poste un autre message si il y a un problème
doro