Discussion :

[solaar]

Bonjour.
je n'arrive pas à comprendre mon code.... il me marque une erreur: Argument non valide..

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
DTII = Forms![Inventaire - Calcul Ecarts]![Date Inventaire]
DTI = "01/" & DatePart("m", DTII) & "/" & DatePart("yyyy", DTII)
 
Set dbc = CurrentDb
Dim qdfParam As QueryDef
 
 
Set Inventaire_Entête = db(DBI("Inventaire - Entête")).OpenRecordset("Inventaire - Entête")
Set qdfParam = dbc.QueryDefs("Inventaire - Req - Stock Ordinateur(Phase 2)")
 
qdfParam.Parameters("[MAG]") = Eval("Forms![Inventaire - Calcul Ecarts]![Mag Inventaire]")
qdfParam.Parameters("[DTI]") = DTI  ' paramètres.
 
Set Stock_Ordinateur = qdfParam.OpenRecordset()

il se blogue sur la dernière ligne.
Merci pour l'aide.

[helas]

Bonsoir,
ne serait-ce pas

Code :

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

1
2
 
Set Stock_Ordinateur = dbc.OpenRecordset(qdfParam.name)

[solaar]

No je pense pas j ai dejas :

Code :

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

Set qdfParam = dbc.QueryDefs("Inventaire - Req - Stock Ordinateur(Phase 2)")

C'est pas le fait que je sois en access 2007 ?
Aussi lorsque je met les elements en dur dans les requetes tous passe bien.

[loufab]

Bonjour,

Je dirais ceci sans certitude :

Code :

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

Eval("Forms![Inventaire - Calcul Ecarts]![Mag Inventaire]")

A remplacer par ça :

Code :

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

Eval(Forms![Inventaire - Calcul Ecarts]![Mag Inventaire])

Le premier renvoi l'expression contenu alors que la deuxième renvoie le résultat de l'expression.

Cordialement,

[solaar]

Oui j'ai fait tout sa mais je suis tjrs sr la même erreur.
je comprend rien.

[loufab]

Bonjour,
ça ne vient donc pas de ce que tu mets dans le contrôle du formulaire et la syntaxe est correcte. Maintenant il faut voir du coté de ta requête.

Cordialement,