probleme avec SELECT

Question

bonjour, je suis débutante sous VB6 et j'ai un problème

j'ai une frmRecept avec un btnNouvRec qui ouvre une frmNouvRec. dans cette dernière j'ai une ZRefPce avec un btn qui ouvre une liste de piece, et un ZPU dans laquelle s'affiche le prix unitaire dès que l'on choisit une pièce.
le problème c'est qu'il s'affiche toujours le même prix pour tous les produits, alors que dans la requête il est juste
voici ma formule dans laquelle je ne trouve pas l'erreur, et je l'ai essayer dans tous les sens, même avec WHILE NOT

Public Sub affiche()

Dim adoPrixUnit As RecordsetSet adoPrixUnit Db.Execute("SELECT * FROM rqprixunit WHERE " & ZRefPiece.Text & " rqprixunit.piece;")
If adoPrixUnit.RecordCount > 0 Then
    ZPU.Text = adoPrixUnit("prixunit")
adoPrixUnit.Close

End Sub

je vous remercie pour votre aide

 
dauphin70

cs_PhilippeE · Answer

Es-tu sure que adoPrixUnit.RecordCount > 0 ?
Cette méthode n'est pas toujours fiable.

Je te suggère de remplacer ta condition par
If Not adoPrixUnit.EOF then

cs_dauphin70 · Answer

salut philippe

je viens d'essayer avec ta suggestion mais ca ne marche toujours pas
merci quand meme

dauphin70

cs_funseb · Answer

essai ca :
Public Sub affiche()

Dim adoPrixUnit As RecordsetSet adoPrixUnit Db.Execute("SELECT * FROM rqprixunit WHERE " & ZRefPiece.Text & " rqprixunit.piece;")

while not adoprixunit.eof
ZPU.Text = adoPrixUnit("prixunit")
adoprixunit.movenext
wend
adoPrixUnit.Close

End Sub

clac-clac

cs_funseb · Answer

au fait pour la requete met plutot ca :

("SELECT * FROM rqprixunit WHERE '" & ZRefPiece.Text & "' = rqprixunit.piece;")

mais normalement la boucle while not ne sert a rien etant donné que ton recorset va te renvoyer seulement 1 enregistrement (le prix en fonction de la ref)

clac-clac

cs_dauphin70 · Answer

merci lesgars pour votre aide

mais je viens de trouver mon erreur, c'est bien ce que j'avais fais en premier, mais je me suis tromper de fenetre
je sais c'est une erreur vraiment idiote
merci quand meme
dauphin70

Probleme avec SELECT

5 réponses

Discussions similaires