Expand|Select|Wrap|Line Numbers
- <!DOCTYPE HTML>
- <html>
- <head>
- <title>Gestion Des Non-Conformité</title>
- <link rel="stylesheet" href="css/style.css"/>
- <!-- <script type="text/javascript" src="chemindiv.js">
- </script>-->
- <script type="text/javascript" src="JScript_1.11.js"></script>
- <script type="text/javascript" src="Copie (2) de jvc.js"></script>
- <style type="text/css">
- h3{font-family: Calibri; font-size: 22pt; font-style: normal; font-weight: bold; color:SlateBlue;
- text-align: center; text-decoration: underline }
- table{font-family: Calibri; color:white; font-size: 11pt; font-style: normal;
- background-color: #4c8f97; border: 5px solid #1c2137}
- table.inner{border: 0px}
- </style>
- <script type="text/javascript" src="jquery-1.7.2.min.js"></script>
- <script>
- function Submitt(){
- document.getElementById("allserivce").submit();
- }
- </script>
- <!-- <script type="text/javascript">
- $.get('Copie de selectemployee_par_service.asp', function (data) {
- $('#allserivce').html(data);
- });
- </script>-->
- </head>
- <body >
- <div id="body">
- <h3>identification de non-conformite</h3>
- <form action="Employee.asp" method="POST">
- <table align="center" cellpadding = "10" >
- <!----- N dossie ---------------------------------------------------------->
- <tr>
- <td>N Dossier</td>
- <td><input type="text" name="First_Name" maxlength="30" id="autree" onclick="check();" />
- </td>
- </tr>
- <!----- test ---------------------------------------------------------->
- <tr>
- <td>Service </td>
- <td><select onchange="this.form.submit();Loaddd('Employee.asp','nservicee');" name="comboser" id="allserivce">
- </select></td>
- </tr>
- <!----- choix service ---------------------------------------------------------->
- <tr>
- <td>Choix</td>
- <td><select id="nservicee">
- </select></td>
- </tr>
- <!----- nature ---------------------------------------------------------->
- <tr>
- <td>Nature</td>
- <td><input type="text" name="Last_Name" maxlength="30"/>
- </td>
- </tr>
- <!-----delai---------------------------------------------------------->
- <tr>
- <td>Delai</td>
- <td><input type="text" name="Email_Id" maxlength="100" /></td>
- </tr>
- <!----- Processus-------------------------------------------------------->
- <tr>
- <td>Processus</td>
- <td>
- <select name="Birthday_day" id="Birthday_Day">
- <option value="1">Processus 1</option>
- <option value="2">Processus 2</option>
- <option value="3">Processus 3</option>
- <option value="4">Processus 4</option>
- </select>
- </td>
- </tr>
- <!----- Activite-------------------------------------------------------->
- <tr>
- <td>Activite</td>
- <td>
- <select id="Birthday_Month" name="Birthday_Month">
- <option value="October">Activite 1</option>
- <option value="November">Activite 2</option>
- <option value="December">Activite 3</option>
- </select>
- </td>
- </tr>
- <!----- AC et AP-------------------------------------------------------->
- <tr>
- <td>AC et AP</td>
- <td>
- <select name="Birthday_Year" id="Birthday_Year">
- <option value="oui">Oui</option>
- <option value="non">non</option>
- </select>
- </td>
- </tr>
- <tr>
- <td colspan="2" align="center">
- <input type="button" value="Submit"/>
- <input type="reset" value="Reset"/>
- </td>
- </tr>
- </table>
- </form>
- </div>
- </body>
- </html>
- asp page
- <%@ LANGUAGE="VBSCRIPT" %>
- <!-- #include file="Connect.inc" -->
- <%
- strconnexion = connectionstr
- Dim Connection
- Dim Recordse
- Dim Recordse1
- Dim Recordse2
- Dim sql
- Dim sql1
- Dim sql2
- Dim serrr
- serrr="CT"
- sql1= "SELECT * FROM Servicee where Libelle_service='"& Request.Form("comboser") &"'"
- Set Connection = Server.CreateObject("ADODB.Connection")
- Set Recordse1 = Server.CreateObject("ADODB.Recordset")
- Connection.Open strconnexion
- Recordse1.Open sql1,Connection
- if Recordse1("ID_service") = 2 then
- sql="select * from Employee where Employee.ID_service="& Recordse1("ID_service") &" and ID_profile=2 "
- Set Recordse = Server.CreateObject("ADODB.Recordset")
- Recordse.Open sql,Connection
- Response.Write("<select>")
- If Recordse1.EOF Then
- Response.Write("<option>Aucune Employee</option>")
- else
- Do While NOT Recordse.Eof
- Response.Write("<option>"& Recordse("Nom_emp")+" "+ Recordse("Prenom_emp") &"</option>")
- Recordse.MoveNext
- loop
- end If
- Response.Write("</select>")
- ' else
- ' sql2 = "select * from Employee where ID_service ="& Recordse1("ID_service") &""
- ' Recordse2.Open sql2,Connection
- ' If Recordse2.EOF Then
- ' Response.Write("<option>Aucune Employee</option>")
- ' else
- ' Do While NOT Recordse2.Eof
- ' Response.Write("<option>"& Recordse2("Nom_emp")& "</option>")
- ' Recordse2.MoveNext
- ' loop
- ' end If
- end If
- Recordse.Close
- Set Recordse=nothing
- Recordse1.Close
- Set Recordse1=nothing
- Connection.Close
- Set Connection=nothing
- %>