Discussion :

[matt63]

Bonjour à tous !

Mon problème est le suivant:
J'ai une première requête qui me renvoi plusieurs lignes,dont un numéro de produit .
Pour chacune de ces lignes, je dois insérer dans une table une partie de ma requête si cette table ne contient pas déja le numéro de produit et dans le cas ou elle contient déja le numéro de produit, je dois mettre à jour cette ligne.
Je ne sais pas comment faire pour tester l'éxistence de ce numéro de produit . Pour le moment, j'utilise un premier recordset rst, qui éxécute ma requête, et j'en utilise un second avec lequel je voulais tester la présence du numéro de produit dans ma table (si le select ne renvoi rien, le produit n'y est pas, sinon il y est.)
Mais lorsque le produit n'éxiste pas dans la table, j'obtiens un message d'erreur comme quoi il n'y a aucun enregistrement correspondant... et je ne sais pas comment faire pour écrire du code dans ce cas la.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
rst.Open "SELECT PUB_SOFA.ofdatdp as ofdatdp1, PUB_SOFC.proref as proref1, ...;", cn, adOpenForwardOnly, adLockReadOnly
 
    rst.MoveFirst
    While Not rst.EOF
 
        Dim rst2 As New ADODB.Recordset, fld2 As ADODB.Field
'-------------> Comment tester ?
        rst2.Open "SELECT numproduit from tabletemp where numproduit = " & rst!proref1, cn, adOpenForwardOnly, adLockReadOnly
'------------->        
 
        rst2.close        
        rst.MoveNext
 
    Wend

Je voudrais utiliser un " IF " mais je ne vois pas comment faire... je ne connais pas bien le fonctionnement des recordset.

Si vous pouvez m'aider...
Merci d'avance

[orafrance]

en une seule requête :

Code :

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

1
2
3
4
SELECT PUB_SOFA.ofdatdp as ofdatdp1, PUB_SOFC.proref as proref1, ..
WHERE EXISTS
               (SELECT 1
                    FROM from tabletemp where numproduit = proref1)

[matt63]

ok merci bcp, j'essayerai dés q je pourrais, et je mettrai le [résolu] si ca marche.
merci bcp pour le temps que vous passez a nous aider, c'est vraiment super sympa !

[matt63]

Je ne vois pas comment utiliser cette requête.. Il faut que j'insere dans la table "tabletemp" mes valeurs si le produit n'éxiste pas déja dans celle si, et que je fasse une mise a jour de la ligne de ce produit dans le cas ou il existe.

Lorsque je lance ma premiere requête, la table tabletemp est vide.La requête me renvoi +/- 500 enregistrements, et je les lis un par un sois pour les inserer dans tabletemp si c'est la premiere fois que le produit est rencontré, soit pour faire une mise a jour de stock sur ce produit... :

si (pas ce produit dans tabletemp) alors (insertion valeurs)
sinon (update de ce produit)

Or ta requête ne me permet que de récuperer les infos concernant un produit qui éxiste déja dans tabletemp. Comment faire pour inserer le produit s'il n'éxiste pas encore dans tabletemp ?

J'espere ne pas etre tro vague...
merci d'avance

[orafrance]

je comprends pas tout là

Peut tu envoyer les requêtes entières séparément et dire ce qu'elles font (l'une une sélection et l'autre l'insertion d'après ce que j'ai compris )

[matt63]

Je vais essayer d'etre un peu plus clair

J'ai une premiere requete ( appelons la R1) qui récupère des infos depuis plusieurs tables (date de besoin du produit, numéro de produit, qté en stock, qté besoin, etc...) trié par date de besoin.

Je dois ensuite lire un a un les enregistrements ramenés par cette requête, pour les inserer dans une nouvelle table (tabletemp) qui me permettra de savoir quels produits seront manquants a leur date de besoin ( c'est a dire les produits dont la qté en stock est inferieure a la qté du besoin). Pour cela, je dois donc inserer dans ma table tabletemp le produit, la date de besoin, la qté en stock et la qté de besoin.

le probleme arrive ici :
pour chaque produit ramené par ma requete qui n'est pas encore dans tabletemp, je dois inserer ce produit, sa date besoin, sa qté en stock et sa qté besoin. (requete d'insertion)
lorsque ma requete me ramene ensuite ce mê produit , je dois également inserer la ligne mais en mettant a jour le stock en fonction de la qté de besoin précedement utilisé (insertion puis maj)

Mon probleme ne vient pas de ces deux requetes (que je n'ai pas encore faites), mais seulement du test pour savoir si la table tabletemp contient ou non le produit ramené par ma premiere requete R1.

J'ai mis ma requete R1 dans un recordset, et je parcours un a un les enregistrements qu'elle me ramene. C'est a ce moment la que je dois pouvoir savoir si le produit ramené par R1 éxiste deja dans tabletemp. Si il existe je fais mon insertion puis ma maj, sinon je fais une simple insertion.

Mais je ne sais pas comment faire pour tester l'existence de ce produit ("proref" dans R1, "numproduit" dans tabletemp)
le code est celui situé au dessus.Il me faut juste savoir comment faire pour savoir si le proref de R1 est présent dans numproduit de tabletemp...

j'espere avoir été plus clair, mais ce n'est pas simple a expliquer...
j'espere q tu pourras m'aider...

[orafrance]

alors le EXISTS fonctionne comme çà :

Code :

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

1
2
3
4
5
SELECT blabla
FROM <les tables>
WHERE <les conditions de la requête>
AND EXISTS (SELECT 1 FROM <la table des produits>
WHERE <id_produit de la table produit> = <id produit de la reqûete R1 ci dessus>)

Est-ce clair ?

la requête que je t'ai donné doit pas être trop loin de ce que tu recherches

[matt63]

Je ne comprend pas comment je peux faire pour utiliser cette requête...

ce que j'aimerai pouvoir faire un test sur le deuxieme recordset, un peu comme ca:

Code :

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

1
2
3
4
5
6
 
if ( rst2.Open "SELECT numproduit from tabletemp where numproduit = " & rst!proref1, cn, adOpenForwardOnly, adLockReadOnly ) = null then sql="insert..." docmd.runsql sql
else
sql="insert.." docmd.runsql sql
sql="update ..." docmd.runsql sql
end if

mais le probleme c'est que je n'arrive pas adapter ce code a vba... Lorsque la requete de rst2 ne ramene pas d'enregistrement, j'obtien un message d'erreur... "No value given for one or more required parameters"
Moi je voudrais pouvoir lui dire d'inserer les valeurs retournées par ma requete R1 dans ce cas la... et de faire son insert et son update sinon...

Je suis désolé de te prendre du temps et d'insister... mais je ne vois vraiment pas comment faire...
merci beaucoup en tout cas !

[orafrance]

ce que je propose n'est pas de tester l'existence où non du produit, c'est de tout faire en une seule passe... ceci dit voila comment tester l'existence :

Code :

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

select count(*) from tabletemp where numproduit = ?

> 0 -> le produit existe

[matt63]

Merci beaucoup !!! je n'y avais pas pensé ...
merci pour tout, et désolé de t'avoir pris tant de temps juste pour ca...

[orafrance]

y'a pas de mal