Récupérer valeur textBox - VB/VBA/VBS - Programmation
Marsh Posté le 13-04-2005 à 12:31:00
sql = "UPDATE Facture SET Montant_Total_Eur = " & testsomme.text & " WHERE N_Facture = 20;"
Marsh Posté le 13-04-2005 à 13:38:54
AlainTech a écrit : sql = "UPDATE Facture SET Montant_Total_Eur = " & testsomme.text & " WHERE N_Facture = 20;" |
Ca marche pas il me dit "objet requis"
Meme chose si je met
UPDATE Facture SET Montant_Total_Eur = " & testsomme.texte14.text & " WHERE N_Facture = 20
Marsh Posté le 13-04-2005 à 13:47:45
C bon j'ai trouvé c'est
sql = "UPDATE Facture SET Montant_Total_Eur = " & Texte4.Text & " WHERE N_Facture = 20;"
Merci pour ton aide AlainTech
Marsh Posté le 13-04-2005 à 14:03:07
Oublie pas de vérifier que Texte4.Text est bien un nombre, sinon bonjour le message d'erreur pour le pauvre utilisateur
Marsh Posté le 13-04-2005 à 14:03:42
Aussi, pourquoi passer par du VB pour ça, alors qu'un simple formulaire le permet ?
Marsh Posté le 13-04-2005 à 14:37:40
Pour la vérif que c'est un entier c bon mais par contre j veu bien que tu m'explique comment le faire en vb
Marsh Posté le 13-04-2005 à 12:12:27
Je travaille sous access 2003 et VB
Voila mon code
Set rds = New ADODB.Recordset
sql = "UPDATE Facture SET Montant_Total_Eur = 10 WHERE N_Facture = 20;"
rds.Open sql, bd
Je voudrais remplacer 10 par la valeur contenue dans la zone de texte "Texte4" du formulaire "testsomme", comment faire ?
Merci