INSERT INTO avec un sous-formulaire
myseria
Messages postés
15
Date d'inscription
samedi 27 mars 2004
Statut
Membre
Dernière intervention
13 juillet 2005
-
8 juil. 2005 à 15:22
myseria Messages postés 15 Date d'inscription samedi 27 mars 2004 Statut Membre Dernière intervention 13 juillet 2005 - 13 juil. 2005 à 09:33
myseria Messages postés 15 Date d'inscription samedi 27 mars 2004 Statut Membre Dernière intervention 13 juillet 2005 - 13 juil. 2005 à 09:33
A voir également:
- INSERT INTO avec un sous-formulaire
- Insert into ✓ - Forum SQL
- Insert into date - Forum SQL
- Problème avec INSERT INTO et une date au format dd/mm/yyyy ✓ - Forum Visual Basic
- Civilité sur un formulaire - Forum VBA Office (Excel, Word ...)
- Creer un formulaire pdf depuis excel - Forum VB.NET
3 réponses
hyrockbass
Messages postés
25
Date d'inscription
jeudi 30 juin 2005
Statut
Membre
Dernière intervention
6 janvier 2006
11 juil. 2005 à 10:54
11 juil. 2005 à 10:54
Je croi comprendre ce que tu dis mais tu devrai être un peu plus clair par la suite.
Je te conseille de regarder ce code en ADO qui pouurra t'etre utile:
'connexion à la base courante
Dim Madb as new ADODB.Connection
set Madb = CurrentProject.Connection
'Declaration et initialisation des tables
Dim TblFacture as new ADODB.Recordset
TblFacture.open "select * from TFacture",Madb, adOpenDynamic, adLockOptimistic
'boucle pour inserer
While TblFacture.EOF = false 'tant que l'on est pas à la fin de la table
TblFacture.fields("NomDeLaColonne") = valeur
TblFacture.update 'enregistrement des modifs
TblFacture.MoveNext 'passage à la ligne suivante
WEnd
Je te conseille de regarder ce code en ADO qui pouurra t'etre utile:
'connexion à la base courante
Dim Madb as new ADODB.Connection
set Madb = CurrentProject.Connection
'Declaration et initialisation des tables
Dim TblFacture as new ADODB.Recordset
TblFacture.open "select * from TFacture",Madb, adOpenDynamic, adLockOptimistic
'boucle pour inserer
While TblFacture.EOF = false 'tant que l'on est pas à la fin de la table
TblFacture.fields("NomDeLaColonne") = valeur
TblFacture.update 'enregistrement des modifs
TblFacture.MoveNext 'passage à la ligne suivante
WEnd
myseria
Messages postés
15
Date d'inscription
samedi 27 mars 2004
Statut
Membre
Dernière intervention
13 juillet 2005
11 juil. 2005 à 15:24
11 juil. 2005 à 15:24
Voilà exactement, je ne savais pas comment faire pour la boucle While... ! Je pensais à une sorte de Do Loop!
Ca marche!
Merci beaucoup!!!
Léa
Ca marche!
Merci beaucoup!!!
Léa
myseria
Messages postés
15
Date d'inscription
samedi 27 mars 2004
Statut
Membre
Dernière intervention
13 juillet 2005
13 juil. 2005 à 09:33
13 juil. 2005 à 09:33
Re,
En fait le code marche, mais j'ai un autre problème maintenant a peu près du meme type :
Comment puis-je faire pour insérer les champs de mon sous-formulaire dans la table?
Si j'essaie de reprendre le code ci-dessus et de le modifier, impossible ca marche pas.
J'ai mis INSERT INTO, mais il ne m insère que la premiere ligne de mon sous-form. J'ai essayer avec la boucle While,mais je crois que je m y prend mal!
Merci bcp!
Myseria
En fait le code marche, mais j'ai un autre problème maintenant a peu près du meme type :
Comment puis-je faire pour insérer les champs de mon sous-formulaire dans la table?
Si j'essaie de reprendre le code ci-dessus et de le modifier, impossible ca marche pas.
J'ai mis INSERT INTO, mais il ne m insère que la premiere ligne de mon sous-form. J'ai essayer avec la boucle While,mais je crois que je m y prend mal!
Merci bcp!
Myseria
