Problème avec Select case ! [Résolu]

[kaiser59]

Salut,

j'aimerais savoir s'il est possible de faire ceci :

Code :

1
2
3
4
5
6
7
8
9
10
 
<%
Select case diff
 case 0 To -24
       pt=6
 case -50 To -25
       pt=8
...
end select
%>

ou

Code :

1
2
3
4
5
6
7
8
9
10
 
<%
Select case diff
 case >-25
       pt=6
 case >-50
       pt=8
...
end select
%>

ou encore

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
<%
select case resultat
case "g"
  if diff>-25 then
      pt=6
  elseif diff>-50 then
	  pt=7
  end if
case "p"
  if diff<25 then
      pt=-5
  elseif diff<50 then
	  pt=-6
  end if
case else Response.write "erreur"
end select
%>

Merci d'avance si possible de me donner quelque explication et s'il y a possibilité de le faire d'une autre manière (hormis les if )

++

[muad'dib]

Ben je crois que tu as pondu tout le code te permettant de tester si effectivement c'est possible ou non ! Alors y a plus qu'à ....

[kaiser59]

Dans le 1er cas c'est à dire celui ci :

Code :

1
2
3
4
5
6
7
8
<% 
Select case diff 
case 0 To -24 
pt=6 
case -50 To -25
pt=8 ...
 end select 
%>

j'ai ce message d'erreur :
Erreur de compilation Microsoft VBScript erreur '800a0400'

Instruction attendue

/calcul.asp, ligne 149

case 0 To -25
-------^

Il manque quoi dans ma syntaxe :p

pour l'autre j'ai ceci :

Code :

1
2
3
4
5
6
7
8
9
<%
Select case diff
 case >-25
       pt=6
 case >-50
       pt=8
...
end select
%>

Erreur de compilation Microsoft VBScript erreur '800a03ea'

Erreur de syntaxe

/calcul.asp, ligne 149

case <-25
-----^

Tous semble possible mais manque quelque chose apparemment mais je vois pas quoi !?

[J1]

Bonjour,

ce que tu souhaites faire est possible en VB mais pas en VBS, comme tu pourras le constater sur cette page du site de Microsoft (la question du Select Case est abordée vers le bas de la page).
Tu peux te rabattre sur une structure en If...ElseIf pour obtenir un résultat approchant.

[kaiser59]

Ok

merci pour vos réponses

++