J'ai une page permettant de selectionner un nom parmi une liste deroulante, en validant cela m'affiche une nouvelle page avec un tableau recapitulatif des differents logiciels que la personne a emprunte,
hors si je choisi un nom ds la liste qui n'a pas emprunter de logiciel, il y a apparition d'un message d'erreur,
je dois mettre une condition mais laquelle?
(c'est dire quand la request users ne comprend de Id_order)
pouvez vous venir a mon bete je ne suis pas un specialiste!
merci, voici mon code:
<%@ Language = "VBScript"%>
<%
' Connection database
dim conn
dim rs
dim strsql
dim strconn
workpath = "C:\Inetpub\wwwroot\Booking\Base\Booking.mdb"
strconn = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & workpath
set conn = server.createobject("adodb.connection")
conn.open strconn
strSQL = "SELECT forename,surname FROM ESC_team WHERE EMPLOY_REF = "&REQUEST.FORM("users")&""
set rsPerson = Conn.Execute(strSQL)
set strSQL = nothing
' Get variables
dim users,date,soft
'users = request.form("users")
users = rsPerson(0)&" "&rsPerson(1)
%>
<!-- #include file = "heading.asp" -->
<%
response.write("<center><font face=verdana size=5>")
response.write("<br><br><b>Details of "&users&" booking</B><br><br>")
%>
<%
set rs = server.createobject("adodb.recordset")
strsql = "SELECT ESC_team.FORENAME, ESC_team.SURNAME, softwares.Title_soft, softwares.Disc, orders.date, softwares.Id_soft, orders.Id_order, orders.return_date, softwares.Details, categories.Title_cat"&vbcrlf&_
"FROM categories INNER JOIN (softwares INNER JOIN (ESC_team INNER JOIN orders ON ESC_team.EMPLOY_REF = orders.users) ON softwares.Id_soft = orders.soft) ON categories.Id_cat = softwares.Id_cat"&vbcrlf&_
"WHERE ESC_team.EMPLOY_REF = "&REQUEST.FORM("users")&""
rs.open strsql, conn
%>
<div align="center">
<table border="1" width="100%" cellpadding="0" bordercolorlight="#000000" bordercolordark="#FFFFFF" bordercolor="#FFFFFF">
<tr>
<td width="6%" align="center"><b>Loan Date</b></td>
<td width="6%" align="center"><b>Return Date</b></td>
<td width="2%" align="center"><b>Ref</b></td>
<td width="30%" align="center"><b>Software</b></td>
<td width="10%" align="center"><b>Category</b></td>
</tr>
<%
rs.movefirst
Do While NOT rs.EOF
%>
<tr>
<td align="center"><% = rs(4)%></td>
<td align="center"><% = rs(7)%></td>
<td align="center"><% = rs(5)%></td>
<td><% = rs(2)&" "&rs(3)&" "&rs(8)%></td>
<td align="center"><% = rs(9)%></td>
</tr>
<%
rs.movenext
Loop
%>
</table>
</div>
<%
response.write("</font></center>")
%>
<%
' Close
conn.close
set conn = nothing
%>
<HTML>
<HEAD>
<SCRIPT LANGUAGE="JavaScript">
<!-- Début
function fermer() {
window.close();
}
// Fin -->
</SCRIPT>
<BODY>
<FORM>
<p align="center">
<INPUT TYPE="Button" VALUE="Home page"onClick="history.go(-1)">
<INPUT TYPE=button onClick="fermer()" VALUE="Close Window">
</FORM>
</BODY>
</HTML>
<br>
<!-- #include file = "footer.asp" -->