Discussion :

[Rhapthorne]

Bonjour,

C'est la première fois que je me lance sur un forum, alors ce serait une super expérience si j'en sortais vainqueur

Voici mon problème :
J'édite une page .asp qui se trouve être une des pages intranet de mon entreprise, car j'ai en amont ajouté de nouveaux champs dans nos BDD, qui nécessitent ici d'être renseignés : afin d'intégrer un nouveau contact, nous devrons maintenant saisir son département, son service, puis son poste.

Sachant qu'un département comporte N services, et un service N postes..
Les schémas de mes tables sont les suivantes :
Départements : Code_D - Label
Services : Code_D - Code_S - Label (donc jointure implicite du dép.)
Postes : Code_D - Code_S - Code_P - Label ("" dép. et serv.)

Voici aujourd'hui l'architecture de ma page .asp (sachant que j'aimerais si possible y porter le minimum de modifications possible..) :

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
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
// Création des futures requêtes
set Cbofonction2 = server.CreateObject("ADODB.Recordset")
set Cbofonction3 = server.CreateObject("ADODB.Recordset")
set Cbofonction4 = server.CreateObject("ADODB.Recordset")
 
// Ouverture base en lecture
objconnection2.Open "[Base]","[login]","[pass]"
 
// Instanciation des chaînes-requêtes
req2 = "SELECT CODE_D, LABEL FROM departements order by LABEL"
req3 = "SELECT CODE_S, CODE_D, LABEL FROM services order by LABEL"
req4 = "SELECT DISTINCT CODE_P, CODE_S, CODE_D, LABEL FROM postes order by LABEL"
 
// Lancement des requêtes
cbofonction2.Open req2,Objconnection2
cbofonction3.Open req3,Objconnection2
cbofonction4.Open req4,Objconnection2
 
// Affectation des codes du contact s'ils existent
code_d = ObjRecordset("Code_D")
code_s = ObjRecordset("Code_S")
code_p = ObjRecordset("Code_P")
 
// Création de l'objet graphique : liste départements
<td><i>Département : </i></td>
<td>
<select name="code_departement" onchange="javascript:change_service(this.value);">
<%do while not Cbofonction2.EOF%>
<option value="<%=Cbofonction2("CODE_D")%>"
<% if code_d=Cbofonction2("CODE_D") then%> selected <%end if%>>
<%=Cbofonction2("LABEL")%></option>
<%Cbofonction2.MoveNext loop%>
</select>
</td>

Et après des heures de compréhension de code (en voici une toute petite partie ^^) et de modifs, je n'arrive toujours pas à proposer la bonne liste de services en fonction de son choix de département.. (elle reste la même : tous les services); il en va de même pour les postes..

Il me faudrait une sorte de reload de la page afin d'affecter les nouvelles valeurs ? Appels serveur ou autre ? Je suis perdu..

Je suis parti sur l'idée de l'évènement JS OnChange (en vert), j'espère que c'est la bonne piste..

Merci d'avance

[Rhapthorne]

Petit up : J'aimerais simplement pouvoir adapter ma requête en fonction du choix de l'utilisateur dans cette même page.
La demande commence à devenir urgente..

Merci d'avance.

[sNOOtch]

À mon avis, il faut que tu postes ton formulaire , sur le onchange, tu mets quelque chose comme

Code :

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

Onchange="javascript:document.monformulaire.submit();

Sur ton post tu récupèreras la valeur de ton select.

Des que tu as cette valeur tu reconstruis ta requête 3, je vois bien quelque chose comme ça

Code :

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

1
2
3
4
5
6
Req3 =" Select code_s,code_d, label from services "
 
           If request.form("code_departement") <> "" Then
               Req3 = Req3 & " where code_d = '" &request.form("code_departement") & "'"
          End If 
          Req3 = Req3 & " order by label "