Discussion :

[uself]

bonjour

voila mon code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim i As Integer
i = "SELECT OFMAP.CDSORTE FROM OFMAP WHERE (OFMAP.NFAB=me.N_FAB_N.value And OFMAP.NLIGNFAB = me.N_LIG_FAB_N.value);"
Me.CODE_SORTE_SORTI_ENR_N.Value = i

j'ai message "incompatibilite de type", pourtant n_fab_n et un nombre entier ainsi que n_lign_n

[Invité]

Bonjour

Tu ne peux utiliser une chaine SQL comme cela, ce n'est pas possible.

Il faut utiliser :

1 - Soit DAO avec les recordsets.

2 - Soit les fonctions de domaine avec DLookup dans ton cas.

[uself]

Merci pour ton aide
je test avec un dllokup, mais je n'arrive pas a trouver la bonne syntax.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.CODE_SORTE_SORTI_ENR_N.Value = (Dlookup("cdsorte","ofmap","nfab" = me.N_FAB.Value and "nlignfab" = me.N_LIG_FAB.Value)

[Invité]

Regarde bien l'article sur les fonctions de domaine; au chapitre III-E.

Déjà les = sont mal placés, de plus l'auteur de cet article montre des exemples avec les différents types de champs, est-ce que tous tes champs sont bien du numérique ?

De plus penses à la concaténation des différentes chaines, avec le &.

Je te conseille de relire l'article de A à Z, car il y'a différents exemples, même ce qu'il y a pour les autres fonctions de domaine te seras utile.

[uself]

merci beaucoup de m'avoir guidé.

encore un petit soucis

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim i As Integer
valeurfab = Me.N_FAB_N.Value
valeurlfab = Me.N_LIG_FAB_N.Value
i = CInt(DLookup("cdsorte", "ofmap", "nfab = " & valeurfab & " And nlignfab = " & valeurlfab))
MsgBox i

Il me renvoie : type de données incompatible dans l'expression du critere.
si je met des nombres rellees sans varaible sa fonctionne.
Mes champs sont bien en numerique