Access: erreur sur requete
guillaume
-
blux Messages postés 27121 Date d'inscription Statut Modérateur Dernière intervention -
blux Messages postés 27121 Date d'inscription Statut Modérateur Dernière intervention -
bonjour
j'ai actuellement un problème lors de l'execution d'une requete de
selection programmée en VB et je souhaiterai volontier un peu d'aide. je vous remercie d'avance.
je vous expose la situation:
dans un formulaire access j'ai une zone de liste déroulante ou je choisi le code d'une céréale. j'aimerai récupéré la quantité total livree de cette cereale se trouvant dans une table afin d'eviter a l'utilisateur de dépasser cette limite. mais j'ai malheureusement un probleme lors de l'execution de la requete.
voici la requete:
Private Sub code_cereale_vente_Change()
Dim req As String
Dim base As Database
Dim enreg As Variant
Dim qte As String
Set base = CurrentDb
req = "SELECT sum(livrer.quantite_livree)as qte_stock FROM livrer " _
& "WHERE livrer.code_cereale_livrer = " _
& "('" & Forms![saisie_vente]![code_cereale_vente] & "');"
(*) Set enreg = base.OpenRecordset(req)
With enreg
.MoveLast
qte = enreg![qte_stock]'
End With
qte_dispo.Value = Str(qte)
End Sub
(*) une erreur se produit a cette endroit:
erreur d'execution 3464
type de données incompatible dans l'expression du critère
dsolé pour la longueur et encore merci de votre aide.
j'ai actuellement un problème lors de l'execution d'une requete de
selection programmée en VB et je souhaiterai volontier un peu d'aide. je vous remercie d'avance.
je vous expose la situation:
dans un formulaire access j'ai une zone de liste déroulante ou je choisi le code d'une céréale. j'aimerai récupéré la quantité total livree de cette cereale se trouvant dans une table afin d'eviter a l'utilisateur de dépasser cette limite. mais j'ai malheureusement un probleme lors de l'execution de la requete.
voici la requete:
Private Sub code_cereale_vente_Change()
Dim req As String
Dim base As Database
Dim enreg As Variant
Dim qte As String
Set base = CurrentDb
req = "SELECT sum(livrer.quantite_livree)as qte_stock FROM livrer " _
& "WHERE livrer.code_cereale_livrer = " _
& "('" & Forms![saisie_vente]![code_cereale_vente] & "');"
(*) Set enreg = base.OpenRecordset(req)
With enreg
.MoveLast
qte = enreg![qte_stock]'
End With
qte_dispo.Value = Str(qte)
End Sub
(*) une erreur se produit a cette endroit:
erreur d'execution 3464
type de données incompatible dans l'expression du critère
dsolé pour la longueur et encore merci de votre aide.
A voir également:
- Erreur de requete facebook
- Hns-self-wan-access-ipv6 ✓ - Forum Réseau
- Acer quick access - Forum Logiciels
- Access runtime ✓ - Forum Access
- Acer Quick Access - affichage CapsLock, VerrNum - Forum logiciel systeme
- Quick Access service ✓ - Forum PC portable