Poser une question

debutant liste deroulante asp

Bonjour
je viens demander votre aide parceque la je bloque un peu :(

voila mon pb :
ma liste deroulante fait appel a ma table reunion qui se compose en 4 champs
reunion 1
reunion 2
reunion 3
reunion 4

voila je souhaite afficher les personnes qui appartiennenet a la reunion selectionnée ...

' Connexion à la BDD

set con = server.CreateObject("adodb.connection")
set cmdArea = server.CreateObject("adodb.command")
con.Open Session("dsn")
con.CursorLocation = adUseClient
cmdArea.ActiveConnection = con
%>

<% ' liste deroulante reunion
<TR>
<TD colspan=2>
<Select id="tache" name="tache" >
<option selected="true" value="tache">
Liste des Réunions</option>
<%

cmdArea.CommandText = " SELECT DISTINCT dbo.Task.Name AS nom_tache, dbo.Task.TaskId AS num_tache "&_
" FROM dbo.Project INNER JOIN "&_
" dbo.Task ON dbo.Project.CustomerId = dbo.Task.CustomerId AND dbo.Project.CustomerId = dbo.Task.CustomerId AND "&_
" dbo.Project.EngagementId = dbo.Task.EngagementId AND dbo.Project.EngagementId = dbo.Task.EngagementId AND "&_
" dbo.Project.ProjectId = dbo.Task.ProjectId AND dbo.Project.ProjectId = dbo.Task.ProjectId "&_
" WHERE (dbo.Project.Name = 'Représentant du personnel') "&_
" AND (dbo.Task.Name LIKE 'Réunion%')"

set tache = cmdArea.Execute
do while not tache.eof
%>
<option value="<%=cstr(tache("num_tache"))%>"><%=tache("nom_tache")%></OPTION>
<%
tache.movenext
loop%>
</select>
</TD>
<TD></TD>
</TR>
<TR>
<TD align=center colspan=3><br><INPUT TYPE=BUTTON Value="<%=GlobString("70590")%>" OnClick="Javascipt:GoTime()" id=BUTTON1 name=BUTTON1></TD>
</TR>


voila et dans une uatre page il y a laffichage


<tr onMouseOver="javascript:this.style.background='#6699ff'"onMouseOut="javascript:this.style.background='#ffffff'"
bgcolor=#ffffff align=center>
<td> Nom Tache </td>
<td> Nom </td>
<TD> Poste </td>
<TD>Heure par Jour </td>
<TD> Heure par Semaine </td>
<td> Jour </td>
</tr>


<%

cmdArea.CommandText = " SELECT dbo.Project.ProjectId AS num_projet, dbo.Project.Name AS nom_projet, dbo.Task.Name AS nom_tache, dbo.Resource.Name AS nom_ressource, "&_
" dbo.ResourcePayroll.HoursPerDay AS heure_par_jour, dbo.ResourcePayroll.CertificationHours AS heure_par_semaine, "&_
" dbo.Task.TaskId AS num_tache, dbo.ResourcePayroll.UpdatedOn AS jour "&_
" FROM dbo.Project INNER JOIN "&_
" dbo.Task ON dbo.Project.CustomerId = dbo.Task.CustomerId AND dbo.Project.CustomerId = dbo.Task.CustomerId AND "&_
" dbo.Project.EngagementId = dbo.Task.EngagementId AND dbo.Project.EngagementId = dbo.Task.EngagementId AND "&_
" dbo.Project.ProjectId = dbo.Task.ProjectId AND dbo.Project.ProjectId = dbo.Task.ProjectId INNER JOIN "&_
" dbo.TaskAssignment ON dbo.Task.CustomerId = dbo.TaskAssignment.CustomerId AND "&_
" dbo.Task.EngagementId = dbo.TaskAssignment.EngagementId AND dbo.Task.ProjectId = dbo.TaskAssignment.ProjectId AND "&_
" dbo.Task.TaskId = dbo.TaskAssignment.TaskId INNER JOIN "&_
" dbo.Resource ON dbo.TaskAssignment.ResourceId = dbo.Resource.ResourceId INNER JOIN "&_
" dbo.ResourcePayroll ON dbo.Resource.ResourceId = dbo.ResourcePayroll.ResourceId "&_
" WHERE (dbo.Project.Name = 'Représentant du personnel') AND (dbo.Task.Name = '"& selection & "') "

selection = request.form("tache")
set oRs = cmdArea.Execute

If NOT oRs.EOF Then
compteur=1

Do While not oRs.EOF

if oRs("heure_par_semaine") = "35" or oRs("heure_par_semaine") < "35" then
reponse=("non cadre")
else
if oRs("heure_par_semaine") > "35" then
reponse=("cadre")

end if
end if
%>

<tr onMouseOver="javascript:this.style.background='#6699ff'"onMouseOut="javascript:this.style.background='#ffffff'"
bgcolor=#ffffff align=center>
<td> <% =oRs("nom_tache") %> </td>
<TD > <% =oRs("nom_ressource") %> </td>
<TD > <% =reponse %> </td>
<TD > <% =oRs("heure_par_jour") %> </td>
<TD > <% =oRs("heure_par_semaine") %> </td>

<td> <% = oRs("jour") %> </td>
</tr>
<%

oRs.MoveNext
compteur = compteur + 1
Loop
Else
Response.Write "<tr><td colspan='11' align=center> Pas de ressources </td></tr>"
compteur = 0
End IF
%>

avec ce code, il ne m'affiche aucune personnes alors que mes tables sont remplies

si quelqun avait un peu de temps ca serait cool

merci ;)

Réponses

Re: debutant liste deroulante asp  Oznog 3/5/2005