Précédent   Forum des professionnels en informatique > Webmasters - Développement Web > Langages serveur > ASP
ASP Forum sur la programmation ASP. Avant de poster : Cours ASP, FAQ ASP
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 03/01/2008, 14h07   #1
Invité de passage
 
Inscription : septembre 2007
Messages : 6
Détails du profil
Informations forums :
Inscription : septembre 2007
Messages : 6
Points : 0
Points : 0
Par défaut Exécution de 2 conditions IF en VbScript

Bonjour à tout le Monde,

je suis débutant en VBScript et ASP et je cherche à exécuter des procédures stokcés en cochant des checkboxs dans un formulaire et en cliquant aprés sur le bouton valider, le probléme c'est que la premiére qui s'exécute et les autres non.mon code ASP (test1.asp)est comme suit :
Code asp :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
@LANGUAGE="VBSCRIPT"
 
Set cnx = Server.CreateObject("ADODB.Connection")
 
	ChaineCnx = "driver={SQL SERVER};server=S53DNVMV081;uid=cli_base_besoin_commun;pwd=pass;database=CLI_BASE_BESOIN_COMMUN"
 
	cnx.open ChaineCnx 
 
For i = 1 To Request.QueryString("choix").Count
  if Request.QueryString("choix") = "1" then cnx.Execute "sp_MAJ_Ref1",,adExecuteNoRecord end if
  if Request.QueryString("choix") = "2" then cnx.Execute "sp_MAJ_Ref2",,adExecuteNoRecord end if
    Response.Write(Request.QueryString("choix")(i) & "<BR>")
Next
 
 cnx.close
 
  set cnx = nothing

et le code HTML est :
Code html :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
<html>
  <head>
    <title>Mise à Jour</title>
 
  </head>
  <body>
 
      <form action="test1.asp" method="GET">
 
      <u>Mise à jour des Fichiers PSFT:</u><br>
      <br> 
 
      <input type="checkbox" name="choix" value="1"> Extraction_CD <br><br>
 
      <input type="checkbox" name="choix" value="2"> Extraction_DSM <br><br>
 
      <br>
 
      <input type="submit"  name="validation" value="Valider">      
      &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
 
      <input type="reset" name="annulation" value="Effacer">
       &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
 
	  <input type="reset" name="annulation" value="Quitter" onClick="window.close();" >
 
      </form>
  </body>
</html>

--------
Utilises les balises Codes (#) la prochaine fois quand tu insère du code
kaiser59
simo333 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 03/01/2008, 16h24   #2
Expert Confirmé
 
Avatar de pc75
 
Inscription : septembre 2004
Messages : 2 814
Détails du profil
Informations personnelles :
Âge : 56
Localisation : France, Paris (Île de France)

Informations forums :
Inscription : septembre 2004
Messages : 2 814
Points : 3 011
Points : 3 011
Bonjour,

Dans ta boucle FOR i ..., que t'affiche la ligne Response.Write(Request.QueryString("choix")(i) & "<BR>")
__________________
Par principe, je ne réponds pas aux messages URGENT.
Il n'y a pas de choses urgentes, il n'y a que des choses en retard. (un inconnu)
pc75 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 03/01/2008, 21h36   #3
Modérateur
 
Avatar de kaiser59
 
Inscription : novembre 2005
Messages : 1 248
Détails du profil
Informations personnelles :
Âge : 32

Informations forums :
Inscription : novembre 2005
Messages : 1 248
Points : 1 205
Points : 1 205
Envoyer un message via MSN à kaiser59
Salut,

Pour la récupération des valeurs d'un checkbox cela se fait de la sorte :
Code asp :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
For each Element in request.querystring("choix")
'Tu choisis soit l'une soit l'autre des conditions mais pas les deux en même temps
'condition avec les if
 if Element = "1" then
   cnx.Execute "sp_MAJ_Ref1",,adExecuteNoRecord 
 end if
 
 if Element = "2" then
  cnx.Execute "sp_MAJ_Ref2",,adExecuteNoRecord 
 end if
'/condition avec les if
 
'condition avec select
select case Element
  case "1"
    cnx.Execute "sp_MAJ_Ref1",,adExecuteNoRecord
  case "2"
   cnx.Execute "sp_MAJ_Ref2",,adExecuteNoRecord 
end select
'/condition avec select
 
  response.write Element &"<br>"&vbcrlf
end if

Petite question, pourquoi mettre des conditions si tu peux cocher les deux cases ??
__________________
Ne dites pas Java pour dire Javascript ! Ces deux codes n'ont rien à voir ! // Essayez d'expliquer, de la façon la plus claire possible votre problème. // Parfois une image vaut mieux qu'un long discours

FAQ ASP
kaiser59 est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 13h51.


 
 
 
 
Partenaires

Hébergement Web