Récupérer valeur textBox

Récupérer valeur textBox - VB/VBA/VBS - Programmation

Marsh Posté le 13-04-2005 à 12:12:27    

Je travaille sous access 2003 et VB
 
Voila mon code

Citation :


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

Reply

Marsh Posté le 13-04-2005 à 12:12:27   

Reply

Marsh Posté le 13-04-2005 à 12:31:00    

sql = "UPDATE Facture SET Montant_Total_Eur = " & testsomme.text & " WHERE N_Facture = 20;"  


---------------
Si on vous donne une info qui marche, DITES-LE!!!! ------ Si vous trouvez seul, AUSSI, votre solution peut servir à d'autres! ------ Je dois la majorité de mes connaissances à mes erreurs!
Reply

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

Reply

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

Reply

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 ;)

Reply

Marsh Posté le 13-04-2005 à 14:03:42    

Aussi, pourquoi passer par du VB pour ça, alors qu'un simple formulaire le permet ?

Reply

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

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed