Salut,
j'ai un problème avec une condition if then else if then else end if
J'ai une erreur quand j'exécute mon script :
J'ai une erreur à cette ligne la :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 dim coutU, ConsoM, DelaiA 'variable qui stocke le coût selon les différentes cas SQL="Select b.[description], b.[Coût STd], b.[Coût PMP], b.[Coût PMP déporté],a.[Groupe_art],a.[Unite],b.[Kv modifiée],b.[Kv],b.[Delai LREP (j)],b.[Delai d'appro (j)] " & _ " from cli_maj_extractions.T_EXTR_BASAMONT b, cli_maj_extractions.T_CALCUL_ARTICLE_AMONT a " & _ " where A.ARTICLE = b.code_article and b.code_article = " & request.form("Code_Article") & "" Set rs = Server.CreateObject("ADODB.Recordset") rs.open SQL, conn_SQL , 3, 3 'tant qu'il y a des données pour un code article while not RS.eof If (RS("Groupe_art")="MRPRM" or RS("Groupe_art")="MRPRMD") then coutU= RS("Coût STd") Else If (RS("Coût PMP déporté")!="" or RS("Coût PMP déporté")!=999999) then coutU = RS("Coût PMP déporté") Else coutU=RS("Coût PMP") End If
Code : Sélectionner tout - Visualiser dans une fenêtre à part Else If (RS("Coût PMP déporté")!="" or RS("Coût PMP déporté")!=999999) then coutU = RS("Coût PMP déporté")
Merci, je sais pas peut-être est-ce la syntaxe du if qui est mauvaise !
voici l'erreur générée :
Type d'erreur :
Erreur de compilation Microsoft VBScript (0x800A03FA)
/Projet 'Intranet - AVK'/Form_AVK.asp, line 247
Partager