Stages

Soucieux de la formation pratique de ses étudiants, l'Institut Polytechnique offre la possibilité d'effectuer des stages en milieu industriel au Maroc ou à l'étranger. Ces stages crédités et rémunérés vous permettront d'acquérir de l'expérience dans votre domaine d'études, de se familiariser avec le marché du travail et se faire connaître des employeurs éventuels.

Les stages effectués:

<% if 0 then %> <% end if %> <% 'Dimension variables Dim adoCon 'Holds the Database Connection Object Dim rsGuestbook 'Holds the recordset for the records in the database Dim strSQL 'Holds the SQL query for the database 'Create an ADO connection odject Set adoCon = Server.CreateObject("ADODB.Connection") 'Set an active connection to the Connection object using a DSN-less connection adoCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("base\StagesWeb.mdb") 'Set an active connection to the Connection object using DSN connection 'adoCon.Open "DSN=guestbook" 'Create an ADO recordset object Set rsStudent = Server.CreateObject("ADODB.Recordset") 'Initialise the strSQL variable with an SQL statement to query the database strSQL = "SELECT DISTINCT Stages.An FROM Stages WHERE PFE=0" 'Open the recordset with the SQL query rsStudent.Open strSQL, adoCon 'Loop through the recordset Do While not rsStudent.EOF 'Write the HTML to display the current record in the recordset Response.Write("

") Response.Write(" ") Response.Write(" Année :") Response.Write("") Response.Write(rsStudent("An")) Response.Write("

") 'Move to the next record in the recordset rsStudent.MoveNext Loop 'Reset server objects rsStudent.Close %>

Les projets de fin d'études: <% if 0 then %> <% end if %> <% strSQL = "SELECT DISTINCT Stages.An FROM Stages WHERE PFE=-1" 'Open the recordset with the SQL query rsStudent.Open strSQL, adoCon 'Loop through the recordset Do While not rsStudent.EOF 'Write the HTML to display the current record in the recordset Response.Write("

") Response.Write(" ") Response.Write(" Année :") Response.Write("") Response.Write(rsStudent("An")) Response.Write("

") 'Move to the next record in the recordset rsStudent.MoveNext Loop 'Reset server objects rsStudent.Close %>

Les partenaires:

<% 'Initialise the strSQL variable with an SQL statement to query the database strSQL = "SELECT DISTINCT Stages.Compagnie,Stages.Photo FROM Stages" 'Open the recordset with the SQL query rsStudent.Open strSQL, adoCon 'Loop through the recordset Do While not rsStudent.EOF 'Write the HTML to display the current record in the recordset Response.Write("") Response.Write ("") 'Move to the next record in the recordset rsStudent.MoveNext Loop 'Reset server objects rsStudent.Close Set rsStudent = Nothing Set adoCon = Nothing %>

") Response.Write("

") Response.Write( rsStudent("Compagnie")) Response.Write ("

") Response.Write("

") 'Response.Write("

") ' Response.Write(" ") If rsStudent("Photo")<>"M" Then Response.Write "" End If Response.Write ("