[Solved] Insert into a Grid and have to rebind 2 other grids

[Myriam]

Hello
I have a grid which I can insert value in it.
I have 2 other grids which have values from the first grid.
My problem is when I insert into the first grid, when I go see the other grids, I can't see the new value.
Note: each Radgrid are in different RadPageView.
For the first Radgrid I have this event:

Private Sub RadGrid_Entreprise_ItemInserted(ByVal source As Object, ByVal e As Telerik.Web.UI.GridInsertedEventArgs) Handles RadGrid_Entreprise.ItemInserted
        Me.RadGrid_offre.Rebind()
        Me.RadGrid_Offre_Programme.Rebind()
End Sub

But seems like it doesn't change anything
Any idea how to rebind it properly?
Thank you
Myriam

 

[Vlad]

Hi Myriam,

Can you verify if this event is fired? Generally this should work only when the grid is bound to data source control.

Greetings,
Vlad
the Telerik team

Instantly find answers to your questions on the new Telerik Support Portal.
Check out the tips for optimizing your support resource searches.

[Myriam]

Thanks Vlad for you reply
If you talked about RadGrid_Entreprise_ItemInserted yes this is fired. All my three radgrids are bound to three different sqldatasources...
Any idea?

[Vlad]

Hello Myriam,

Do you have RadAjaxManager in this scenario? If this is the case you will need to add setting if first grid initiate the ajax request to update the second grid.

Best wishes,
Vlad
the Telerik team

Instantly find answers to your questions on the new Telerik Support Portal.
Check out the tips for optimizing your support resource searches.

[Myriam]

Vlad, yes I do have a radajaxmanager for the first grid.
Unfortynetly, I don't know what you mean by "add setting if first grid initiate the ajax request to update the second grid.
"
Can you give me the code and where do I have to put it?
 Thank you very much!

[Vlad]

Hi Myriam,

Here is an example:

<telerik:RadAjaxManager ID="RadAjaxManager1" runat="server">
        <AjaxSettings>
            <telerik:AjaxSetting AjaxControlID="RadGrid1">
                <UpdatedControls>
                    <telerik:AjaxUpdatedControl ControlID="RadGrid1"  />
                    <telerik:AjaxUpdatedControl ControlID="RadGrid2"  />
                </UpdatedControls>
            </telerik:AjaxSetting>
             <telerik:AjaxSetting AjaxControlID="RadGrid2">
                <UpdatedControls>
                    <telerik:AjaxUpdatedControl ControlID="RadGrid2"  />
                </UpdatedControls>
            </telerik:AjaxSetting>
        </AjaxSettings>
    </telerik:RadAjaxManager>

The first setting will update both grids and the second will update only RadGrid2.

Kind regards,
Vlad
the Telerik team

Instantly find answers to your questions on the new Telerik Support Portal.
Check out the tips for optimizing your support resource searches.

[Myriam]

<telerik:RadAjaxManager ID="RadAjaxManager1" runat="server">
            <AjaxSettings>
                <telerik:AjaxSetting AjaxControlID="RadGrid1">
                    <UpdatedControls>
                        <telerik:AjaxUpdatedControl ControlID="RadGrid1" LoadingPanelID="RadAjaxLoadingPanel1" />
                        <telerik:AjaxUpdatedControl ControlID="RadGrid_Entreprise" LoadingPanelID="RadAjaxLoadingPanel1" />
                        <telerik:AjaxUpdatedControl ControlID="RadGrid_Demande" LoadingPanelID="RadAjaxLoadingPanel1" />
                        <telerik:AjaxUpdatedControl ControlID="RadGrid_Log" LoadingPanelID="RadAjaxLoadingPanel1" />

                    </UpdatedControls>
                </telerik:AjaxSetting>
                <telerik:AjaxSetting AjaxControlID="RadGrid_Entreprise">
                <UpdatedControls>
                    <telerik:AjaxUpdatedControl ControlID="RadGrid_Offre_Programme"  />
                    <telerik:AjaxUpdatedControl ControlID="RadGrid_offre"  />
                </UpdatedControls>
            </telerik:AjaxSetting>
            </AjaxSettings>
        </telerik:RadAjaxManager>

Even with this, that doesn't work..
If I press F5, it refresh RadGrid_Offre_Programme and RadGrid_offre.

[Sebastian]

Hello Myriam,

Can you confirm that the grids are ajaxified via this single RadAjaxManager instance only and no RadAjaxPanels are wrapped around them?

I also suggest you post your entire code implementation (markup and code-behind) in this forum thread using the 'Format code block' dialog from the upper right corner of the forum editor. Thus I will examine it in detail and will be able to provide more to-the-point answer.

Kind regards,
Sebastian
the Telerik team

Instantly find answers to your questions on the new Telerik Support Portal.
Check out the tips for optimizing your support resource searches.

[Myriam]

	Imports Telerik.Web.UI
	Imports System.Drawing
	Imports Telerik.QuickStart
	Imports System
	Imports System.Data.SqlClient
	Imports System.Data
	Imports System.Collections
	Imports System.ComponentModel
	Imports System.Web
	Imports System.Web.SessionState
	Imports System.Web.UI
	Imports System.Web.UI.WebControls
	Imports System.Web.UI.HtmlControls
	Imports System.Configuration
	Imports System.Web.HttpUtility
	Partial Public Class FEN_GESTION
	Inherits System.Web.UI.Page
	Private gridMessage As String = Nothing
	Public L_NO_DOMAINE As Integer
	Public L_NOM_DOMAINE As String
	Public L_NO_ENTREPRISE As Integer
	Public L_CV As String
	Public L_LETTRE As String
	Public L_NO_OFFRE As Integer
	Public fonctionsvbs As New fonctionsvb
	Public Conn As SqlConnection = New SqlConnection(fonctionsvbs.ConnectionString)
	Public ConnJadeAdulte As SqlConnection = New SqlConnection(fonctionsvbs.ConnectionStringJadeAdulte)
	Public emailAdmin As String = fonctionsvbs.EmailAdmin
	Public NO_OFFRE_PROGRAMME_INSERT As Integer
	Public NO_PROGRAMME_OFFRE_INSERT As Integer
	Public temp_No_Offre As Integer
	Public temp_No_Programme As Integer
	Public CodePermInvalide As String
	Public dt As DataTable
	Public liste As New List(Of String)
	Public listcount As Integer
	Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
	RadGridFiltreText(RadGrid_Log)
	RadGridFiltreText(RadGrid_BanqueCV)
	RadGridFiltreText(RadGrid_Entreprise)
	RadGridFiltreText(RadGrid_offre)
	RadGridFiltreText(RadGrid_Offre_Programme)
	RadGridFiltreText(RadGrid1)
	If Not IsPostBack Then
	dt = New DataTable()
	dt.Columns.Add(New DataColumn("RowNumber", GetType(String)))
	'Ajouter le nombre de colonne au début
	AddRow(dt)
	AddRow(dt)
	AddRow(dt)
	End If
	End Sub
	Private Sub RadGridFiltreText(ByVal sRadgrid As RadGrid)
	Dim Menu As GridFilterMenu = sRadgrid.FilterMenu
	Dim item As RadMenuItem
	For Each item In Menu.Items
	'change the text for the StartsWith menu item
	Select Case item.Text
	Case "StartsWith"
	item.Text = "Commençant par"
	Case "NoFilter"
	item.Text = "Sans filtre"
	Case "Contains"
	item.Text = "Contient"
	Case "DoesNotContain"
	item.Text = "Ne contient pas"
	Case "EndsWith"
	item.Text = "Finit par"
	Case "EqualTo"
	item.Text = "Égal à"
	Case "NotEqualTo"
	item.Text = "N'est pas égal à"
	Case "GreaterThan"
	item.Text = "Plus grand que"
	Case "LessThan"
	item.Text = "Plus petit que"
	Case "GreaterThanOrEqualTo"
	item.Text = "Plus grand que ou égal à"
	Case "LessThanOrEqualTo"
	item.Text = "Plus petit que ou égal à"
	Case "Between"
	item.Text = "Entre"
	Case "NotBetween"
	item.Text = "N'est pas entre"
	Case "IsEmpty"
	item.Text = "Est vide"
	Case "NotIsEmpty"
	item.Text = "N'est pas vide"
	Case "IsNull"
	item.Text = "Est null"
	Case "NotIsNull"
	item.Text = "N'est pas null"
	End Select
	Next
	End Sub
	Private Sub RadGrid1_DeleteCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid1.DeleteCommand
	Dim item As GridDataItem
	Dim temp_nom_Domaine As String
	Dim temp_nom_Programme As String
	item = CType(e.Item, GridDataItem)
	If (e.Item.OwnerTableView.Name = "GTVProgramme") Then
	item = DirectCast(e.Item, GridDataItem)
	temp_nom_Programme = item("PNOM").Text.ToString()
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Supprimer un programme", Session("sDemandeur") & " a supprimé le programme " & temp_nom_Programme)
	ElseIf (e.Item.OwnerTableView.Name = "MTVProgramme") Then
	item = DirectCast(e.Item, GridDataItem)
	temp_nom_Domaine = item("NOM").Text.ToString()
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Supprimer un domaine", Session("sDemandeur") & " a supprimé le domaine " & temp_nom_Domaine)
	End If
	End Sub
	Private Sub RadGrid1_InsertCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid1.InsertCommand
	Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
	If "GTVProgramme".Equals(e.Item.OwnerTableView.Name) Then
	Dim strsqlDomaine As String
	Dim cmdDomaine As SqlCommand
	Dim myDADomaine As SqlDataAdapter
	Dim dsDomaine As New DataSet
	L_NO_DOMAINE = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NO_DOMAINE").ToString()
	strsqlDomaine = "SELECT * FROM T_DOMAINE WHERE NO_DOMAINE=" & L_NO_DOMAINE
	cmdDomaine = New SqlCommand(strsqlDomaine, Conn)
	myDADomaine = New SqlDataAdapter(cmdDomaine)
	Conn.Open()
	myDADomaine.Fill(dsDomaine)
	Conn.Close()
	L_NOM_DOMAINE = dsDomaine.Tables(0).Rows(0).Item("NOM")
	Me.SqlDSProgramme.InsertParameters("NO_DOMAINE").DefaultValue = L_NO_DOMAINE
	ElseIf "MTVProgramme".Equals(e.Item.OwnerTableView.Name) Then
	End If
	End Sub
	Private Sub RadGrid1_ItemInserted(ByVal source As Object, ByVal e As Telerik.Web.UI.GridInsertedEventArgs) Handles RadGrid1.ItemInserted
	Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
	If "GTVProgramme".Equals(e.Item.OwnerTableView.Name) Then
	Dim strsqlProgramme As String
	Dim cmdProgramme As SqlCommand
	Dim myDAProgramme As SqlDataAdapter
	Dim dsProgramme As New DataSet
	strsqlProgramme = "SELECT * FROM T_PROGRAMME ORDER BY NO_PROGRAMME DESC"
	cmdProgramme = New SqlCommand(strsqlProgramme, Conn)
	myDAProgramme = New SqlDataAdapter(cmdProgramme)
	Conn.Open()
	myDAProgramme.Fill(dsProgramme)
	Conn.Close()
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Ajouter un programme", Session("sDemandeur") & " a ajouté le programme " & dsProgramme.Tables(0).Rows(0).Item("NOM"))
	ElseIf "MTVProgramme".Equals(e.Item.OwnerTableView.Name) Then
	Dim strsqlDomaine As String
	Dim cmdDomaine As SqlCommand
	Dim myDADomaine As SqlDataAdapter
	Dim dsDomaine As New DataSet
	strsqlDomaine = "SELECT * FROM T_DOMAINE ORDER BY NO_DOMAINE DESC"
	cmdDomaine = New SqlCommand(strsqlDomaine, Conn)
	myDADomaine = New SqlDataAdapter(cmdDomaine)
	Conn.Open()
	myDADomaine.Fill(dsDomaine)
	Conn.Close()
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Ajouter un domaine", Session("sDemandeur") & " a ajouté le domaine " & dsDomaine.Tables(0).Rows(0).Item("NOM"))
	End If
	End Sub
	Private Sub RadGrid1_UpdateCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid1.UpdateCommand
	Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
	If "GTVProgramme".Equals(e.Item.OwnerTableView.Name) Then
	L_NO_DOMAINE = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NO_DOMAINE").ToString()
	' L_NOM_DOMAINE = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NOM").ToString()
	Me.SqlDSProgramme.UpdateParameters("NO_DOMAINE").DefaultValue = L_NO_DOMAINE
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Modifier un programme", Session("sDemandeur") & " a modifié un programme dans le domaine " & L_NO_DOMAINE)
	ElseIf "MTVProgramme".Equals(e.Item.OwnerTableView.Name) Then
	Dim item As GridEditFormItem
	item = CType(e.Item, GridEditFormItem)
	Dim Temp_No_Domaine As TextBox = DirectCast(item("NOM").Controls(0), TextBox)
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Modifier un domaine", Session("sDemandeur") & " a modifié le domaine " & Temp_No_Domaine.Text)
	End If
	End Sub
	Private Sub RadGrid_Entreprise_DeleteCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_Entreprise.DeleteCommand
	Dim item As GridDataItem
	Dim temp_no_entreprise As String
	item = CType(e.Item, GridDataItem)
	If (e.Item.OwnerTableView.Name = "MTVEntreprise") Then
	item = DirectCast(e.Item, GridDataItem)
	temp_no_entreprise = item("NO_ENTREPRISE").Text.ToString()
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Supprimer une entreprise", Session("sDemandeur") & " a supprimé l'entreprise no " & temp_no_entreprise)
	End If
	End Sub
	Private Sub RadGrid_Entreprise_InsertCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_Entreprise.InsertCommand
	End Sub
	Public Sub RadGrid_Entreprise_ItemDataBound(ByVal sender As Object, ByVal e As Telerik.Web.UI.GridItemEventArgs) Handles RadGrid_Entreprise.ItemDataBound
	If TypeOf e.Item Is GridEditableItem AndAlso e.Item.IsInEditMode Then
	Dim editItem As GridEditableItem = DirectCast(e.Item, GridEditableItem)
	'Dim Uploadbx As FileUpload = DirectCast(editItem("TemplateColumn").FindControl("LOGO"), FileUpload)
	'Uploadbx.Width = 400
	'For TemplateColumns
	Dim txtbxNomEntreprise As TextBox = DirectCast(editItem("NOM_ENTREPRISE").Controls(0), TextBox)
	txtbxNomEntreprise.Width = 325
	Dim txtbxDescr As TextBox = DirectCast(editItem("DESCR").Controls(0), TextBox)
	txtbxDescr.Width = 325
	Dim txtbxAdresse As TextBox = DirectCast(editItem("ADRESSE").Controls(0), TextBox)
	txtbxAdresse.Width = 325
	Dim txtbxVille As TextBox = DirectCast(editItem("VILLE").Controls(0), TextBox)
	txtbxVille.Width = 250
	Dim txtbxRespCourriel As TextBox = DirectCast(editItem("RESP_COURRIEL").Controls(0), TextBox)
	txtbxRespCourriel.Width = 325
	Dim txtbxRespNom As TextBox = DirectCast(editItem("RESP_NOM").Controls(0), TextBox)
	txtbxRespNom.Width = 250
	Dim txtbxSiteWeb As TextBox = DirectCast(editItem("SITE_WEB").Controls(0), TextBox)
	txtbxSiteWeb.Width = 325
	' (For GridBoundColumns)
	End If
	End Sub
	Private Sub RadGrid_Entreprise_ItemInserted(ByVal source As Object, ByVal e As Telerik.Web.UI.GridInsertedEventArgs) Handles RadGrid_Entreprise.ItemInserted
	Dim strsqlEntreprise As String
	Dim cmdEntreprise As SqlCommand
	Dim myDAEntreprise As SqlDataAdapter
	Dim dsEntreprise As New DataSet
	If "MTVEntreprise".Equals(e.Item.OwnerTableView.Name) Then
	strsqlEntreprise = "SELECT * FROM T_ENTREPRISE ORDER BY NO_ENTREPRISE DESC"
	cmdEntreprise = New SqlCommand(strsqlEntreprise, Conn)
	myDAEntreprise = New SqlDataAdapter(cmdEntreprise)
	Conn.Open()
	myDAEntreprise.Fill(dsEntreprise)
	Conn.Close()
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Ajouter une entreprise", Session("sDemandeur") & " a ajouté l'entreprise no " & dsEntreprise.Tables(0).Rows(0).Item("NO_ENTREPRISE"))
	End If
	'Me.RadGrid_offre.DataSourceID = SqlDSEntrepriseOffre.SelectCommand
	'Me.RadGrid_Offre_Programme.MasterTableView.Rebind()
	'Me.RadGrid_offre.MasterTableView.Rebind()
	'Me.RadGrid_Offre_Programme.DataSourceID = SqlDSEntrepriseOffre.SelectCommand
	End Sub
	Private Sub RadGrid_Entreprise_UpdateCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_Entreprise.UpdateCommand
	Dim item As GridEditFormItem
	item = CType(e.Item, GridEditFormItem)
	Dim dataItem As GridEditFormItem = DirectCast(e.Item, GridEditFormItem)
	Dim txtbxNomEntreprise As TextBox = DirectCast(dataItem("NOM_ENTREPRISE").Controls(0), TextBox)
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Informations d''entreprise modifiées", Session("sDemandeur") & " a modifié les informations de l'entreprise " & txtbxNomEntreprise.Text)
	End Sub
	Private Sub RadGrid_offre_DeleteCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_offre.DeleteCommand
	Dim dir_name As String
	Dim temp_Code_permanent As String
	Dim temp_No_Offre As Integer
	Dim item As GridDataItem
	item = CType(e.Item, GridDataItem)
	If (e.Item.OwnerTableView.Name = "MTVPostulant") Then
	item = DirectCast(e.Item, GridDataItem)
	temp_Code_permanent = item("CODE_PERMANENT").Text.ToString()
	temp_No_Offre = item("NO_OFFRE").Text.ToString()
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Supprimer une demande", Session("sDemandeur") & " a supprimé la demande de " & temp_Code_permanent & " sur l'offre no " & temp_No_Offre)
	dir_name = Server.MapPath(".\Offre\" & temp_No_Offre & "\" & temp_Code_permanent)
	If My.Computer.FileSystem.DirectoryExists(dir_name) = True Then
	My.Computer.FileSystem.DeleteDirectory(dir_name, FileIO.DeleteDirectoryOption.DeleteAllContents)
	Else
	'MsgBox("Le dossier à supprimer n'existe pas")
	End If
	ElseIf (e.Item.OwnerTableView.Name = "GTVOffre") Then
	item = DirectCast(e.Item, GridDataItem)
	temp_No_Offre = item("NO_OFFRE").Text.ToString()
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Supprimer une offre", Session("sDemandeur") & " a supprimé l'offre no " & temp_No_Offre)
	dir_name = Server.MapPath(".\Offre\" & temp_No_Offre)
	If My.Computer.FileSystem.DirectoryExists(dir_name) = True Then
	My.Computer.FileSystem.DeleteDirectory(dir_name, FileIO.DeleteDirectoryOption.DeleteAllContents)
	Else
	'MsgBox("Le dossier à supprimer n'existe pas")
	End If
	End If
	End Sub
	Private Sub RadGrid_offre_InsertCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_offre.InsertCommand
	Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
	Dim item As GridEditFormItem
	item = CType(e.Item, GridEditFormItem)
	If "GTVOffre".Equals(e.Item.OwnerTableView.Name) Then
	L_NO_ENTREPRISE = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NO_ENTREPRISE").ToString()
	Me.SqlDSOffre.InsertParameters("NO_ENTREPRISE").DefaultValue = L_NO_ENTREPRISE
	Dim dataItem As GridEditFormItem = DirectCast(e.Item, GridEditFormItem)
	Dim DatePickDateDebut As RadDatePicker = DirectCast(item("TemplateColumnDateDebut").FindControl("DPicker_DATE_DEBUT"), RadDatePicker)
	If Not (DatePickDateDebut.SelectedDate Is Nothing) Then
	Me.SqlDSOffre.InsertParameters("DATE_DEBUT").DefaultValue = DatePickDateDebut.SelectedDate
	End If
	Dim DatePickDateFin As RadDatePicker = DirectCast(item("TemplateColumnDateFin").FindControl("DPicker_DATE_FIN"), RadDatePicker)
	If Not (DatePickDateFin.SelectedDate Is Nothing) Then
	Me.SqlDSOffre.InsertParameters("DATE_FIN").DefaultValue = DatePickDateFin.SelectedDate
	End If
	Dim DatePickDateDebutEmploi As RadDatePicker = DirectCast(item("TemplateColumnDateDebutEmploi").FindControl("DPicker_DATE_DEBUT_EMPLOI"), RadDatePicker)
	If Not (DatePickDateDebutEmploi.SelectedDate Is Nothing) Then
	Me.SqlDSOffre.InsertParameters("DATE_DEBUT_EMPLOI").DefaultValue = DatePickDateDebutEmploi.SelectedDate
	End If
	End If
	End Sub
	Private Sub RadGrid_offre_ItemDataBound(ByVal sender As Object, ByVal e As Telerik.Web.UI.GridItemEventArgs) Handles RadGrid_offre.ItemDataBound
	If (TypeOf e.Item Is GridEditableItem AndAlso e.Item.IsInEditMode) And (e.Item.OwnerTableView.Name = "GTVOffre") Then
	Dim editItem As GridEditableItem = DirectCast(e.Item, GridEditableItem)
	'For TemplateColumns
	'Dim Uploadbx As FileUpload = DirectCast(editItem("TemplateColumn").FindControl("LOGO"), FileUpload)
	'Uploadbx.Width = 400
	'For GridBoundColumns
	Dim txtbxTitreOffre As TextBox = DirectCast(editItem("TITRE_OFFRE").Controls(0), TextBox)
	txtbxTitreOffre.Width = 250
	Dim txtbxTachesReliees As TextBox = DirectCast(editItem("TACHES_RELIEES").Controls(0), TextBox)
	txtbxTachesReliees.Width = 325
	txtbxTachesReliees.TextMode = TextBoxMode.MultiLine
	Dim txtbxDescriptionComplementaire As TextBox = DirectCast(editItem("DESCRIPTION_COMPLEMENTAIRE").Controls(0), TextBox)
	txtbxDescriptionComplementaire.Width = 325
	txtbxDescriptionComplementaire.TextMode = TextBoxMode.MultiLine
	Dim txtbxCompetences As TextBox = DirectCast(editItem("COMPETENCES").Controls(0), TextBox)
	txtbxCompetences.Width = 325
	txtbxCompetences.TextMode = TextBoxMode.MultiLine
	Dim txtbxExigences As TextBox = DirectCast(editItem("EXIGENCES").Controls(0), TextBox)
	txtbxExigences.Width = 325
	txtbxExigences.TextMode = TextBoxMode.MultiLine
	Dim txtbxAptitudes As TextBox = DirectCast(editItem("APTITUDES").Controls(0), TextBox)
	txtbxAptitudes.Width = 325
	txtbxAptitudes.TextMode = TextBoxMode.MultiLine
	Dim txtbxTypeEmploi As TextBox = DirectCast(editItem("TYPE_EMPLOI").Controls(0), TextBox)
	txtbxTypeEmploi.Width = 325
	Dim txtbxNbHeureSemaine As TextBox = DirectCast(editItem("NB_HEURE_SEMAINE").Controls(0), TextBox)
	txtbxNbHeureSemaine.Width = 325
	Dim txtbxRespNom As TextBox = DirectCast(editItem("RESP_NOM").Controls(0), TextBox)
	txtbxNbHeureSemaine.Width = 250
	Dim txtbxRespPrenom As TextBox = DirectCast(editItem("RESP_PRENOM").Controls(0), TextBox)
	txtbxNbHeureSemaine.Width = 250
	Dim txtbxRespCourriel As TextBox = DirectCast(editItem("RESP_COURRIEL").Controls(0), TextBox)
	txtbxRespCourriel.Width = 250
	Dim txtbxDemandeur As TextBox = DirectCast(editItem("DEMANDEUR").Controls(0), TextBox)
	txtbxDemandeur.Width = 325
	Dim txtbxSalaireOffert As TextBox = DirectCast(editItem("SALAIRE_OFFERT").Controls(0), TextBox)
	txtbxSalaireOffert.Width = 325
	End If
	End Sub
	Private Sub RadGrid_offre_ItemInserted(ByVal source As Object, ByVal e As Telerik.Web.UI.GridInsertedEventArgs) Handles RadGrid_offre.ItemInserted
	Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
	Dim strsqlOffre As String
	Dim cmdOFfre As SqlCommand
	Dim myDAOffre As SqlDataAdapter
	Dim dsOffre As New DataSet
	Dim tempnomEntreprise As String
	If "GTVOffre".Equals(e.Item.OwnerTableView.Name) Then
	strsqlOffre = "SELECT * FROM T_OFFRE ORDER BY NO_OFFRE DESC"
	cmdOFfre = New SqlCommand(strsqlOffre, Conn)
	myDAOffre = New SqlDataAdapter(cmdOFfre)
	Conn.Open()
	myDAOffre.Fill(dsOffre)
	Conn.Close()
	tempnomEntreprise = fonctionsvbs.TrouveNomEntreprise("NoOffre", dsOffre.Tables(0).Rows(0).Item("NO_OFFRE"))
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Ajouter une offre", Session("sDemandeur") & " a ajouté l'offre " & dsOffre.Tables(0).Rows(0).Item("NO_OFFRE"), tempnomEntreprise)
	End If
	End Sub
	Private Sub RadGrid_offre_UpdateCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_offre.UpdateCommand
	Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
	If "GTVOffre".Equals(e.Item.OwnerTableView.Name) Then
	L_NO_ENTREPRISE = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NO_ENTREPRISE").ToString()
	Me.SqlDSOffre.UpdateParameters("NO_ENTREPRISE").DefaultValue = L_NO_ENTREPRISE
	Dim item As GridEditFormItem
	item = CType(e.Item, GridEditFormItem)
	Dim dataItem As GridEditFormItem = DirectCast(e.Item, GridEditFormItem)
	Dim DatePickDateDebut As RadDatePicker = DirectCast(item("TemplateColumnDateDebut").FindControl("DPicker_DATE_DEBUT"), RadDatePicker)
	If Not (DatePickDateDebut.SelectedDate Is Nothing) Then
	Me.SqlDSOffre.UpdateParameters("DATE_DEBUT").DefaultValue = DatePickDateDebut.SelectedDate
	End If
	Dim DatePickDateFin As RadDatePicker = DirectCast(item("TemplateColumnDateFin").FindControl("DPicker_DATE_FIN"), RadDatePicker)
	If Not (DatePickDateFin.SelectedDate Is Nothing) Then
	Me.SqlDSOffre.UpdateParameters("DATE_FIN").DefaultValue = DatePickDateFin.SelectedDate
	End If
	Dim DatePickDateDebutEmploi As RadDatePicker = DirectCast(item("TemplateColumnDateDebutEmploi").FindControl("DPicker_DATE_DEBUT_EMPLOI"), RadDatePicker)
	If Not (DatePickDateDebutEmploi.SelectedDate Is Nothing) Then
	Me.SqlDSOffre.UpdateParameters("DATE_DEBUT_EMPLOI").DefaultValue = DatePickDateDebutEmploi.SelectedDate
	End If
	Dim temp_No_Offre As TextBox = DirectCast(item("NO_OFFRE").Controls(0), TextBox)
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Modifier une offre", Session("sDemandeur") & " a modifié l'offre no " & temp_No_Offre.Text)
	ElseIf "MTVPostulant".Equals(e.Item.OwnerTableView.Name) Then
	Dim L_NO_Offre = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NO_OFFRE").ToString()
	Dim strsqlUpdate As String
	Dim item As GridEditFormItem
	Dim temp_no_Demande As String
	Dim temp_no_offre As Integer
	item = CType(e.Item, GridEditFormItem)
	Dim dataItem As GridEditFormItem = DirectCast(e.Item, GridEditFormItem)
	temp_no_Demande = item("NO_DEMANDE").Text.ToString
	Dim codePermanent As TextBox = DirectCast(item("CODE_PERMANENT").Controls(0), TextBox)
	strsqlUpdate = ""
	strsqlUpdate = "UPDATE [T_DEMANDE] SET [STATUS] = ? "
	Dim FileUpLettre As FileUpload = DirectCast(item("TemplateColumnLETTRE_PRESENTATION").FindControl("LETTRE_PRESENTATION"), FileUpload)
	'Dim Uploadbx As FileUpload = DirectCast(editItem("TemplateColumn").FindControl("LOGO"), FileUpload)
	L_LETTRE = FileUpLettre.FileName
	If L_LETTRE <> "" Then
	Me.SqlDSPostulant.UpdateParameters("LETTRE_PRESENTATION").DefaultValue = L_LETTRE
	NomFichier(FileUpLettre, codePermanent.Text, "D", "lettre")
	strsqlUpdate = strsqlUpdate & ",[LETTRE_PRESENTATION]=? "
	SauvegarderFichier(FileUpLettre, "lettre", L_NO_Offre, codePermanent.Text)
	End If
	Dim FileUpcv As FileUpload = DirectCast(item("TemplateColumnCV").FindControl("CV"), FileUpload)
	L_CV = FileUpcv.FileName
	If L_CV <> "" Then
	Me.SqlDSPostulant.UpdateParameters("NOM_CV").DefaultValue = L_CV
	NomFichier(FileUpcv, codePermanent.Text, "D", "cv")
	strsqlUpdate = strsqlUpdate & ",[NOM_CV]=? "
	SauvegarderFichier(FileUpcv, "cv", L_NO_Offre, codePermanent.Text)
	End If
	strsqlUpdate = strsqlUpdate & "WHERE NO_DEMANDE=?"
	SqlDSPostulant.UpdateCommand = strsqlUpdate
	temp_no_offre = parentItem("NO_OFFRE").Text
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Modifier une demande", Session("sDemandeur") & " a modifié la demande de " & codePermanent.Text & " sur l'offre no " & temp_no_offre)
	End If
	End Sub
	Protected Function SauvegarderFichier(ByVal sNomFichier As FileUpload, ByVal sType As String, ByVal sNoOffre As Integer, ByVal scodepermanent As String)
	If sNomFichier.HasFile = True Then
	Dim filepath As String = sNomFichier.PostedFile.FileName
	Dim pat As String = "\\(?:.+)\\(.+)\.(.+)"
	Dim r As Regex = New Regex(pat)
	'run
	Dim m As Match = r.Match(filepath)
	Dim file_ext As String = m.Groups(2).Captures(0).ToString()
	Dim filename As String = m.Groups(1).Captures(0).ToString()
	Dim file As String = filename & "." & file_ext
	Dim dir_name As String = Server.MapPath(".\Offre\" & sNoOffre & "\" & scodepermanent & "\")
	If System.IO.Directory.Exists(dir_name) Then
	'Ne rien faire
	Else
	MkDir(Server.MapPath(".\Offre\" & sNoOffre & "\" & scodepermanent & "\"))
	End If
	'save the file to the server
	sNomFichier.PostedFile.SaveAs(Server.MapPath(".\Offre\" & sNoOffre & "\" & scodepermanent & "\") & file)
	Return file
	Else
	Return ""
	End If
	End Function
	Protected Function NomFichier(ByVal NomUpload As FileUpload, ByVal CODE_PERMANENT As String, ByVal LettreTable As String, ByVal sPath As String)
	If NomUpload.HasFile = True Then
	Dim filepath As String = NomUpload.PostedFile.FileName
	Dim pat As String = "\\(?:.+)\\(.+)\.(.+)"
	Dim r As Regex = New Regex(pat)
	'run
	Dim m As Match = r.Match(filepath)
	Dim file_ext As String = m.Groups(2).Captures(0).ToString()
	Dim filename As String = LettreTable & CODE_PERMANENT
	Dim file As String = filename & "." & file_ext
	'save the file to the server
	NomUpload.PostedFile.SaveAs(Server.MapPath(".\" & sPath & "\") & file)
	Return file
	Else
	Return ""
	End If
	End Function
	'Private Sub RadGrid_BanqueCV_DataBound(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadGrid_BanqueCV.DataBound
	'    Dim grid As RadGrid = TryCast(sender, RadGrid)
	'    Dim gridItems As Integer = grid.MasterTableView.Items.Count
	'    If gridItems < 5 Then
	'        grid.Height = 250
	'    Else
	'        grid.Height = 250 + (gridItems * 30)
	'    End If
	'    If grid.Height.Value > 650 Then
	'        grid.Height = 650
	'    End If
	'End Sub
	Protected Sub RadGrid_BanqueCV_DeleteCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_BanqueCV.DeleteCommand
	Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
	Dim masterPrKey As String
	Dim detailPrKey As Integer
	Dim dir_name As String
	Dim strsqlprogramme As String
	Dim cmdProgramme As SqlCommand
	Dim myDAProgramme As New SqlDataAdapter
	Dim dsProgramme As New DataSet
	If (e.Item.OwnerTableView.Name = "GTVUsagerProgramme") Then
	detailPrKey = CType(e.Item.OwnerTableView.DataKeyValues(e.Item.ItemIndex)("NO_PROGRAMME"), Integer)
	masterPrKey = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("CODE_PERMANENT").ToString()
	Me.SqlDSUsagerProgramme.DeleteParameters("CODE_PERMANENT").DefaultValue = masterPrKey
	Me.SqlDSUsagerProgramme.DeleteParameters("NO_PROGRAMME").DefaultValue = detailPrKey
	strsqlprogramme = "SELECT * FROM T_PROGRAMME WHERE NO_PROGRAMME = " & detailPrKey
	cmdProgramme = New SqlCommand(strsqlprogramme, Conn)
	myDAProgramme = New SqlDataAdapter(cmdProgramme)
	Conn.Open()
	myDAProgramme.Fill(dsProgramme)
	Conn.Close()
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Supprimer un programme à l''usager", Session("sDemandeur") & " a supprimé le programme " & dsProgramme.Tables(0).Rows(0).Item("NOM") & " à l'usager " & masterPrKey)
	ElseIf (e.Item.OwnerTableView.Name = "MTVBanqueCv") Then
	masterPrKey = e.Item.OwnerTableView.DataKeyValues(e.Item.ItemIndex)("CODE_PERMANENT")
	dir_name = Server.MapPath(".\cv\" & masterPrKey)
	If My.Computer.FileSystem.DirectoryExists(dir_name) = True Then
	My.Computer.FileSystem.DeleteDirectory(dir_name, FileIO.DeleteDirectoryOption.DeleteAllContents)
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Supprimer un usager", Session("sDemandeur") & " a supprimé l'usager " & masterPrKey)
	Else
	'MsgBox("Le dossier à supprimer n'existe pas")
	End If
	End If
	End Sub
	Private Sub RadGrid_BanqueCV_InsertCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_BanqueCV.InsertCommand
	Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
	Dim item As GridEditFormItem
	item = CType(e.Item, GridEditFormItem)
	If "GTVUsagerProgramme".Equals(e.Item.OwnerTableView.Name) Then
	Dim codePermanent As String = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("CODE_PERMANENT").ToString()
	Dim cbProgramme As RadComboBox = DirectCast(item("NO_PROGRAMME").Controls(0), RadComboBox)
	Me.SqlDSUsagerProgramme.InsertParameters("CODE_PERMANENT").DefaultValue = codePermanent
	Me.SqlDSUsagerProgramme.InsertParameters("NO_PROGRAMME").DefaultValue = cbProgramme.SelectedValue
	Dim DatePickDatediplome As RadDatePicker = DirectCast(item("TemplateColumnDateDiplome").FindControl("DPicker_DATE_DIPLOME"), RadDatePicker)
	If Not (DatePickDatediplome.SelectedDate Is Nothing) Then
	Me.SqlDSUsagerProgramme.InsertParameters("DATE_DIPLOME").DefaultValue = DatePickDatediplome.SelectedDate
	End If
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Ajouter un programme à l''usager", Session("sDemandeur") & " a ajouté le programme " & cbProgramme.Text & " à l'usager " & codePermanent)
	End If
	End Sub
	Private Sub RadGrid_BanqueCV_ItemDataBound(ByVal sender As Object, ByVal e As Telerik.Web.UI.GridItemEventArgs) Handles RadGrid_BanqueCV.ItemDataBound
	If (TypeOf e.Item Is GridEditableItem AndAlso e.Item.IsInEditMode) And (e.Item.OwnerTableView.Name = "MTVBanqueCv") Then
	Dim editItem As GridEditableItem = DirectCast(e.Item, GridEditableItem)
	'For TemplateColumns
	'Dim Uploadbx As FileUpload = DirectCast(editItem("TemplateColumnCv").FindControl("CV"), FileUpload)
	'Uploadbx.Width = 400
	'For GridBoundColumns
	Dim txtbxNom As TextBox = DirectCast(editItem("NOM").Controls(0), TextBox)
	txtbxNom.Width = 250
	Dim txtbxAdresse As TextBox = DirectCast(editItem("ADRESSE").Controls(0), TextBox)
	txtbxAdresse.Width = 325
	Dim txtbxVille As TextBox = DirectCast(editItem("VILLE").Controls(0), TextBox)
	txtbxVille.Width = 250
	Dim txtbxCourriel As TextBox = DirectCast(editItem("COURRIEL").Controls(0), TextBox)
	txtbxCourriel.Width = 325
	End If
	End Sub
	Private Sub RadGrid_BanqueCV_UpdateCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_BanqueCV.UpdateCommand
	Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
	Dim item As GridEditFormItem
	item = CType(e.Item, GridEditFormItem)
	If "MTVBanqueCv".Equals(e.Item.OwnerTableView.Name) Then
	Dim codePermanent As TextBox = DirectCast(item("CODE_PERMANENT").Controls(0), TextBox)
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Modifier un usager", Session("sDemandeur") & " a modifié l''usager " & codePermanent.Text)
	End If
	End Sub
	'Private Sub RadGrid_Offre_Programme_DataBound(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadGrid_Offre_Programme.DataBound
	'    Dim grid As RadGrid = TryCast(sender, RadGrid)
	'    Dim gridItems As Integer = grid.MasterTableView.Items.Count
	'    If gridItems < 6 Then
	'        grid.Height = 250
	'    Else
	'        grid.Height = 250 + (gridItems * 30)
	'    End If
	'    If grid.Height.Value > 650 Then
	'        grid.Height = 650
	'    End If
	'End Sub
	Private Sub RadGrid_Offre_Programme_DeleteCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_Offre_Programme.DeleteCommand
	Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
	Dim masterPrKey As String
	Dim detailPrKey As Integer
	Dim strsqlprogramme As String
	Dim cmdProgramme As SqlCommand
	Dim myDAProgramme As New SqlDataAdapter
	Dim dsProgramme As New DataSet
	If (e.Item.OwnerTableView.Name = "MTVOffreProgramme") Then
	detailPrKey = CType(e.Item.OwnerTableView.DataKeyValues(e.Item.ItemIndex)("NO_PROGRAMME"), Integer)
	masterPrKey = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NO_OFFRE").ToString()
	Me.SqlDSOffreProgrammeDomaine.DeleteParameters("NO_OFFRE").DefaultValue = masterPrKey
	Me.SqlDSOffreProgrammeDomaine.DeleteParameters("NO_PROGRAMME").DefaultValue = detailPrKey
	strsqlprogramme = "SELECT * FROM T_PROGRAMME WHERE NO_PROGRAMME = " & detailPrKey
	cmdProgramme = New SqlCommand(strsqlprogramme, Conn)
	myDAProgramme = New SqlDataAdapter(cmdProgramme)
	Conn.Open()
	myDAProgramme.Fill(dsProgramme)
	Conn.Close()
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Supprimer un programme à une offre", Session("sDemandeur") & " a supprimé le programme " & dsProgramme.Tables(0).Rows(0).Item("NOM") & " à l'offre " & masterPrKey)
	ElseIf (e.Item.OwnerTableView.Name = "GTVOffre") Then
	masterPrKey = CType(e.Item.OwnerTableView.DataKeyValues(e.Item.ItemIndex)("NO_OFFRE"), Integer)
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Supprimer une offre", Session("sDemandeur") & " a supprimé l'offre " & masterPrKey)
	End If
	End Sub
	Private Sub RadGrid_Offre_Programme_InsertCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_Offre_Programme.InsertCommand
	Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
	Dim item As GridEditFormItem
	item = CType(e.Item, GridEditFormItem)
	If "MTVOffreProgramme".Equals(e.Item.OwnerTableView.Name) Then
	Dim strsqlprogramme As String
	Dim cmdProgramme As SqlCommand
	Dim myDAProgramme As New SqlDataAdapter
	Dim strsqlprogrammeSelect As String
	Dim cmdProgrammeSelect As SqlCommand
	Dim myDAProgrammeSelect As New SqlDataAdapter
	Dim dsProgrammeSelect As New DataSet
	Dim dsProgramme2 As New DataSet
	Dim nomprogramme As String
	Dim nomprogramme1 As String
	Dim nooffre As Integer = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NO_OFFRE").ToString()
	Dim cbProgramme As RadComboBox = DirectCast(item("NO_PROGRAMME").Controls(0), RadComboBox)
	Me.SqlDSOffreProgrammeDomaine.InsertParameters("NO_OFFRE").DefaultValue = nooffre
	Me.SqlDSOffreProgrammeDomaine.InsertParameters("NO_PROGRAMME").DefaultValue = cbProgramme.SelectedValue
	strsqlprogrammeSelect = "SELECT EXIGENCES FROM T_OFFRE WHERE NO_OFFRE=" & nooffre
	cmdProgrammeSelect = New SqlCommand(strsqlprogrammeSelect, Conn)
	myDAProgrammeSelect = New SqlDataAdapter(cmdProgrammeSelect)
	Conn.Open()
	myDAProgrammeSelect.Fill(dsProgrammeSelect)
	Conn.Close()
	NO_OFFRE_PROGRAMME_INSERT = nooffre
	NO_PROGRAMME_OFFRE_INSERT = cbProgramme.SelectedValue
	nomprogramme = cbProgramme.Text
	nomprogramme1 = Replace(nomprogramme, "'", "''")
	If dsProgrammeSelect.Tables(0).Rows(0).Item("EXIGENCES") Is DBNull.Value Then
	strsqlprogramme = "UPDATE [T_OFFRE] SET [EXIGENCES] ='" & nomprogramme1 & "' WHERE NO_OFFRE=" & nooffre
	Else
	strsqlprogramme = "UPDATE [T_OFFRE] SET [EXIGENCES] = EXIGENCES + '<br>' + '" & nomprogramme1 & "' WHERE NO_OFFRE=" & nooffre
	End If
	cmdProgramme = New SqlCommand(strsqlprogramme, Conn)
	myDAProgramme = New SqlDataAdapter(cmdProgramme)
	Conn.Open()
	myDAProgramme.Fill(dsProgramme2)
	Conn.Close()
	ElseIf "GTVOffre".Equals(e.Item.OwnerTableView.Name) Then
	Dim noEntreprise As Integer = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NO_ENTREPRISE").ToString()
	Me.SqlDSOffre.InsertParameters("NO_ENTREPRISE").DefaultValue = noEntreprise
	Dim DatePickDateDebut As RadDatePicker = DirectCast(item("TemplateColumnDateDebut").FindControl("DPicker_DATE_DEBUT"), RadDatePicker)
	If Not (DatePickDateDebut.SelectedDate Is Nothing) Then
	Me.SqlDSOffre.InsertParameters("DATE_DEBUT").DefaultValue = DatePickDateDebut.SelectedDate
	End If
	Dim DatePickDateFin As RadDatePicker = DirectCast(item("TemplateColumnDateFin").FindControl("DPicker_DATE_FIN"), RadDatePicker)
	If Not (DatePickDateFin.SelectedDate Is Nothing) Then
	Me.SqlDSOffre.InsertParameters("DATE_FIN").DefaultValue = DatePickDateFin.SelectedDate
	End If
	Dim DatePickDateDebutEmploi As RadDatePicker = DirectCast(item("TemplateColumnDateDebutEmploi").FindControl("DPicker_DATE_DEBUT_EMPLOI"), RadDatePicker)
	If Not (DatePickDateDebutEmploi.SelectedDate Is Nothing) Then
	Me.SqlDSOffre.InsertParameters("DATE_DEBUT_EMPLOI").DefaultValue = DatePickDateDebutEmploi.SelectedDate
	End If
	'fonctionsvbs.LogInsert(Session("sDemandeur"), "Ajouter un programme à une offre", Session("sDemandeur") & " a ajouté le programme " & cbProgramme.Text & " à l'offre" & nooffre)
	End If
	End Sub
	Private Sub BtnCourriel_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles BtnCourriel.Click
	Dim strsqlcourriel As String
	Dim strsqlProgramme As String
	Dim strsqlPostulant As String
	Dim cmdcourriel As New SqlCommand
	Dim myDAcourriel As New SqlDataAdapter
	Dim dscourriel As New DataSet
	Dim cmdProgramme As New SqlCommand
	Dim myDAProgramme As New SqlDataAdapter
	Dim dsProgramme As New DataSet
	Dim cmdPostulant As New SqlCommand
	Dim myDAPostulant As New SqlDataAdapter
	Dim dsPostulant As New DataSet
	Dim tempNoOffre As Integer
	Dim tempNoProgramme As Integer
	Dim intcpt As Integer
	Dim intcpt2 As Integer
	Dim strCourriel As String
	Dim Diplome As String
	Dim RecevoirOffre As String
	Dim sCodePermanent As String
	intcpt = 0
	intcpt2 = 0
	For Each item As GridDataItem In RadGrid_Offre_Programme.SelectedItems
	tempNoOffre = item("NO_OFFRE").Text
	strsqlProgramme = "SELECT * FROM T_OFFRE_PROGRAMME WHERE T_OFFRE_PROGRAMME.NO_OFFRE = " & tempNoOffre
	cmdProgramme = New SqlCommand(strsqlProgramme, Conn)
	myDAProgramme = New SqlDataAdapter(cmdProgramme)
	Conn.Open()
	myDAProgramme.Fill(dsProgramme)
	Conn.Close()
	While dsProgramme.Tables(0).Rows.Count > intcpt
	tempNoProgramme = dsProgramme.Tables(0).Rows(intcpt).Item("NO_PROGRAMME")
	strsqlPostulant = "SELECT T_USAGER.DIPLOME, T_USAGER.RECEVOIR_NOUVELLE_OFFRE, T_USAGER_PROGRAMME.CODE_PERMANENT, T_USAGER_PROGRAMME.NO_PROGRAMME, T_USAGER.COURRIEL FROM T_USAGER INNER JOIN T_USAGER_PROGRAMME ON T_USAGER.CODE_PERMANENT = T_USAGER_PROGRAMME.CODE_PERMANENT WHERE T_USAGER.RECEVOIR_NOUVELLE_OFFRE=1 AND T_USAGER_PROGRAMME.NO_PROGRAMME = " & tempNoProgramme
	cmdPostulant = New SqlCommand(strsqlPostulant, Conn)
	myDAPostulant = New SqlDataAdapter(cmdPostulant)
	Conn.Open()
	myDAPostulant.Fill(dsPostulant)
	Conn.Close()
	While dsPostulant.Tables(0).Rows.Count > intcpt2
	Diplome = dsPostulant.Tables(0).Rows(intcpt2).Item("DIPLOME")
	strCourriel = dsPostulant.Tables(0).Rows(intcpt2).Item("COURRIEL")
	RecevoirOffre = dsPostulant.Tables(0).Rows(intcpt2).Item("RECEVOIR_NOUVELLE_OFFRE")
	scodepermanent = dsPostulant.Tables(0).Rows(intcpt2).Item("CODE_PERMANENT")
	If RecevoirOffre = True Then
	If ChkNonDiplome.Checked = False Then
	If Diplome = "True" Then
	EnvoyerCourriel(strCourriel, tempNoOffre, sCodePermanent)
	End If
	Else
	EnvoyerCourriel(strCourriel, tempNoOffre, sCodePermanent)
	End If
	intcpt2 = intcpt2 + 1
	End If
	End While
	intcpt = intcpt + 1
	End While
	strsqlcourriel = "UPDATE [T_OFFRE] SET [COURRIEL_ENVOYE] = 1 WHERE NO_OFFRE=" & tempNoOffre
	cmdcourriel = New SqlCommand(strsqlcourriel, Conn)
	myDAcourriel = New SqlDataAdapter(cmdcourriel)
	Conn.Open()
	myDAcourriel.Fill(dscourriel)
	Conn.Close()
	Me.RadGrid_Offre_Programme.Rebind()
	Next
	End Sub
	Protected Sub EnvoyerCourriel(ByVal scourriel As String, ByVal tempnooffre As Integer, ByVal sCodePermanent As String)
	Dim emailsujet As String
	Dim emailMessage As String
	Dim strsqlOffre As String
	Dim cmdOffre As New SqlCommand
	Dim myDAOffre As New SqlDataAdapter
	Dim dsOffre As New DataSet
	strsqlOffre = "SELECT * FROM T_OFFRE WHERE NO_OFFRE = " & tempnooffre
	cmdOffre = New SqlCommand(strsqlOffre, Conn)
	myDAOffre = New SqlDataAdapter(cmdOffre)
	Conn.Open()
	myDAOffre.Fill(dsOffre)
	Conn.Close()
	'Dim cliquerici As String
	'cliquerici = "Est-ce que vous avez déjà trouvé un emploi grâce à notre site de placement? Si oui, veuillez cliquer <a href='http://www.csbe.qc.ca/csbe/applications/servicedeplacement/FEN_TROUVER_EMPLOI.aspx?sCode='"
	emailsujet = "Nouvelle Offre"
	emailMessage = "Bonjour, <br>    Une nouvelle offre correspondant à votre profil à été ajoutée." & _
	"<br><br><b>Numéro de l'offre:</b>" & tempnooffre & _
	"<br><br><b>Titre du poste:</b> " & dsOffre.Tables(0).Rows(0).Item("TITRE_OFFRE") & _
	"<br><br><b>Tâches:</b> " & dsOffre.Tables(0).Rows(0).Item("TACHES_RELIEES") & _
	"<br><br><b>Description complémentaire:</b> " & dsOffre.Tables(0).Rows(0).Item("DESCRIPTION_COMPLEMENTAIRE") & _
	"<br><br><b>Exigences:</b> " & dsOffre.Tables(0).Rows(0).Item("EXIGENCES") & _
	"<br><br><b>Aptitudes:</b> " & dsOffre.Tables(0).Rows(0).Item("APTITUDES") & _
	"<br><br><b>Type d'emploi:</b> " & dsOffre.Tables(0).Rows(0).Item("TYPE_EMPLOI") & _
	"<br><br><b>Salaire:</b> " & dsOffre.Tables(0).Rows(0).Item("SALAIRE_OFFERT") & _
	"<br><br><b>Nombre d'heures par semaine:</b> " & dsOffre.Tables(0).Rows(0).Item("NB_HEURE_SEMAINE") & _
	"<br><br><b>Date de début d'emploi:</b> " & dsOffre.Tables(0).Rows(0).Item("DATE_DEBUT_EMPLOI") & _
	"<br><br><b>Date de début d'affichage:</b> " & dsOffre.Tables(0).Rows(0).Item("DATE_DEBUT") & _
	"<br><br><b>Date de fin d'affichage:</b> " & dsOffre.Tables(0).Rows(0).Item("DATE_FIN") & _
	"<br><br>Est-ce que vous avez déjà trouvé un emploi grâce à notre site de placement? Si oui, veuillez cliquer <a href='http://www.csbe.qc.ca/csbe/applications/servicedeplacement/FEN_TROUVER_EMPLOI.aspx?sCode=" & sCodePermanent & "'>ici</a>."
	Dim Mail As New Net.Mail.MailMessage(emailAdmin, scourriel, emailsujet, emailMessage)
	Dim MailSender As New Net.Mail.SmtpClient("mail.csbe.qc.ca", 25)
	Mail.IsBodyHtml = True
	MailSender.Send(Mail)
	fonctionsvbs.LogInsert("Le Site", "Envoyer courriel", Session("sDemandeur") & " a envoyé une offre par courriel à " & scourriel)
	End Sub
	Private Sub SQLDSDomaine_Deleted(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.SqlDataSourceStatusEventArgs) Handles SQLDSDomaine.Deleted
	End Sub
	Private Sub RadGrid_Offre_Programme_ItemCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_Offre_Programme.ItemCommand
	Dim item As GridDataItem
	Dim NoOffre As String
	Dim lien As String
	If e.CommandName = "ImprimerOffre" Then
	item = CType(e.Item, GridDataItem)
	NoOffre = item("NO_OFFRE").Text
	lien = "FEN_IMPRIMER_OFFRE.aspx?NoOffre=" & NoOffre
	Response.Redirect(lien)
	End If
	End Sub
	Public Sub RadGrid_Offre_Programme_ItemDataBound(ByVal sender As Object, ByVal e As Telerik.Web.UI.GridItemEventArgs) Handles RadGrid_Offre_Programme.ItemDataBound
	If (TypeOf e.Item Is GridEditFormInsertItem) AndAlso (e.Item.OwnerTableView.IsItemInserted = True) AndAlso (e.Item.OwnerTableView.Name = "GTVOffre") Then
	Dim insertItem As GridEditFormInsertItem = DirectCast(e.Item, GridEditFormInsertItem)
	Dim chkbx As CheckBox = DirectCast(insertItem("COURRIEL_ENVOYE").Controls(0), CheckBox)
	insertItem("COURRIEL_ENVOYE").Parent.Visible = False
	chkbx.Style.Add("display", "none")
	'Dim editItem As GridEditableItem = DirectCast(e.Item, GridEditableItem)
	Dim txtbxTitreOffre As TextBox = DirectCast(insertItem("TITRE_OFFRE").Controls(0), TextBox)
	txtbxTitreOffre.Width = 250
	Dim txtbxTachesReliees As TextBox = DirectCast(insertItem("TACHES_RELIEES").Controls(0), TextBox)
	txtbxTachesReliees.Width = 325
	txtbxTachesReliees.TextMode = TextBoxMode.MultiLine
	txtbxTachesReliees.MaxLength = 255
	Dim txtbxDescriptionComplementaire As TextBox = DirectCast(insertItem("DESCRIPTION_COMPLEMENTAIRE").Controls(0), TextBox)
	txtbxDescriptionComplementaire.Width = 325
	txtbxDescriptionComplementaire.TextMode = TextBoxMode.MultiLine
	Dim txtbxCompetences As TextBox = DirectCast(insertItem("COMPETENCES").Controls(0), TextBox)
	txtbxCompetences.Width = 325
	txtbxCompetences.TextMode = TextBoxMode.MultiLine
	Dim txtbxExigences As TextBox = DirectCast(insertItem("EXIGENCES").Controls(0), TextBox)
	txtbxExigences.Width = 325
	txtbxExigences.TextMode = TextBoxMode.MultiLine
	Dim txtbxAptitudes As TextBox = DirectCast(insertItem("APTITUDES").Controls(0), TextBox)
	txtbxAptitudes.Width = 325
	txtbxAptitudes.TextMode = TextBoxMode.MultiLine
	Dim txtbxTypeEmploi As TextBox = DirectCast(insertItem("TYPE_EMPLOI").Controls(0), TextBox)
	txtbxTypeEmploi.Width = 325
	Dim txtbxNbHeureSemaine As TextBox = DirectCast(insertItem("NB_HEURE_SEMAINE").Controls(0), TextBox)
	txtbxNbHeureSemaine.Width = 325
	Dim txtbxRespNom As TextBox = DirectCast(insertItem("RESP_NOM").Controls(0), TextBox)
	txtbxNbHeureSemaine.Width = 250
	Dim txtbxRespPrenom As TextBox = DirectCast(insertItem("RESP_PRENOM").Controls(0), TextBox)
	txtbxNbHeureSemaine.Width = 250
	Dim txtbxRespCourriel As TextBox = DirectCast(insertItem("RESP_COURRIEL").Controls(0), TextBox)
	txtbxRespCourriel.Width = 250
	Dim txtbxDemandeur As TextBox = DirectCast(insertItem("DEMANDEUR").Controls(0), TextBox)
	txtbxDemandeur.Width = 325
	Dim txtbxSalaireOffert As TextBox = DirectCast(insertItem("SALAIRE_OFFERT").Controls(0), TextBox)
	txtbxSalaireOffert.Width = 325
	End If
	If (TypeOf e.Item Is GridEditableItem AndAlso e.Item.IsInEditMode) And (e.Item.OwnerTableView.Name = "GTVOffre") Then
	Dim editItem As GridEditableItem = DirectCast(e.Item, GridEditableItem)
	Dim txtbxTitreOffre As TextBox = DirectCast(editItem("TITRE_OFFRE").Controls(0), TextBox)
	txtbxTitreOffre.Width = 250
	Dim txtbxTachesReliees As TextBox = DirectCast(editItem("TACHES_RELIEES").Controls(0), TextBox)
	txtbxTachesReliees.Width = 325
	txtbxTachesReliees.TextMode = TextBoxMode.MultiLine
	txtbxTachesReliees.MaxLength = 255
	Dim txtbxDescriptionComplementaire As TextBox = DirectCast(editItem("DESCRIPTION_COMPLEMENTAIRE").Controls(0), TextBox)
	txtbxDescriptionComplementaire.Width = 325
	txtbxDescriptionComplementaire.TextMode = TextBoxMode.MultiLine
	Dim txtbxCompetences As TextBox = DirectCast(editItem("COMPETENCES").Controls(0), TextBox)
	txtbxCompetences.Width = 325
	txtbxCompetences.TextMode = TextBoxMode.MultiLine
	Dim txtbxExigences As TextBox = DirectCast(editItem("EXIGENCES").Controls(0), TextBox)
	txtbxExigences.Width = 325
	txtbxExigences.TextMode = TextBoxMode.MultiLine
	Dim txtbxAptitudes As TextBox = DirectCast(editItem("APTITUDES").Controls(0), TextBox)
	txtbxAptitudes.Width = 325
	txtbxAptitudes.TextMode = TextBoxMode.MultiLine
	Dim txtbxTypeEmploi As TextBox = DirectCast(editItem("TYPE_EMPLOI").Controls(0), TextBox)
	txtbxTypeEmploi.Width = 325
	Dim txtbxNbHeureSemaine As TextBox = DirectCast(editItem("NB_HEURE_SEMAINE").Controls(0), TextBox)
	txtbxNbHeureSemaine.Width = 325
	Dim txtbxRespNom As TextBox = DirectCast(editItem("RESP_NOM").Controls(0), TextBox)
	txtbxNbHeureSemaine.Width = 250
	Dim txtbxRespPrenom As TextBox = DirectCast(editItem("RESP_PRENOM").Controls(0), TextBox)
	txtbxNbHeureSemaine.Width = 250
	Dim txtbxRespCourriel As TextBox = DirectCast(editItem("RESP_COURRIEL").Controls(0), TextBox)
	txtbxRespCourriel.Width = 250
	Dim txtbxDemandeur As TextBox = DirectCast(editItem("DEMANDEUR").Controls(0), TextBox)
	txtbxDemandeur.Width = 325
	Dim txtbxSalaireOffert As TextBox = DirectCast(editItem("SALAIRE_OFFERT").Controls(0), TextBox)
	txtbxSalaireOffert.Width = 325
	End If
	End Sub
	Private Sub RadGrid_Offre_Programme_ItemInserted(ByVal source As Object, ByVal e As Telerik.Web.UI.GridInsertedEventArgs) Handles RadGrid_Offre_Programme.ItemInserted
	Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
	Dim strsqlProgramme As String
	Dim cmdProgramme As SqlCommand
	Dim myDAProgramme As SqlDataAdapter
	Dim dsProgramme As New DataSet
	Dim strsqlOffre As String
	Dim cmdOffre As SqlCommand
	Dim myDAOffre As SqlDataAdapter
	Dim dsOffre As New DataSet
	Dim tempnomEntreprise As String
	If "MTVOffreProgramme".Equals(e.Item.OwnerTableView.Name) Then
	strsqlProgramme = "SELECT * FROM T_PROGRAMME WHERE NO_PROGRAMME = " & NO_PROGRAMME_OFFRE_INSERT
	cmdProgramme = New SqlCommand(strsqlProgramme, Conn)
	myDAProgramme = New SqlDataAdapter(cmdProgramme)
	Conn.Open()
	myDAProgramme.Fill(dsProgramme)
	Conn.Close()
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Ajouter un programme à une offre", Session("sDemandeur") & " a ajouté le programme " & dsProgramme.Tables(0).Rows(0).Item("NOM") & " à l'offre no " & NO_OFFRE_PROGRAMME_INSERT)
	ElseIf "GTVOffre".Equals(e.Item.OwnerTableView.Name) Then
	strsqlOffre = "SELECT * FROM T_OFFRE ORDER BY NO_OFFRE DESC"
	cmdOffre = New SqlCommand(strsqlOffre, Conn)
	myDAOffre = New SqlDataAdapter(cmdOffre)
	Conn.Open()
	myDAOffre.Fill(dsOffre)
	Conn.Close()
	tempnomEntreprise = fonctionsvbs.TrouveNomEntreprise("NoOffre", dsOffre.Tables(0).Rows(0).Item("NO_OFFRE"))
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Ajouter une offre", Session("sDemandeur") & " a ajouté l'offre " & dsOffre.Tables(0).Rows(0).Item("NO_OFFRE"))
	End If
	Me.RadGrid_Offre_Programme.Rebind()
	End Sub
	Private Sub RadGrid_Offre_Programme_UpdateCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_Offre_Programme.UpdateCommand
	If "GTVOffre".Equals(e.Item.OwnerTableView.Name) Then
	Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
	Dim noEntreprise As Integer = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NO_ENTREPRISE").ToString()
	Dim item As GridEditFormItem
	item = CType(e.Item, GridEditFormItem)
	Dim Nooffre As TextBox = DirectCast(item("NO_OFFRE").Controls(0), TextBox)
	Me.SqlDSOffre.UpdateParameters("NO_ENTREPRISE").DefaultValue = noEntreprise
	Dim DatePickDateDebut As RadDatePicker = DirectCast(item("TemplateColumnDateDebut").FindControl("DPicker_DATE_DEBUT"), RadDatePicker)
	If Not (DatePickDateDebut.SelectedDate Is Nothing) Then
	Me.SqlDSOffre.UpdateParameters("DATE_DEBUT").DefaultValue = DatePickDateDebut.SelectedDate
	End If
	Dim DatePickDateFin As RadDatePicker = DirectCast(item("TemplateColumnDateFin").FindControl("DPicker_DATE_FIN"), RadDatePicker)
	If Not (DatePickDateFin.SelectedDate Is Nothing) Then
	Me.SqlDSOffre.UpdateParameters("DATE_FIN").DefaultValue = DatePickDateFin.SelectedDate
	End If
	Dim DatePickDateDebutEmploi As RadDatePicker = DirectCast(item("TemplateColumnDateDebutEmploi").FindControl("DPicker_DATE_DEBUT_EMPLOI"), RadDatePicker)
	If Not (DatePickDateDebutEmploi.SelectedDate Is Nothing) Then
	Me.SqlDSOffre.UpdateParameters("DATE_DEBUT_EMPLOI").DefaultValue = DatePickDateDebutEmploi.SelectedDate
	End If
	fonctionsvbs.LogInsert(Session("sDemandeur"), "Modifier un offre", Session("sDemandeur") & " a modifier l'offre no " & Nooffre.Text)
	End If
	End Sub
	Private Sub RadGrid_Log_DataBound(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadGrid_Log.DataBound
	'   Dim grid As RadGrid = TryCast(sender, RadGrid)
	'    Dim gridItems As Integer = grid.MasterTableView.Items.Count
	'    If gridItems < 12 Then
	'        grid.Height = 250
	'    Else
	'        grid.Height = 250 + (gridItems * 20)
	'    End If
	'    If grid.Height.Value > 650 Then
	'        grid.Height = 650
	'    End If
	End Sub
	Protected Sub RadGrid2_NeedDataSource(ByVal source As Object, ByVal e As Telerik.Web.UI.GridNeedDataSourceEventArgs)
	If Not IsPostBack Then
	dt = AddRow(dt)
	' call the method to create row
	ViewState("dt") = dt
	End If
	dt = DirectCast(ViewState("dt"), DataTable)
	RadGrid2.DataSource = dt
	End Sub
	Private Function AddRow(ByVal dt As DataTable) As DataTable
	' method to create row
	Dim dr As DataRow = dt.NewRow()
	dr("RowNumber") = ""
	dt.Rows.Add(dr)
	Return dt
	End Function
	Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
	Dim countitem As Integer
	Dim dt As DataTable = DirectCast(ViewState("dt"), DataTable)
	countitem = RadGrid2.Items.Count
	Dim cpt As Integer = 0
	For Each Item As GridDataItem In RadGrid2.Items
	Dim txtcode As TextBox = DirectCast(Item("CodePermanent").FindControl("TxtCodePermanent"), TextBox)
	If Not (txtcode.Text Is Nothing) And txtcode.Text <> "" Then
	liste.Add(txtcode.Text)
	End If
	Next
	ViewState("dt") = AddRow(dt)
	listcount = liste.Count
	RadGrid2.Rebind()
	While cpt < listcount
	Dim txtcode As TextBox = DirectCast(RadGrid2.Items(cpt)("CodePermanent").FindControl("TxtCodePermanent"), TextBox)
	txtcode.Text = liste.Item(cpt)
	cpt = cpt + 1
	End While
	End Sub
	Public Sub RadGrid2_ItemCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid2.ItemCommand
	If e.CommandName = "UpdateChanges" Then
	For Each Item As GridDataItem In RadGrid2.Items
	Dim txtcode As TextBox = DirectCast(Item("CodePermanent").FindControl("TxtCodePermanent"), TextBox)
	If Not (txtcode.Text Is Nothing) Then
	ImporterEtudiants(txtcode.Text)
	End If
	Next
	End If
	End Sub
	Public Function ImporterEtudiants(ByVal sCodePerm As String) As Boolean
	Dim strSQLIdent As String
	Dim cmdIdent As New SqlCommand
	Dim myDAIdent As New SqlDataAdapter
	Dim dsIdent As New DataSet
	Dim strSQLIdentValide As String
	Dim cmdIdentValide As New SqlCommand
	Dim myDAIdentValide As New SqlDataAdapter
	Dim dsIdentValide As New DataSet
	Dim strSQLIdentInsert As String
	Dim cmdIdentInsert As New SqlCommand
	Dim myDAIdentInsert As New SqlDataAdapter
	Dim dsIdentInsert As New DataSet
	Dim DatedeNaissance As Date
	strSQLIdentValide = "SELECT * FROM T_USAGER WHERE CODE_PERMANENT ='" & sCodePerm & "'"
	cmdIdentValide = New SqlCommand(strSQLIdentValide, Conn)
	myDAIdentValide = New SqlDataAdapter(cmdIdentValide)
	Conn.Open()
	myDAIdentValide.Fill(dsIdentValide)
	Conn.Close()
	If dsIdentValide.Tables(0).Rows.Count > 0 Then 'L'usager existe déjà dans la table T_USAGER
	Return True
	Else
	strSQLIdent = "SELECT E_Ele.Fiche,CodePerm,DateNaiss,Nom,Pnom,NoCiv,Rue,Ville,CodePost,IndReg,Tel " & _
	"FROM E_Ele " & _
	"INNER JOIN E_Adr " & _
	"ON E_Ele.Fiche = E_Adr.Fiche " & _
	"INNER JOIN E_Freq ON E_Ele.Fiche = E_Freq.Fiche " & _
	"GROUP BY E_Ele.Fiche, E_Ele.CodePerm, E_Ele.DateNaiss, E_Ele.Nom, E_Ele.Pnom, E_Adr.NoCiv, E_Adr.Rue, E_Adr.Ville, E_Adr.CodePost, E_Adr.IndReg, E_Adr.Tel, E_Adr.DateFin, E_Adr.EnvoiMeq " & _
	"HAVING (((Max(E_Freq.DateFin))>'2008-01-01') AND ((E_Adr.DateFin)='') AND ((E_Adr.EnvoiMeq)='1')) AND CodePerm='" & sCodePerm & "'"
	cmdIdent = New SqlCommand(strSQLIdent, ConnJadeAdulte)
	myDAIdent = New SqlDataAdapter(cmdIdent)
	ConnJadeAdulte.Open()
	myDAIdent.Fill(dsIdent)
	ConnJadeAdulte.Close()
	If dsIdent.Tables(0).Rows.Count > 0 Then
	DatedeNaissance = Left(dsIdent.Tables(0).Rows(0).Item("DateNaiss"), 4) & "-" & Mid(dsIdent.Tables(0).Rows(0).Item("DateNaiss"), 5, 2) & "-" & Right(dsIdent.Tables(0).Rows(0).Item("DateNaiss"), 2)
	strSQLIdentInsert = "INSERT INTO T_USAGER (CODE_PERMANENT,MOT_PASSE,PRENOM,NOM,ADRESSE,VILLE,CODE_POSTAL,NO_TEL,COURRIEL,DATE_NAISSANCE,LETTRE_CONSENTEMENT,RECEVOIR_NOUVELLE_OFFRE,DIPLOME, PREMIERE_FOIS) " & _
	"VALUES ('" & sCodePerm & "'," & dsIdent.Tables(0).Rows(0).Item("DateNaiss") & ",'" & Trim(dsIdent.Tables(0).Rows(0).Item("Pnom")) & "', '" & Trim(dsIdent.Tables(0).Rows(0).Item("Nom")) & "','" & Trim(dsIdent.Tables(0).Rows(0).Item("NoCiv")) & " " & Trim(dsIdent.Tables(0).Rows(0).Item("Rue")) & "','" & Trim(dsIdent.Tables(0).Rows(0).Item("Ville")) & "','" & dsIdent.Tables(0).Rows(0).Item("CodePost") & "','" & dsIdent.Tables(0).Rows(0).Item("IndReg") & dsIdent.Tables(0).Rows(0).Item("Tel") & "','','" & DatedeNaissance & "',0,0,0,1)"
	cmdIdentInsert = New SqlCommand(strSQLIdentInsert, Conn)
	myDAIdentInsert = New SqlDataAdapter(cmdIdentInsert)
	Conn.Open()
	myDAIdentInsert.Fill(dsIdentInsert)
	Conn.Close()
	Return True
	Else
	If CodePermInvalide = "" Then
	CodePermInvalide = sCodePerm
	Else
	CodePermInvalide = CodePermInvalide & " <br> " & sCodePerm
	End If
	Return False
	End If
	End If
	'LORSQUE TOUS LES ÉTUDIANTS SERONT PASSER ICI, JE DOIS VÉRIFIER SI CODEPERMINVALIDE EST = À "",
	'SI OUI C'EST OK, SINON JE DOIS LA REDIRIGER VERS UNE PAGE QUI AFFICHE CODEPERMINVALIDE POUR
	'DIRE LESQUEL NONT PAS ÉTÉ AJOUTÉ.
	End Function
	Private Sub RadGrid2_PreRender(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadGrid2.PreRender
	RadGrid2.MasterTableView.RenderColumns(1).Display = False
	RadGrid2.MasterTableView.RenderColumns(3).Display = False
	End Sub
	End Class

	<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="FEN_GESTION.aspx.vb" Inherits="ServiceDePlacement.FEN_GESTION" %>
	<%@ Register assembly="Telerik.Web.UI" namespace="Telerik.Web.UI" tagprefix="telerik" %>
	<%@ Register TagPrefix="header" TagName="a" Src="MenuDebut2.ascx" %>
	<%@ Register TagPrefix="header" TagName="b" Src="MenuFin2.ascx" %>
	<%@ Import Namespace="System.Web.HttpUtility" %>
	<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
	<html xmlns="http://www.w3.org/1999/xhtml" >
	<head runat="server">
	<title>Service de placement FPEA</title>
	<link href="FichierStyle.css" type="text/css" rel="stylesheet"/>
	</head>
	<body>
	<form id="form1" runat="server">
	<header:a ID="A1" runat="server" />
	<div>
	<asp:scriptmanager ID="ScriptManager1" runat="server" ></asp:scriptmanager>
	<%-- ********************************************************************************************** --%>
	<%--   Permet de ne pas reloader la page à chaque fois que l'usager Expand/Collapse les Grid        --%>
	<%-- ********************************************************************************************** --%>
	<telerik:RadAjaxManager ID="RadAjaxManager1" runat="server">
	<AjaxSettings>
	<telerik:AjaxSetting AjaxControlID="RadGrid1">
	<UpdatedControls>
	<telerik:AjaxUpdatedControl ControlID="RadGrid1" LoadingPanelID="RadAjaxLoadingPanel1" />
	<telerik:AjaxUpdatedControl ControlID="RadGrid_Entreprise" LoadingPanelID="RadAjaxLoadingPanel1" />
	<telerik:AjaxUpdatedControl ControlID="RadGrid_Demande" LoadingPanelID="RadAjaxLoadingPanel1" />
	<telerik:AjaxUpdatedControl ControlID="RadGrid_Log" LoadingPanelID="RadAjaxLoadingPanel1" />
	</UpdatedControls>
	</telerik:AjaxSetting>
	<telerik:AjaxSetting AjaxControlID="RadGrid2">
	</telerik:AjaxSetting>
	<telerik:AjaxSetting AjaxControlID="RadGrid_Entreprise">
	<UpdatedControls>
	<telerik:AjaxUpdatedControl ControlID="RadGrid_Offre_Programme"   />
	<telerik:AjaxUpdatedControl ControlID="RadGrid_offre"  />
	</UpdatedControls>
	</telerik:AjaxSetting>
	</AjaxSettings>
	</telerik:RadAjaxManager>
	<telerik:RadAjaxLoadingPanel ID="RadAjaxLoadingPanel1" Runat="server"
	height="16px" width="79px" Transparency="5">
	<asp:Image ID="Image1" runat="server" BorderColor="Black" BorderWidth="1" ImageUrl="~/Images/Loading.JPG" />
	</telerik:RadAjaxLoadingPanel>
	<%-- ********************************************************************************************** --%>
	<%-- ****                      DATASOURCES ONGLET PROGRAMMES                                   **** --%>
	<%-- ********************************************************************************************** --%>
	<asp:SqlDataSource ID="SQLDSDomaine"
	SelectCommand="SELECT T_DOMAINE.NO_DOMAINE, T_DOMAINE.NOM as NOM FROM T_DOMAINE"
	DeleteCommand="DELETE FROM [T_DOMAINE] WHERE [NO_DOMAINE] = ?"
	UpdateCommand="UPDATE [T_DOMAINE] SET [NOM] = ? WHERE NO_DOMAINE=?"
	InsertCommand="INSERT INTO [T_DOMAINE] ([NOM]) VALUES (?)"
	runat="server"
	ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
	ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>">
	<DeleteParameters>
	<asp:Parameter Name="NO_DOMAINE" Type="Int32" />
	</DeleteParameters>
	<UpdateParameters>
	<asp:Parameter Name="NO_DOMAINE" Type="Int32" />
	<asp:Parameter Name="NOM" Type="String" />
	</UpdateParameters>
	<InsertParameters>
	<asp:Parameter Name="NOM" Type="String" />
	</InsertParameters>
	</asp:SqlDataSource>
	<asp:SqlDataSource ID="SqlDSProgramme"
	SelectCommand="SELECT NO_PROGRAMME, NOM, NO_DOMAINE, DESCR FROM T_PROGRAMME WHERE NO_DOMAINE = ?"
	DeleteCommand="DELETE FROM [T_PROGRAMME] WHERE [NO_PROGRAMME] = ?"
	UpdateCommand="UPDATE [T_PROGRAMME] SET [NOM] = ?, [NO_DOMAINE] = ?, [DESCR] = ? WHERE [NO_PROGRAMME] = ?"
	InsertCommand="INSERT INTO [T_PROGRAMME] ([NOM], [NO_DOMAINE], [DESCR]) VALUES (?, ?, ?)"
	runat="server"
	ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
	ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>">
	<SelectParameters>
	<asp:Parameter Name="NO_DOMAINE" Type="Int32" />
	</SelectParameters>
	<DeleteParameters>
	<asp:Parameter Name="NO_PROGRAMME" Type="Int32" />
	</DeleteParameters>
	<UpdateParameters>
	<asp:Parameter Name="NO_PROGRAMME" Type="Int32" />
	<asp:Parameter Name="NOM" Type="String" />
	<asp:Parameter Name="NO_DOMAINE" Type="Int32" />
	<asp:Parameter Name="DESCR" Type="String" />
	</UpdateParameters>
	<InsertParameters>
	<asp:Parameter Name="NOM" Type="String" />
	<asp:Parameter Name="NO_DOMAINE" Type="Int32" />
	<asp:Parameter Name="DESCR" Type="String" />
	</InsertParameters>
	</asp:SqlDataSource>
	<%-- ********************************************************************************************** --%>
	<%-- ****                       DATASOURCES ONGLET ENTREPRISE                                  **** --%>
	<%-- ********************************************************************************************** --%>
	<asp:SqlDataSource ID="SqlDSEntreprise"
	SelectCommand="SELECT NO_ENTREPRISE,NOM_ENTREPRISE, DESCR, ADRESSE, VILLE, CODE_POSTAL, NO_TEL,NO_CELL,NO_TEL_AUTRE NO_FAX, RESP_COURRIEL, RESP_NOM, RESP_PRENOM,USAGER,MOT_PASSE,SITE_WEB,AUTONOME_OFFRE FROM T_ENTREPRISE"
	DeleteCommand="DELETE FROM [T_ENTREPRISE] WHERE [NO_ENTREPRISE] = ?"
	UpdateCommand="UPDATE [T_ENTREPRISE] SET [NOM_ENTREPRISE] =?,[DESCR]=?,[ADRESSE]=?,[VILLE]=?,[CODE_POSTAL]=?,[NO_TEL]=?,[NO_CELL]=?,[NO_TEL_AUTRE]=?,[NO_FAX]=?,[RESP_COURRIEL]=?,[RESP_NOM]=?,[RESP_PRENOM]=?,[USAGER]=?,[MOT_PASSE]=?,[SITE_WEB]=?,[AUTONOME_OFFRE]=? WHERE NO_ENTREPRISE=?"
	InsertCommand="INSERT INTO [T_ENTREPRISE] ([NOM_ENTREPRISE],[DESCR],[ADRESSE],[VILLE],[CODE_POSTAL],[NO_TEL],[NO_CELL],[NO_TEL_AUTRE],[NO_FAX],[RESP_COURRIEL],[RESP_NOM],[RESP_PRENOM],[USAGER],[MOT_PASSE],[SITE_WEB],[AUTONOME_OFFRE]) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)"
	runat="server"
	ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
	ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>">
	<DeleteParameters>
	<asp:Parameter Name="NO_ENTREPRISE" Type="Int32" />
	</DeleteParameters>
	<UpdateParameters>
	<asp:Parameter Name="NO_ENTREPRISE" Type="Int32" />
	<asp:Parameter Name="NOM_ENTREPRISE" Type="String" />
	<asp:Parameter Name="DESCR" Type="String" />
	<asp:Parameter Name="ADRESSE" Type="String" />
	<asp:Parameter Name="VILLE" Type="String" />
	<asp:Parameter Name="CODE_POSTAL" Type="String" />
	<asp:Parameter Name="NO_TEL" Type="String" />
	<asp:Parameter Name="NO_CELL" Type="String" />
	<asp:Parameter Name="NO_TEL_AUTRE" Type="String" />
	<asp:Parameter Name="NO_FAX" Type="String" />
	<asp:Parameter Name="RESP_COURRIEL" Type="String" />
	<asp:Parameter Name="RESP_NOM" Type="String" />
	<asp:Parameter Name="RESP_PRENOM" Type="String" />
	<asp:Parameter Name="USAGER" Type="String" />
	<asp:Parameter Name="MOT_PASSE" Type="String" />
	<asp:Parameter Name="SITE_WEB" Type="String" />
	<asp:Parameter Name="AUTONOME_OFFRE" Type="int32" />
	</UpdateParameters>
	<InsertParameters>
	<asp:Parameter Name="NOM_ENTREPRISE" Type="String" />
	<asp:Parameter Name="DESCR" Type="String" />
	<asp:Parameter Name="ADRESSE" Type="String" />
	<asp:Parameter Name="VILLE" Type="String" />
	<asp:Parameter Name="CODE_POSTAL" Type="String" />
	<asp:Parameter Name="NO_TEL" Type="String" />
	<asp:Parameter Name="NO_CELL" Type="String" />
	<asp:Parameter Name="NO_TEL_AUTRE" Type="String" />
	<asp:Parameter Name="NO_FAX" Type="String" />
	<asp:Parameter Name="RESP_COURRIEL" Type="String" />
	<asp:Parameter Name="RESP_NOM" Type="String" />
	<asp:Parameter Name="RESP_PRENOM" Type="String" />
	<asp:Parameter Name="USAGER" Type="String" />
	<asp:Parameter Name="MOT_PASSE" Type="String" />
	<asp:Parameter Name="SITE_WEB" Type="String" />
	<asp:Parameter Name="AUTONOME_OFFRE" Type="int32" />
	</InsertParameters>
	</asp:SqlDataSource>
	<%-- ********************************************************************************************** --%>
	<%-- ****                        DATASOURCES ONGLET OFFRES PROGRAMME                           **** --%>
	<%-- ********************************************************************************************** --%>
	<asp:SqlDataSource ID="SqlDSOffreProgrammeDomaine"
	SelectCommand="SELECT NO_OFFRE,T_OFFRE_PROGRAMME.NO_PROGRAMME,T_PROGRAMME.NOM AS PNOM, T_DOMAINE.NOM AS DNOM FROM T_OFFRE_PROGRAMME INNER JOIN T_PROGRAMME ON T_OFFRE_PROGRAMME.NO_PROGRAMME = T_PROGRAMME.NO_PROGRAMME INNER JOIN T_DOMAINE ON T_PROGRAMME.NO_DOMAINE = T_DOMAINE.NO_DOMAINE WHERE T_OFFRE_PROGRAMME.NO_OFFRE = ?"
	DeleteCommand="DELETE FROM [T_OFFRE_PROGRAMME] WHERE [NO_OFFRE] = ? AND [NO_PROGRAMME] =?"
	InsertCommand="INSERT INTO [T_OFFRE_PROGRAMME] ([NO_OFFRE],[NO_PROGRAMME]) VALUES (?,?)"
	runat="server"
	ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
	ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>">
	<SelectParameters>
	<asp:Parameter Name="NO_OFFRE" Type="Int32" />
	</SelectParameters>
	<DeleteParameters>
	<asp:Parameter Name="NO_OFFRE" Type="Int32" />
	<asp:Parameter Name="NO_PROGRAMME" Type="Int32" />
	</DeleteParameters>
	<InsertParameters>
	<asp:Parameter Name="NO_OFFRE" Type="Int32" />
	<asp:Parameter Name="NO_PROGRAMME" Type="Int32" />
	</InsertParameters>
	</asp:SqlDataSource>
	<%-- ********************************************************************************************** --%>
	<%-- ****                        DATASOURCES ONGLET OFFRES DEMANDE                             **** --%>
	<%-- ********************************************************************************************** --%>
	<asp:SqlDataSource ID="SqlDSEntrepriseOffre"
	SelectCommand="SELECT NO_ENTREPRISE,NOM_ENTREPRISE, DESCR FROM T_ENTREPRISE"
	runat="server"
	ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
	ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>">
	</asp:SqlDataSource>
	<asp:SqlDataSource ID="SqlDSOffre"
	SelectCommand="SELECT NO_OFFRE,TITRE_OFFRE, NB_POSTE_DISPO,TACHES_RELIEES,DESCRIPTION_COMPLEMENTAIRE,COMPETENCES, EXIGENCES, APTITUDES, TYPE_EMPLOI, NB_HEURE_SEMAINE, RESP_NOM, RESP_PRENOM, RESP_COURRIEL, RESP_NO_TEL, NO_ENTREPRISE, DATE_DEBUT, DATE_FIN, DATE_DEBUT_EMPLOI, DEMANDEUR, STATUS, SALAIRE_OFFERT,COURRIEL_ENVOYE FROM T_OFFRE WHERE NO_ENTREPRISE=?"
	DeleteCommand="DELETE FROM [T_OFFRE] WHERE [NO_OFFRE] = ?"
	UpdateCommand="UPDATE [T_OFFRE] SET [TITRE_OFFRE] = ?,[NB_POSTE_DISPO]=?,[TACHES_RELIEES]=?,[DESCRIPTION_COMPLEMENTAIRE]=?,[COMPETENCES]=?,[EXIGENCES]=?,[APTITUDES]=?,[TYPE_EMPLOI]=?,[NB_HEURE_SEMAINE]=?,[RESP_NOM]=?,[RESP_PRENOM]=?,[RESP_COURRIEL]=?,[RESP_NO_TEL]=?,[NO_ENTREPRISE]=?,[DATE_DEBUT]=?,[DATE_FIN]=?,[DATE_DEBUT_EMPLOI]=?,[DEMANDEUR]=?,[STATUS]=?,[SALAIRE_OFFERT]=?,[COURRIEL_ENVOYE]=? WHERE NO_OFFRE=?"
	InsertCommand="INSERT INTO [T_OFFRE] ([TITRE_OFFRE],[NB_POSTE_DISPO],[TACHES_RELIEES],[DESCRIPTION_COMPLEMENTAIRE],[COMPETENCES],[EXIGENCES],[APTITUDES],[TYPE_EMPLOI],[NB_HEURE_SEMAINE],[RESP_NOM],[RESP_PRENOM],[RESP_COURRIEL],[RESP_NO_TEL],[NO_ENTREPRISE],[DATE_DEBUT],[DATE_FIN],[DATE_DEBUT_EMPLOI],[DEMANDEUR],[STATUS],[SALAIRE_OFFERT],[COURRIEL_ENVOYE]) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)"
	runat="server"
	ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
	ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>">
	<SelectParameters>
	<asp:Parameter Name="NO_ENTREPRISE" Type="Int32" />
	</SelectParameters>
	<DeleteParameters>
	<asp:Parameter Name="NO_OFFRE" Type="Int32" />
	</DeleteParameters>
	<UpdateParameters>
	<asp:Parameter Name="NO_OFFRE" Type="Int32" />
	<asp:Parameter Name="TITRE_OFFRE" Type="String" />
	<asp:Parameter Name="NB_POSTE_DISPO" Type="String" />
	<asp:Parameter Name="TACHES_RELIEES" Type="String" />
	<asp:Parameter Name="DESCRIPTION_COMPLEMENTAIRE" Type="String" />
	<asp:Parameter Name="COMPETENCES" Type="String" />
	<asp:Parameter Name="EXIGENCES" Type="String" />
	<asp:Parameter Name="APTITUDES" Type="String" />
	<asp:Parameter Name="TYPE_EMPLOI" Type="String" />
	<asp:Parameter Name="NB_HEURE_SEMAINE" Type="String" />
	<asp:Parameter Name="RESP_NOM" Type="String" />
	<asp:Parameter Name="RESP_PRENOM" Type="String" />
	<asp:Parameter Name="RESP_COURRIEL" Type="String" />
	<asp:Parameter Name="RESP_NO_TEL" Type="String" />
	<asp:Parameter Name="NO_ENTREPRISE" Type="String" />
	<asp:Parameter Name="DATE_DEBUT" Type="DateTime" />
	<asp:Parameter Name="DATE_FIN" Type="DateTime" />
	<asp:Parameter Name="DATE_DEBUT_EMPLOI" Type="DateTime" />
	<asp:Parameter Name="DEMANDEUR" Type="String" />
	<asp:Parameter Name="STATUS" Type="int32" />
	<asp:Parameter Name="SALAIRE_OFFERT" Type="string" />
	<asp:Parameter Name="COURRIEL_ENVOYE" Type="int32" />
	</UpdateParameters>
	<InsertParameters>
	<asp:Parameter Name="TITRE_OFFRE" Type="String" />
	<asp:Parameter Name="NB_POSTE_DISPO" Type="String" />
	<asp:Parameter Name="TACHES_RELIEES" Type="String" />
	<asp:Parameter Name="DESCRIPTION_COMPLEMENTAIRE" Type="String" />
	<asp:Parameter Name="COMPETENCES" Type="String" />
	<asp:Parameter Name="EXIGENCES" Type="String" />
	<asp:Parameter Name="APTITUDES" Type="String" />
	<asp:Parameter Name="TYPE_EMPLOI" Type="String" />
	<asp:Parameter Name="NB_HEURE_SEMAINE" Type="String" />
	<asp:Parameter Name="RESP_NOM" Type="String" />
	<asp:Parameter Name="RESP_PRENOM" Type="String" />
	<asp:Parameter Name="RESP_COURRIEL" Type="String" />
	<asp:Parameter Name="RESP_NO_TEL" Type="String" />
	<asp:Parameter Name="NO_ENTREPRISE" Type="String" />
	<asp:Parameter Name="DATE_DEBUT" Type="DateTime" />
	<asp:Parameter Name="DATE_FIN" Type="DateTime" />
	<asp:Parameter Name="DATE_DEBUT_EMPLOI" Type="DateTime" />
	<asp:Parameter Name="DEMANDEUR" Type="String" />
	<asp:Parameter Name="STATUS" Type="int32" />
	<asp:Parameter Name="SALAIRE_OFFERT" Type="string" />
	<asp:Parameter Name="COURRIEL_ENVOYE" Type="int32" />
	</InsertParameters>
	</asp:SqlDataSource>
	<asp:SqlDataSource ID="SqlDSPostulant"
	SelectCommand="SELECT NO_DEMANDE,PRENOM,NOM,COURRIEL,LETTRE_CONSENTEMENT,RECEVOIR_NOUVELLE_OFFRE,DIPLOME,T_DEMANDE.CODE_PERMANENT, STATUS, DATE_SOUMISSION, LETTRE_PRESENTATION, NO_OFFRE, T_DEMANDE.NOM_CV FROM T_DEMANDE INNER JOIN T_USAGER ON T_DEMANDE.CODE_PERMANENT=T_USAGER.CODE_PERMANENT WHERE NO_OFFRE = ?"
	DeleteCommand="DELETE FROM [T_DEMANDE] WHERE [NO_DEMANDE] = ?"
	UpdateCommand="UPDATE [T_DEMANDE] SET [STATUS] = 0,[LETTRE_PRESENTATION]=?,[NOM_CV]=? WHERE NO_DEMANDE=?"
	runat="server"
	ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
	ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>">
	<SelectParameters>
	<asp:Parameter Name="NO_OFFRE" Type="Int32" />
	</SelectParameters>
	<DeleteParameters>
	<asp:Parameter Name="NO_DEMANDE" Type="Int32" />
	</DeleteParameters>
	<UpdateParameters>
	<asp:Parameter Name="NO_DEMANDE" Type="Int32" />
	<asp:Parameter Name="STATUS" Type="Int32" />
	<asp:Parameter Name="LETTRE_PRESENTATION" Type="String" />
	<asp:Parameter Name="NOM_CV" Type="String" />
	</UpdateParameters>
	</asp:SqlDataSource>
	<%-- ********************************************************************************************** --%>
	<%-- ****                        DATASOURCES ONGLET BANQUE DE CV                               **** --%>
	<%-- ********************************************************************************************** --%>
	<asp:SqlDataSource ID="SqlDSBanqueCV"
	SelectCommand="SELECT CODE_PERMANENT,PRENOM,NOM,ADRESSE,VILLE,CODE_POSTAL,NO_TEL,COURRIEL,DATE_NAISSANCE,LETTRE_CONSENTEMENT,RECEVOIR_NOUVELLE_OFFRE,DIPLOME,TROUVE_EMPLOI,DATE_TROUVE_EMPLOI FROM T_USAGER"
	DeleteCommand="DELETE FROM [T_USAGER] WHERE [CODE_PERMANENT] = ?"
	UpdateCommand="UPDATE [T_USAGER] SET [PRENOM] = ?,[NOM]=?,[ADRESSE]=?,[VILLE]=?,[CODE_POSTAL]=?,[NO_TEL]=?,[COURRIEL]=?,[DATE_NAISSANCE]=?,[LETTRE_CONSENTEMENT]=?,[RECEVOIR_NOUVELLE_OFFRE]=?,[DIPLOME]=?,TROUVE_EMPLOI=?,DATE_TROUVE_EMPLOI=? WHERE CODE_PERMANENT=?"
	runat="server"
	ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
	ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>">
	<DeleteParameters>
	<asp:Parameter Name="CODE_PERMANENT" Type="String" />
	</DeleteParameters>
	<UpdateParameters>
	<asp:Parameter Name="CODE_PERMANENT" Type="String" />
	<asp:Parameter Name="PRENOM" Type="string" />
	<asp:Parameter Name="NOM" Type="String" />
	<asp:Parameter Name="ADRESSE" Type="String" />
	<asp:Parameter Name="VILLE" Type="String" />
	<asp:Parameter Name="CODE_POSTAL" Type="String" />
	<asp:Parameter Name="NO_TEL" Type="String" />
	<asp:Parameter Name="COURRIEL" Type="String" />
	<asp:Parameter Name="DATE_NAISSANCE" Type="Datetime" />
	<asp:Parameter Name="LETTRE_CONSENTEMENT" Type="int32" />
	<asp:Parameter Name="RECEVOIR_NOUVELLE_OFFRE" Type="int32" />
	<asp:Parameter Name="DIPLOME" Type="Int32" />
	<asp:Parameter Name="TROUVE_EMPLOI" Type="Int32" />
	<asp:Parameter Name="DATE_TROUVE_EMPLOI" Type="Datetime" />
	</UpdateParameters>
	</asp:SqlDataSource>
	<asp:SqlDataSource ID="SqlDSUsagerProgramme"
	SelectCommand="SELECT CODE_PERMANENT,T_USAGER_PROGRAMME.NO_PROGRAMME,T_PROGRAMME.NOM AS PNOM, T_DOMAINE.NOM AS DNOM,DATE_DIPLOME FROM T_USAGER_PROGRAMME INNER JOIN T_PROGRAMME ON T_USAGER_PROGRAMME.NO_PROGRAMME = T_PROGRAMME.NO_PROGRAMME INNER JOIN T_DOMAINE ON T_PROGRAMME.NO_DOMAINE = T_DOMAINE.NO_DOMAINE WHERE T_USAGER_PROGRAMME.CODE_PERMANENT = ?"
	DeleteCommand="DELETE FROM [T_USAGER_PROGRAMME] WHERE [CODE_PERMANENT] = ? AND [NO_PROGRAMME] = ?"
	InsertCommand="INSERT INTO [T_USAGER_PROGRAMME] ([CODE_PERMANENT],[NO_PROGRAMME],[DATE_DIPLOME]) VALUES (?,?,?)"
	runat="server"
	ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
	ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>">
	<SelectParameters>
	<asp:Parameter Name="CODE_PERMANENT" Type="String" />
	</SelectParameters>
	<DeleteParameters>
	<asp:Parameter Name="CODE_PERMANENT" Type="String" />
	<asp:Parameter Name="NO_PROGRAMME" Type="Int32" />
	</DeleteParameters>
	<InsertParameters>
	<asp:Parameter Name="CODE_PERMANENT" Type="String" />
	<asp:Parameter Name="NO_PROGRAMME" Type="Int32" />
	<asp:Parameter Name="DATE_DIPLOME" Type="DateTime" />
	</InsertParameters>
	</asp:SqlDataSource>
	<asp:SqlDataSource ID="SqlDSProgrammeDomaine"
	SelectCommand="SELECT NO_PROGRAMME,T_PROGRAMME.NOM AS PNOM, T_DOMAINE.NO_DOMAINE, T_DOMAINE.NOM AS DNOM FROM T_PROGRAMME INNER JOIN T_DOMAINE ON T_PROGRAMME.NO_DOMAINE = T_DOMAINE.NO_DOMAINE"
	runat="server"
	ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
	ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>">
	</asp:SqlDataSource>
	<asp:SqlDataSource ID="SqlDSLog"
	SelectCommand="SELECT NO_LOG, DATE, NOM_UTILISATEUR, TYPE_ACTION, DESCR FROM T_LOG"
	runat="server"
	ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
	ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>">
	</asp:SqlDataSource>
	<telerik:RadTabStrip ID="RadTabStrip1" runat="server"
	Skin="Vista" MultiPageID="RadMultiPage1" SelectedIndex="0" CssClass="TabStrip">
	<Tabs>
	<telerik:RadTab runat="server"  Text="Programmes">
	</telerik:RadTab>
	<telerik:RadTab runat="server"   Text="Entreprises">
	</telerik:RadTab>
	<telerik:RadTab runat="server"  Text="Programme par offre">
	</telerik:RadTab>
	<telerik:RadTab runat="server"   Text="Demande par offre">
	</telerik:RadTab>
	<telerik:RadTab runat="server"  Text="Liste des utilisateurs">
	</telerik:RadTab>
	<telerik:RadTab runat="server"   Text="Historique de logs">
	</telerik:RadTab>
	<telerik:RadTab runat="server" Text="Statistiques">
	</telerik:RadTab>
	<telerik:RadTab runat="server" Text="Importation de Jade">
	</telerik:RadTab>
	</Tabs>
	</telerik:RadTabStrip>

	<telerik:RadMultiPage ID="RadMultiPage1" runat="server" SelectedIndex="0">
	<telerik:RadPageView ID="RadPageView1"  runat="server">
	<telerik:RadGrid
	ID="RadGrid1"
	runat="server"
	DataSourceID="SQLDSDomaine"
	autogeneratecolumns="False"
	Skin="Office2007"
	GridLines="None"
	AllowAutomaticInserts="True"
	AllowAutomaticUpdates="True"
	AllowAutomaticDeletes="True"
	width="98%"
	Height="95%"
	CommandItemSettings-AddNewRecordText="Ajouter un nouveau domaine"
	EditFormSettings-FormmaintableStyle-HorizontalAlign=Left
	AllowFilteringByColumn=true
	AllowSorting=true>
	<clientsettings>
	<Scrolling AllowScroll=true UseStaticHeaders=false />
	</clientsettings>
	<PagerStyle
	NextPageText="Suivant" PrevPageText="Précédent" Mode="NextPrevAndNumeric"
	NextPagesToolTip="Pages suivante"
	NextPageToolTip="Page suivante"
	PrevPagesToolTip="Pages précédente"
	PrevPageToolTip="Page précédente"/>
	<MasterTableView
	Name="MTVProgramme"
	DataSourceID="SQLDSDomaine"
	NoMasterRecordsText="Il n'y a aucun domaine."
	DataKeyNames="NO_DOMAINE"
	CommandItemDisplay="bottom"
	InsertItemDisplay="Bottom"
	EditFormSettings-EditColumn-CancelText="Annuler"
	EditFormSettings-EditColumn-EditText="Modifier"
	EditFormSettings-EditColumn-InsertText="Ajouter"
	EditFormSettings-EditColumn-UpdateText="Mise à jour"
	CommandItemSettings-AddNewRecordText="Ajouter un domaine"
	CommandItemSettings-RefreshText="Rafraichir"
	EditFormSettings-FormMainTableStyle-HorizontalAlign=Left
	EditFormSettings-FormTableItemStyle-HorizontalAlign=Left
	Width="100%">
	<ExpandCollapseColumn>
	<HeaderStyle Width="20px" />
	</ExpandCollapseColumn>
	<Columns>
	<telerik:GridBoundColumn
	SortExpression="NO_DOMAINE"
	HeaderText="NO_DOMAINE"
	DataField="NO_DOMAINE"
	UniqueName="NO_DOMAINE"
	ReadOnly="true"
	visible="false">
	</telerik:GridBoundColumn>
	<telerik:GridEditCommandColumn
	ButtonType="ImageButton"
	UniqueName="EditCommandColumn">
	</telerik:GridEditCommandColumn>
	<telerik:GridButtonColumn
	ConfirmText="Supprimer ce domaine?"
	ConfirmDialogType="RadWindow"
	ConfirmTitle="Supprimer"
	ButtonType="ImageButton"
	CommandName="Delete"
	Text="Supprimer"
	UniqueName="DeleteColumnDomaine">
	<ItemStyle HorizontalAlign="Center"  />
	</telerik:GridButtonColumn>
	<telerik:GridBoundColumn
	SortExpression="NOM"
	HeaderText="Nom"
	DataField="NOM"
	UniqueName="NOM">
	</telerik:GridBoundColumn>
	</Columns>
	<DetailTables >
	<telerik:GridTableView
	TableLayout="Auto"
	GridLines=Both
	ShowFooter=true
	DataKeyNames="NO_PROGRAMME"
	ShowHeader=true
	DataSourceID="SQLDSProgramme"
	Name="GTVProgramme"
	AllowAutomaticDeletes="true"
	AllowAutomaticInserts=true
	AllowAutomaticUpdates="true"
	CommandItemDisplay="Bottom"
	CommandItemSettings-AddNewRecordText="Ajouter un programme"
	CommandItemSettings-RefreshText="rafraichir"
	EditFormSettings-EditColumn-CancelText="Annuler"
	EditFormSettings-EditColumn-EditText="Modifier"
	EditFormSettings-EditColumn-InsertText="Ajouter"
	EditFormSettings-EditColumn-UpdateText="Mise à jour"
	EditFormSettings-EditColumn-HeaderButtonType="PushButton"
	NoDetailRecordsText="Il n'y a aucun programme pour ce domaine."
	EditMode="EditForms" >
	<ParentTableRelation>
	<telerik:GridRelationFields DetailKeyField="NO_DOMAINE" MasterKeyField="NO_DOMAINE" />
	</ParentTableRelation>
	<Columns>
	<telerik:GridBoundColumn
	SortExpression="NO_PROGRAMME"
	HeaderText="NO_PROGRAMME"
	DataField="NO_PROGRAMME"
	UniqueName="NO_PROGRAMME"
	ReadOnly="true"
	Visible="false">
	</telerik:GridBoundColumn>
	<telerik:GridEditCommandColumn
	ButtonType="ImageButton"
	UniqueName="EditCommandColumnProgramme">
	</telerik:GridEditCommandColumn>
	<telerik:GridButtonColumn
	ConfirmText="Supprimer ce programme?"
	ConfirmDialogType="RadWindow"
	ConfirmTitle="Supprimer"
	ButtonType="ImageButton"
	CommandName="Delete"
	Text="Supprimer"
	UniqueName="DeleteColumnProgramme">
	<ItemStyle HorizontalAlign="Center" />
	</telerik:GridButtonColumn>
	<telerik:GridBoundColumn
	SortExpression="NOM"
	HeaderText="Nom"
	DataField="NOM"
	UniqueName="PNOM">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="DESCR"
	HeaderText="Description"
	DataField="DESCR"
	UniqueName="DESCR">
	</telerik:GridBoundColumn>
	</Columns>
	</telerik:GridTableView>
	</DetailTables>
	</MasterTableView>
	</telerik:RadGrid>
	</telerik:RadPageView>

 

	<telerik:RadPageView ID="RadPageView2" runat="server" >
	<telerik:RadGrid
	ID="RadGrid_Entreprise"
	runat="server"
	DataSourceID="SQLDSEntreprise"
	autogeneratecolumns="False"
	Skin="Office2007"
	AllowAutomaticInserts="True"
	AllowAutomaticUpdates="True"
	AllowAutomaticDeletes="True"
	CommandItemSettings-AddNewRecordText="Ajouter une nouvelle entreprise"
	width="98%"
	Height="95%"
	AllowFilteringByColumn=true
	AllowSorting=true
	OnItemDataBound="RadGrid_Entreprise_ItemDataBound"
	MasterTableView-EditFormSettings-FormTableAlternatingItemStyle-HorizontalAlign=Left
	MasterTableView-EditFormSettings-FormMainTableStyle-HorizontalAlign=left HorizontalAlign=Left>
	<ClientSettings>
	<Scrolling AllowScroll=true UseStaticHeaders=false  />
	</ClientSettings>
	<PagerStyle
	NextPageText="Suivant" PrevPageText="Précédent" Mode="NextPrevAndNumeric"
	NextPagesToolTip="Pages suivante"
	NextPageToolTip="Page suivante"
	PrevPagesToolTip="Pages précédente"
	PrevPageToolTip="Page précédente"/>
	<MasterTableView
	Name="MTVEntreprise"
	EditMode="EditForms"
	DataSourceID="SqlDSEntreprise"
	NoMasterRecordsText="Il n'y a aucune entreprise."
	DataKeyNames="NO_ENTREPRISE"
	CommandItemDisplay="bottom"
	InsertItemDisplay="Bottom"
	EditFormSettings-EditColumn-CancelText="Annuler"
	EditFormSettings-EditColumn-EditText="Modifier"
	EditFormSettings-EditColumn-InsertText="Ajouter"
	EditFormSettings-EditColumn-UpdateText="Mise à jour"
	CommandItemSettings-AddNewRecordText="Ajouter une entreprise"
	CommandItemSettings-RefreshText="Rafraichir"
	Width="100%">
	<ExpandCollapseColumn>
	<HeaderStyle Width="20px" />
	</ExpandCollapseColumn>
	<Columns>
	<telerik:GridBoundColumn
	SortExpression="NO_ENTREPRISE"
	HeaderText="NO_ENTREPRISE"
	DataField="NO_ENTREPRISE"
	UniqueName="NO_ENTREPRISE"
	visible="false"
	readonly="true">
	</telerik:GridBoundColumn>
	<telerik:GridEditCommandColumn
	ButtonType="ImageButton"
	UniqueName="EditCommandColumn">
	</telerik:GridEditCommandColumn>
	<telerik:GridButtonColumn
	ConfirmText="Supprimer cette entreprise?"
	ConfirmDialogType="RadWindow"
	ConfirmTitle="Supprimer"
	ButtonType="ImageButton"
	CommandName="Delete"
	Text="Supprimer"
	UniqueName="DeleteColumnDomaine">
	</telerik:GridButtonColumn>
	<telerik:GridBoundColumn
	SortExpression="NOM_ENTREPRISE"
	HeaderText="Nom"
	DataField="NOM_ENTREPRISE"
	UniqueName="NOM_ENTREPRISE"
	MaxLength="50">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="DESCR"
	HeaderText="Description"
	DataField="DESCR"
	UniqueName="DESCR"
	MaxLength="255">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="ADRESSE"
	HeaderText="Adresse"
	DataField="ADRESSE"
	UniqueName="ADRESSE"
	MaxLength="50">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="VILLE"
	HeaderText="Ville"
	DataField="VILLE"
	UniqueName="VILLE"
	MaxLength="40">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="CODE_POSTAL"
	HeaderText="Code postal"
	DataField="CODE_POSTAL"
	UniqueName="CODE_POSTAL"
	MaxLength="10">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="NO_TEL"
	HeaderText="No tel"
	DataField="NO_TEL"
	UniqueName="NO_TEL"
	MaxLength="25">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="NO_CELL"
	HeaderText="No cell"
	DataField="NO_CELL"
	UniqueName="NO_CELL"
	MaxLength="16">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="NO_TEL_AUTRE"
	HeaderText="No tel (Autre)"
	DataField="NO_TEL_AUTRE"
	UniqueName="NO_TEL_AUTRE"
	MaxLength="25">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="NO_FAX"
	HeaderText="No fax"
	DataField="NO_FAX"
	UniqueName="NO_FAX"
	MaxLength="16"  ItemStyle-HorizontalAlign=Left>
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="RESP_COURRIEL"
	HeaderText="Courriel du responsable"
	DataField="RESP_COURRIEL"
	UniqueName="RESP_COURRIEL"
	MaxLength="65">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="RESP_NOM"
	HeaderText="Nom du responsable"
	DataField="RESP_NOM"
	UniqueName="RESP_NOM"
	MaxLength="40">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="RESP_PRENOM"
	HeaderText="Prénom du responsable"
	DataField="RESP_PRENOM"
	UniqueName="RESP_PRENOM"
	MaxLength="25">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="USAGER"
	HeaderText="Usager"
	DataField="USAGER"
	UniqueName="USAGER"
	MaxLength="25">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="MOT_PASSE"
	HeaderText="Mot de passe"
	DataField="MOT_PASSE"
	UniqueName="MOT_PASSE"
	MaxLength="20" >
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="SITE_WEB"
	HeaderText="Site web"
	DataField="SITE_WEB"
	UniqueName="SITE_WEB"
	MaxLength="75">
	</telerik:GridBoundColumn>
	<telerik:GridCheckBoxColumn
	sortexpression="AUTONOME_OFFRE"
	HeaderText="Autonome offres"
	DataField="AUTONOME_OFFRE"
	UniqueName="AUTONOME_OFFRE2">
	</telerik:GridCheckBoxColumn>
	</Columns>
	</MasterTableView>
	<ClientSettings>
	<Scrolling AllowScroll="True" />
	</ClientSettings>
	<FilterMenu EnableTheming="True" Skin="Office2007">
	<CollapseAnimation Duration="200" Type="OutQuint" />
	</FilterMenu>
	</telerik:RadGrid>
	</telerik:RadPageView>

	<telerik:RadPageView ID="RadPageView5" runat="server">
	<telerik:RadGrid
	ID="RadGrid_Offre_Programme"
	runat="server"
	datasourceid="SqlDSEntrepriseOffre"
	autogeneratecolumns="False"
	Skin="Office2007"
	GridLines="None"
	AllowAutomaticInserts="true"
	AllowAutomaticUpdates="True"
	AllowAutomaticDeletes="True"
	ClientSettings-Scrolling-AllowScroll="true"
	AllowMultiRowSelection="true"
	AllowFilteringByColumn=true
	AllowSorting=true
	width="98%"
	Height="88%"
	HorizontalAlign=Left
	OnItemDataBound="RadGrid_Offre_Programme_ItemDataBound"
	>
	<ClientSettings  >
	<Selecting AllowRowSelect="True"/>
	</ClientSettings>
	<PagerStyle
	NextPageText="Suivant" PrevPageText="Précédent" Mode="NextPrevAndNumeric"
	NextPagesToolTip="Pages suivante"
	NextPageToolTip="Page suivante"
	PrevPagesToolTip="Pages précédente"
	PrevPageToolTip="Page précédente"/>
	<MasterTableView
	Name="MTVEntrepriseOffre"
	DataSourceID="SqlDSEntrepriseOffre"
	NoMasterRecordsText="Il n'y a aucune entreprise."
	DataKeyNames="NO_ENTREPRISE"
	AllowAutomaticDeletes=false
	AllowAutomaticInserts=false
	AllowAutomaticUpdates=false
	Width="100%"
	>
	<ExpandCollapseColumn>
	<HeaderStyle Width="20px" />
	</ExpandCollapseColumn>
	<Columns>
	<telerik:GridBoundColumn
	SortExpression="NO_ENTREPRISE"
	HeaderText="NO ENTREPRISE"
	DataField="NO_ENTREPRISE"
	UniqueName="NO_ENTREPRISE"
	visible="false"
	readonly="true">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="NOM_ENTREPRISE"
	HeaderText="Entreprise"
	DataField="NOM_ENTREPRISE"
	UniqueName="NOM_ENTREPRISE"
	MaxLength="50">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="DESCR"
	HeaderText="Description"
	DataField="DESCR"
	UniqueName="DESCR"
	MaxLength="255">
	</telerik:GridBoundColumn>
	</Columns>
	<DetailTables >
	<telerik:GridTableView
	TableLayout="Auto"
	GridLines="Both"
	ShowFooter=true
	DataKeyNames="NO_OFFRE"
	ShowHeader=true
	DataSourceID="SQLDSOffre"
	Name="GTVOffre"
	AllowAutomaticDeletes="true"
	AllowAutomaticInserts=true
	AllowAutomaticUpdates="true"
	CommandItemDisplay="Bottom"
	CommandItemSettings-AddNewRecordText="Ajouter une offre"
	CommandItemSettings-RefreshText="rafraichir"
	EditFormSettings-EditColumn-CancelText="Annuler"
	EditFormSettings-EditColumn-EditText="Modifier"
	EditFormSettings-EditColumn-InsertText="Ajouter"
	EditFormSettings-EditColumn-UpdateText="Mise à jour"
	EditFormSettings-EditColumn-HeaderButtonType="PushButton"
	NoDetailRecordsText="Il n'y a aucune offre pour cette entreprise."
	EditMode="EditForms" >
	<ParentTableRelation>
	<telerik:GridRelationFields DetailKeyField="NO_ENTREPRISE" MasterKeyField="NO_ENTREPRISE" />
	</ParentTableRelation>
	<Columns>
	<telerik:GridClientSelectColumn AutoPostBackOnFilter=false HeaderText="" UniqueName="OffreSelectColumn" ></telerik:GridClientSelectColumn>
	<telerik:GridBoundColumn
	SortExpression="NO_OFFRE"
	HeaderText="Num. Réf."
	DataField="NO_OFFRE"
	UniqueName="NO_OFFRE"
	visible="false"
	readonly="true">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="NO_ENTREPRISE"
	DataField="NO_ENTREPRISE"
	UniqueName="NO_ENTREPRISE"
	visible="false"
	readonly="true">
	</telerik:GridBoundColumn>
	<telerik:GridButtonColumn
	ButtonType="ImageButton"
	CommandName="ImprimerOffre"
	ItemStyle-Font-Size="Smaller"
	UniqueName= "ImprimerOffre"
	ImageUrl="./Images/Imprimer.bmp">
	</telerik:GridButtonColumn>
	<telerik:GridEditCommandColumn
	ButtonType="ImageButton"
	UniqueName="EditCommandColumn">
	</telerik:GridEditCommandColumn>
	<telerik:GridButtonColumn
	ConfirmText="Supprimer cette offre?"
	ConfirmDialogType="RadWindow"
	ConfirmTitle="Supprimer"
	ButtonType="ImageButton"
	CommandName="Delete"
	Text="Supprimer"
	UniqueName="DeleteColumnDomaine">
	<ItemStyle HorizontalAlign="Center"  />
	</telerik:GridButtonColumn>
	<telerik:GridBoundColumn
	SortExpression="TITRE_OFFRE"
	HeaderText="Titre du poste"
	DataField="TITRE_OFFRE"
	UniqueName="TITRE_OFFRE" MaxLength=60>
	</telerik:GridBoundColumn>
	<telerik:GridCheckBoxColumn
	SortExpression="COURRIEL_ENVOYE"
	HeaderText="Courriels envoyés"
	DataField="COURRIEL_ENVOYE"
	UniqueName="COURRIEL_ENVOYE">
	</telerik:GridCheckBoxColumn>
	<telerik:GridBoundColumn
	SortExpression="NB_POSTE_DISPO"
	HeaderText="Nbre poste dispo."
	DataField="NB_POSTE_DISPO"
	UniqueName="NB_POSTE_DISPO">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="TACHES_RELIEES"
	HeaderText="Tâches reliées"
	DataField="TACHES_RELIEES"
	UniqueName="TACHES_RELIEES">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="DESCRIPTION_COMPLEMENTAIRE"
	HeaderText="Description complémentaire"
	DataField="DESCRIPTION_COMPLEMENTAIRE"
	UniqueName="DESCRIPTION_COMPLEMENTAIRE">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="COMPETENCES"
	HeaderText="Compétences"
	DataField="COMPETENCES"
	UniqueName="COMPETENCES">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="EXIGENCES"
	HeaderText="Formations"
	DataField="EXIGENCES"
	UniqueName="EXIGENCES"
	ReadOnly=true>
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="APTITUDES"
	HeaderText="Aptitudes"
	DataField="APTITUDES"
	UniqueName="APTITUDES">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="TYPE_EMPLOI"
	HeaderText="Type d'emploi"
	DataField="TYPE_EMPLOI"
	UniqueName="TYPE_EMPLOI">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="NB_HEURE_SEMAINE"
	HeaderText="Nbre d'heure/semaine"
	DataField="NB_HEURE_SEMAINE"
	UniqueName="NB_HEURE_SEMAINE">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="RESP_NOM"
	HeaderText="Nom du responsable"
	DataField="RESP_NOM"
	UniqueName="RESP_NOM">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="RESP_PRENOM"
	HeaderText="Prénom du responsable"
	DataField="RESP_PRENOM"
	UniqueName="RESP_PRENOM">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="RESP_COURRIEL"
	HeaderText="Courriel du responsable"
	DataField="RESP_COURRIEL"
	UniqueName="RESP_COURRIEL">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="RESP_NO_TEL"
	HeaderText="No tel du responsable"
	DataField="RESP_NO_TEL"
	UniqueName="RESP_NO_TEL">
	</telerik:GridBoundColumn>
	<telerik:GridTemplateColumn
	UniqueName="TemplateColumnDateDebut"
	HeaderText="Date de début"
	DataField="DATE_DEBUT">
	<ItemTemplate>
	&nbsp;<asp:Label ID="LbDATE_DEBUT" runat="server" Text='<%#left(Eval("DATE_DEBUT"),10) %>'></asp:Label>
	</ItemTemplate>
	<EditItemTemplate>
	<telerik:RadDatePicker ID="DPicker_DATE_DEBUT" Runat="server" DbSelectedDate= '<%#left(Eval("DATE_DEBUT"),10) %>'  >
	<Calendar ID="Calendar_DATE_DEBUT" UseColumnHeadersAsSelectors="False" runat="server" UseRowHeadersAsSelectors="False" ViewSelectorText="x"></Calendar>
	</telerik:RadDatePicker>
	<asp:RequiredFieldValidator ID="RequiredFieldValidator1" ControlToValidate="DPicker_DATE_DEBUT" ErrorMessage="Ce champ est requis" runat="server">
	</asp:RequiredFieldValidator>
	</EditItemTemplate>
	</telerik:GridTemplateColumn>
	<telerik:GridTemplateColumn
	UniqueName="TemplateColumnDateFin"
	HeaderText="Date de fin"
	DataField="DATE_FIN">
	<ItemTemplate>
	&nbsp;<asp:Label ID="LbDATE_FIN" runat="server" Text='<%#left(Eval("DATE_FIN"),10) %>'></asp:Label>
	</ItemTemplate>
	<EditItemTemplate>
	<telerik:RadDatePicker ID="DPicker_DATE_FIN" Runat="server"  DbSelectedDate= '<%#left(Eval("DATE_FIN"),10) %>' >
	<Calendar ID="Calendar_DATE_FIN" UseColumnHeadersAsSelectors="False" runat="server" UseRowHeadersAsSelectors="False" ViewSelectorText="x"></Calendar>
	</telerik:RadDatePicker>
	<asp:RequiredFieldValidator ID="RequiredFieldValidator2" ControlToValidate="DPicker_DATE_FIN" ErrorMessage="Ce champ est requis" runat="server">
	</asp:RequiredFieldValidator>
	</EditItemTemplate>
	</telerik:GridTemplateColumn>
	<telerik:GridTemplateColumn
	UniqueName="TemplateColumnDateDebutEmploi"
	HeaderText="Date de début de l'emploi"
	DataField="DATE_DEBUT_EMPLOI">
	<ItemTemplate>
	&nbsp;<asp:Label ID="LbDATE_DEBUT_EMPLOI" runat="server"  Text='<%#left(Eval("DATE_DEBUT_EMPLOI"),10) %>'></asp:Label>
	</ItemTemplate>
	<EditItemTemplate>
	<telerik:RadDatePicker ID="DPicker_DATE_DEBUT_EMPLOI" Runat="server" DbSelectedDate= '<%#left(Eval("DATE_DEBUT_EMPLOI"),10) %>'>
	<Calendar ID="Calendar_DATE_DEBUT_EMPLOI" UseColumnHeadersAsSelectors="False" runat="server" UseRowHeadersAsSelectors="False" ViewSelectorText="x"></Calendar>
	</telerik:RadDatePicker>
	<asp:RequiredFieldValidator ID="RequiredFieldValidator3" ControlToValidate="DPicker_DATE_DEBUT_EMPLOI" ErrorMessage="Ce champ est requis" runat="server">
	</asp:RequiredFieldValidator>
	</EditItemTemplate>
	</telerik:GridTemplateColumn>
	<telerik:GridBoundColumn
	SortExpression="DEMANDEUR"
	HeaderText="Demandeur"
	DataField="DEMANDEUR"
	UniqueName="DEMANDEUR">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="SALAIRE_OFFERT"
	HeaderText="Salaire offert"
	DataField="SALAIRE_OFFERT"
	UniqueName="SALAIRE_OFFERT">
	</telerik:GridBoundColumn>
	<telerik:GridCheckBoxColumn
	sortexpression="STATUS"
	HeaderText="Approuvée"
	DataField="STATUS"
	UniqueName="STATUS">
	</telerik:GridCheckBoxColumn>
	</Columns>
	<DetailTables>
	<telerik:GridTableView
	Name="MTVOffreProgramme"
	DataSourceID="SqlDSOffreProgrammeDomaine"
	DataKeyNames="NO_PROGRAMME"
	AllowAutomaticDeletes=True
	AllowAutomaticInserts=true
	AllowAutomaticUpdates=True
	CommandItemDisplay="Bottom"
	CommandItemSettings-AddNewRecordText="Ajouter un programme"
	CommandItemSettings-RefreshText="rafraichir"
	EditFormSettings-EditColumn-CancelText="Annuler"
	EditFormSettings-EditColumn-InsertText="Ajouter"
	EditFormSettings-EditColumn-EditText="Modifier"
	EditFormSettings-EditColumn-UpdateText="Mise à jour"
	EditFormSettings-EditColumn-HeaderButtonType="PushButton"
	NoDetailRecordsText="Il n'y a aucun programme pour cette offre."
	EditMode="EditForms" >
	<ExpandCollapseColumn>
	<HeaderStyle Width="20px" />
	</ExpandCollapseColumn>
	<ParentTableRelation>
	<telerik:GridRelationFields DetailKeyField="NO_OFFRE" MasterKeyField="NO_OFFRE" />
	</ParentTableRelation>
	<Columns>
	<telerik:GridBoundColumn
	SortExpression="NO_PROGRAMME"
	HeaderText="NO_PROGRAMME"
	DataField="NO_PROGRAMME"
	UniqueName="NO_PROGRAMME1"
	visible="false"
	readonly="true">
	</telerik:GridBoundColumn>
	<telerik:GridButtonColumn
	ConfirmText="Supprimer ce programme pour cette offre?"
	ConfirmDialogType="RadWindow"
	ConfirmTitle="Supprimer"
	ButtonType="ImageButton"
	CommandName="Delete"
	Text="Supprimer"
	UniqueName="DeleteColumnProgrammeUsager">
	<ItemStyle HorizontalAlign="Center" CssClass="MyImageButton" />
	</telerik:GridButtonColumn>
	<telerik:GridDropDownColumn
	DataField="NO_PROGRAMME"
	ColumnEditorID="0"
	EditFormColumnIndex="0"
	DataSourceID="SqlDSProgrammeDomaine"
	HeaderText="Programme"
	ListTextField="PNOM"
	ListValueField="NO_PROGRAMME"
	UniqueName="NO_PROGRAMME">
	<HeaderStyle HorizontalAlign="Center" />
	<ItemStyle HorizontalAlign="Center" Width="80px" />
	</telerik:GridDropDownColumn>
	<telerik:GridBoundColumn
	SortExpression="DNOM"
	HeaderText="Nom Domaine"
	DataField="DNOM"
	UniqueName="DNOM"
	ReadOnly="true">
	</telerik:GridBoundColumn>
	</Columns>
	</telerik:GridTableView>
	</DetailTables>
	</telerik:GridTableView>
	</DetailTables>
	</MasterTableView>
	</telerik:RadGrid>
	<table align=left>
	<tr>
	<td><asp:CheckBox ID="ChkNonDiplome" Visible=false CssClass="TexteOrange12" runat="server" Text="Inclure les élèves sans diplome" />
	<asp:Button ID="BtnCourriel" Visible=true runat="server" Text="Envoyer un courriel" /></td></tr></table>
	</telerik:RadPageView>

	<telerik:RadPageView ID="RadPageView3" runat="server" >
	<telerik:RadGrid
	ID="RadGrid_offre"
	DataSourceID="SqlDSEntrepriseOffre"
	runat="server"
	autogeneratecolumns="False"
	Skin="Office2007"
	GridLines="None"
	AllowAutomaticInserts="true"
	AllowAutomaticUpdates="True"
	AllowAutomaticDeletes="True"
	AllowMultiRowSelection="true"
	AllowFilteringByColumn=true
	ClientSettings-Scrolling-AllowScroll="true"
	AllowSorting=true
	HorizontalAlign=Left
	width="98%"
	Height="95%"
	>
	<PagerStyle
	NextPageText="Suivant" PrevPageText="Précédent" Mode="NextPrevAndNumeric"
	NextPagesToolTip="Pages suivante"
	NextPageToolTip="Page suivante"
	PrevPagesToolTip="Pages précédente"
	PrevPageToolTip="Page précédente"/>
	<ClientSettings enablepostbackonrowclick= "true" >
	<Selecting AllowRowSelect="True"/>
	</ClientSettings>
	<MasterTableView
	Name="MTVEntrepriseOffre"
	DataSourceID="SqlDSEntrepriseOffre"
	NoMasterRecordsText="Il n'y a aucune entreprise."
	DataKeyNames="NO_ENTREPRISE"
	AllowAutomaticDeletes=false
	AllowAutomaticInserts=false
	AllowAutomaticUpdates=false Width="100%">
	<ExpandCollapseColumn>
	<HeaderStyle Width="20px" />
	</ExpandCollapseColumn>
	<Columns>
	<telerik:GridBoundColumn
	SortExpression="NO_ENTREPRISE"
	HeaderText="NO ENTREPRISE"
	DataField="NO_ENTREPRISE"
	UniqueName="NO_ENTREPRISE"
	visible="false"
	readonly="true">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="NOM_ENTREPRISE"
	HeaderText="Entreprise"
	DataField="NOM_ENTREPRISE"
	UniqueName="NOM_ENTREPRISE"
	MaxLength="50">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="DESCR"
	HeaderText="Description"
	DataField="DESCR"
	UniqueName="DESCR"
	MaxLength="255">
	</telerik:GridBoundColumn>
	</Columns>
	<DetailTables >
	<telerik:GridTableView
	TableLayout="Auto"
	GridLines="Both"
	ShowFooter=true
	DataKeyNames="NO_OFFRE"
	ShowHeader=true
	DataSourceID="SQLDSOffre"
	Name="GTVOffre"
	AllowAutomaticDeletes="true"
	AllowAutomaticInserts=true
	AllowAutomaticUpdates="true"
	CommandItemDisplay="Bottom"
	CommandItemSettings-AddNewRecordText="Ajouter une offre"
	CommandItemSettings-RefreshText="rafraichir"
	EditFormSettings-EditColumn-CancelText="Annuler"
	EditFormSettings-EditColumn-EditText="Modifier"
	EditFormSettings-EditColumn-InsertText="Ajouter"
	EditFormSettings-EditColumn-UpdateText="Mise à jour"
	EditFormSettings-EditColumn-HeaderButtonType="PushButton"
	NoDetailRecordsText="Il n'y a aucune offre pour cette entreprise."
	EditMode="EditForms" >
	<ParentTableRelation>
	<telerik:GridRelationFields DetailKeyField="NO_ENTREPRISE" MasterKeyField="NO_ENTREPRISE" />
	</ParentTableRelation>
	<Columns>
	<telerik:GridBoundColumn
	SortExpression="NO_OFFRE"
	HeaderText="Num. Réf."
	DataField="NO_OFFRE"
	UniqueName="NO_OFFRE"
	visible="false"
	readonly="true">
	</telerik:GridBoundColumn>
	<telerik:GridEditCommandColumn
	ButtonType="ImageButton"
	UniqueName="EditCommandColumn">
	<ItemStyle CssClass="MyImageButton" />
	</telerik:GridEditCommandColumn>
	<telerik:GridButtonColumn
	ConfirmText="Supprimer cette offre?"
	ConfirmDialogType="RadWindow"
	ConfirmTitle="Supprimer"
	ButtonType="ImageButton"
	CommandName="Delete"
	Text="Supprimer"
	UniqueName="DeleteColumnDomaine">
	<ItemStyle HorizontalAlign="Center" CssClass="MyImageButton" />
	</telerik:GridButtonColumn>
	<telerik:GridBoundColumn
	SortExpression="TITRE_OFFRE"
	HeaderText="Titre du poste"
	DataField="TITRE_OFFRE"
	UniqueName="TITRE_OFFRE" MaxLength=60>
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="NB_POSTE_DISPO"
	HeaderText="Nbre poste dispo."
	DataField="NB_POSTE_DISPO"
	UniqueName="NB_POSTE_DISPO">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="TACHES_RELIEES"
	HeaderText="Tâches reliées"
	DataField="TACHES_RELIEES"
	UniqueName="TACHES_RELIEES">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="DESCRIPTION_COMPLEMENTAIRE"
	HeaderText="Description complémentaire"
	DataField="DESCRIPTION_COMPLEMENTAIRE"
	UniqueName="DESCRIPTION_COMPLEMENTAIRE">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="COMPETENCES"
	HeaderText="Compétences"
	DataField="COMPETENCES"
	UniqueName="COMPETENCES">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="EXIGENCES"
	HeaderText="Formations"
	DataField="EXIGENCES"
	UniqueName="EXIGENCES">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="APTITUDES"
	HeaderText="Aptitudes"
	DataField="APTITUDES"
	UniqueName="APTITUDES">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="TYPE_EMPLOI"
	HeaderText="Type d'emploi"
	DataField="TYPE_EMPLOI"
	UniqueName="TYPE_EMPLOI">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="NB_HEURE_SEMAINE"
	HeaderText="Nbre d'heure/semaine"
	DataField="NB_HEURE_SEMAINE"
	UniqueName="NB_HEURE_SEMAINE">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="RESP_NOM"
	HeaderText="Nom du responsable"
	DataField="RESP_NOM"
	UniqueName="RESP_NOM">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="RESP_PRENOM"
	HeaderText="Prénom du responsable"
	DataField="RESP_PRENOM"
	UniqueName="RESP_PRENOM">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="RESP_COURRIEL"
	HeaderText="Courriel du responsable"
	DataField="RESP_COURRIEL"
	UniqueName="RESP_COURRIEL">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="RESP_NO_TEL"
	HeaderText="No tel du responsable"
	DataField="RESP_NO_TEL"
	UniqueName="RESP_NO_TEL">
	</telerik:GridBoundColumn>
	<telerik:GridTemplateColumn
	UniqueName="TemplateColumnDateDebut"
	HeaderText="Date de début"
	DataField="DATE_DEBUT">
	<ItemTemplate>
	&nbsp;<asp:Label ID="LbDATE_DEBUT" runat="server" Text='<%#left(Eval("DATE_DEBUT"),10) %>'></asp:Label>
	</ItemTemplate>
	<EditItemTemplate>
	<telerik:RadDatePicker ID="DPicker_DATE_DEBUT" Runat="server" DbSelectedDate= '<%#left(Eval("DATE_DEBUT"),10) %>'  >
	<Calendar ID="Calendar_DATE_DEBUT" UseColumnHeadersAsSelectors="False" runat="server" UseRowHeadersAsSelectors="False" ViewSelectorText="x"></Calendar>
	</telerik:RadDatePicker>
	</EditItemTemplate>
	</telerik:GridTemplateColumn>
	<telerik:GridTemplateColumn
	UniqueName="TemplateColumnDateFin"
	HeaderText="Date de fin"
	DataField="DATE_FIN">
	<ItemTemplate>
	&nbsp;<asp:Label ID="LbDATE_FIN" runat="server" Text='<%#left(Eval("DATE_FIN"),11) %>'></asp:Label>
	</ItemTemplate>
	<EditItemTemplate>
	<telerik:RadDatePicker ID="DPicker_DATE_FIN" Runat="server"  DbSelectedDate= '<%#left(Eval("DATE_FIN"),10) %>' >
	<Calendar ID="Calendar_DATE_FIN" UseColumnHeadersAsSelectors="False" runat="server" UseRowHeadersAsSelectors="False" ViewSelectorText="x"></Calendar>
	</telerik:RadDatePicker>
	</EditItemTemplate>
	</telerik:GridTemplateColumn>
	<telerik:GridTemplateColumn
	UniqueName="TemplateColumnDateDebutEmploi"
	HeaderText="Date de début de l'emploi"
	DataField="DATE_DEBUT_EMPLOI">
	<ItemTemplate>
	&nbsp;<asp:Label ID="LbDATE_DEBUT_EMPLOI" runat="server"  Text='<%#left(Eval("DATE_DEBUT_EMPLOI"),10) %>'></asp:Label>
	</ItemTemplate>
	<EditItemTemplate>
	<telerik:RadDatePicker ID="DPicker_DATE_DEBUT_EMPLOI" Runat="server" DbSelectedDate= '<%#left(Eval("DATE_DEBUT_EMPLOI"),10) %>'>
	<Calendar ID="Calendar_DATE_DEBUT_EMPLOI" UseColumnHeadersAsSelectors="False" runat="server" UseRowHeadersAsSelectors="False" ViewSelectorText="x"></Calendar>
	</telerik:RadDatePicker>
	</EditItemTemplate>
	</telerik:GridTemplateColumn>
	<telerik:GridBoundColumn
	SortExpression="DEMANDEUR"
	HeaderText="Demandeur"
	DataField="DEMANDEUR"
	UniqueName="DEMANDEUR">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="SALAIRE_OFFERT"
	HeaderText="Salaire offert"
	DataField="SALAIRE_OFFERT"
	UniqueName="SALAIRE_OFFERT">
	</telerik:GridBoundColumn>
	<telerik:GridCheckBoxColumn
	sortexpression="STATUS"
	HeaderText="Approuvée"
	DataField="STATUS"
	UniqueName="STATUS">
	</telerik:GridCheckBoxColumn>
	</Columns>
	<DetailTables>
	<telerik:GridTableView
	Name="MTVPostulant"
	DataSourceID="SqlDSPostulant"
	DataKeyNames="NO_DEMANDE"
	AllowAutomaticDeletes=True
	AllowAutomaticInserts=False
	AllowAutomaticUpdates=True
	EditFormSettings-EditColumn-CancelText="Annuler"
	EditFormSettings-EditColumn-EditText="Modifier"
	EditFormSettings-EditColumn-UpdateText="Mise à jour"
	EditFormSettings-EditColumn-HeaderButtonType="PushButton"
	NoDetailRecordsText="Il n'y a aucun postulant pour cette offre."
	EditMode="EditForms" >
	<ExpandCollapseColumn>
	<HeaderStyle Width="20px" />
	</ExpandCollapseColumn>
	<ParentTableRelation>
	<telerik:GridRelationFields DetailKeyField="NO_OFFRE" MasterKeyField="NO_OFFRE" />
	</ParentTableRelation>
	<Columns>
	<telerik:GridBoundColumn
	SortExpression="NO_DEMANDE"
	HeaderText="NO DEMANDE"
	DataField="NO_DEMANDE"
	UniqueName="NO_DEMANDE"
	visible="false"
	readonly="true">
	</telerik:GridBoundColumn>
	<telerik:GridEditCommandColumn
	ButtonType="ImageButton"
	UniqueName="EditCommandColumn">
	<ItemStyle CssClass="MyImageButton" />
	</telerik:GridEditCommandColumn>
	<telerik:GridButtonColumn
	ConfirmText="Supprimer cette demande?"
	ConfirmDialogType="RadWindow"
	ConfirmTitle="Supprimer"
	ButtonType="ImageButton"
	CommandName="Delete"
	Text="Supprimer"
	UniqueName="DeleteColumnDemande">
	<ItemStyle HorizontalAlign="Center" CssClass="MyImageButton" />
	</telerik:GridButtonColumn>
	<telerik:GridBoundColumn
	SortExpression="NO_OFFRE"
	HeaderText="No offre"
	DataField="NO_OFFRE"
	UniqueName="NO_OFFRE"
	visible=false
	readonly=true>
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="CODE_PERMANENT"
	HeaderText="Code permanent"
	DataField="CODE_PERMANENT"
	UniqueName="CODE_PERMANENT"
	ReadOnly="true">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="PRENOM"
	HeaderText="Prenom"
	DataField="PRENOM"
	UniqueName="PRENOM"
	ReadOnly=true>
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="NOM"
	HeaderText="Nom"
	DataField="NOM"
	UniqueName="NOM"
	ReadOnly=true>
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="COURRIEL"
	HeaderText="Courriel"
	DataField="COURRIEL"
	UniqueName="COURRIEL"
	ReadOnly=true>
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="RECEVOIR_NOUVELLE_OFFRE"
	DataField="RECEVOIR_NOUVELLE_OFFRE"
	UniqueName="RECEVOIR_NOUVELLE_OFFRE"
	ReadOnly=true
	Visible=false>
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="DIPLOME"
	DataField="DIPLOME"
	UniqueName="DIPLOME"
	ReadOnly=true
	Visible=false>
	</telerik:GridBoundColumn>
	<telerik:GridTemplateColumn
	UniqueName="TemplateColumnLETTRE_PRESENTATION"
	HeaderText="Lettre présentation"
	DataField="LETTRE_PRESENTATION">
	<ItemTemplate>
	&nbsp;<a href='Offre\<%#Eval("NO_OFFRE") %>\<%#Eval("CODE_PERMANENT") %>\<%#Eval("LETTRE_PRESENTATION") %>' target='_blank'><%#Eval("LETTRE_PRESENTATION") %></a>
	</ItemTemplate>
	<EditItemTemplate>
	<asp:FileUpload ID="LETTRE_PRESENTATION" Text='<%#Eval("LETTRE_PRESENTATION") %>' runat="server" />
	</EditItemTemplate>
	</telerik:GridTemplateColumn>
	<telerik:GridTemplateColumn
	UniqueName="TemplateColumnCV"
	HeaderText="CV"
	DataField="NOM_CV">
	<ItemTemplate>
	&nbsp;<a href='Offre\<%#Eval("NO_OFFRE") %>\<%#Eval("CODE_PERMANENT") %>\<%#Eval("NOM_CV") %>' target='_blank'><%#Eval("NOM_CV")%></a>
	</ItemTemplate>
	<EditItemTemplate>
	<asp:FileUpload ID="CV" Text='<%#Eval("NOM_CV") %>' runat="server" />
	</EditItemTemplate>
	</telerik:GridTemplateColumn>
	<telerik:GridCheckBoxColumn
	sortexpression="STATUS"
	HeaderText="Statut de la demande"
	DataField="STATUS"
	UniqueName="STATUS" Visible=false ReadOnly=true>
	</telerik:GridCheckBoxColumn>
	<telerik:GridBoundColumn
	SortExpression="DATE_SOUMISSION"
	HeaderText="Date soumission demande"
	DataField="DATE_SOUMISSION"
	UniqueName="DATE_SOUMISSION"
	DataType="System.DateTime"
	ReadOnly=true
	DataFormatString="{0:dd/MM/yyyy}">
	</telerik:GridBoundColumn>
	</Columns>
	</telerik:GridTableView>
	</DetailTables>
	</telerik:GridTableView>
	</DetailTables>
	</MasterTableView>
	<ClientSettings>
	<Selecting AllowRowSelect="True"></Selecting>
	</ClientSettings>
	</telerik:RadGrid>
	</telerik:RadPageView>

	<telerik:RadPageView ID="RadPageView4" runat="server">
	<telerik:RadGrid
	ID="RadGrid_BanqueCV"
	datasourceid="SqlDSBanqueCV"
	runat="server"
	autogeneratecolumns="false"
	Skin="Office2007"
	GridLines="None"
	AllowAutomaticInserts="true"
	AllowAutomaticUpdates="True"
	AllowAutomaticDeletes="True"
	width="98%"
	Height="95%"
	AllowFilteringByColumn=true
	HorizontalAlign=Left
	AllowSorting=true OnDeleteCommand="RadGrid_BanqueCV_DeleteCommand"
	MasterTableView-EditFormSettings-FormTableAlternatingItemStyle-HorizontalAlign=Left
	MasterTableView-EditFormSettings-FormMainTableStyle-HorizontalAlign=left
	MasterTableView-EditFormSettings-FormTableItemStyle-HorizontalAlign=Left
	>
	<ClientSettings>
	<Scrolling AllowScroll=true />
	</ClientSettings>
	<PagerStyle
	NextPageText="Suivant" PrevPageText="Précédent" Mode="NextPrevAndNumeric"
	NextPagesToolTip="Pages suivante"
	NextPageToolTip="Page suivante"
	PrevPagesToolTip="Pages précédente"
	PrevPageToolTip="Page précédente"/>
	<MasterTableView
	Name="MTVBanqueCv"
	DataSourceID="SqlDSBanqueCV"
	NoMasterRecordsText="Il n'y a aucun usager."
	DataKeyNames="CODE_PERMANENT"
	AllowAutomaticDeletes=True
	AllowAutomaticInserts=true
	AllowAutomaticUpdates=True
	EditFormSettings-EditColumn-CancelText="Annuler"
	EditFormSettings-EditColumn-EditText="Modifier"
	EditFormSettings-EditColumn-InsertText="Ajouter"
	EditFormSettings-EditColumn-UpdateText="Mise à jour"
	EditFormSettings-EditColumn-HeaderButtonType="PushButton"
	NoDetailRecordsText="Il n'y a aucun usager."
	EditMode="EditForms"
	Width="100%"
	>
	<Columns>
	<telerik:GridEditCommandColumn
	ButtonType="ImageButton"
	UniqueName="EditCommandColumn">
	<ItemStyle CssClass="MyImageButton" />
	</telerik:GridEditCommandColumn>
	<telerik:GridButtonColumn
	ConfirmText="Supprimer cet usager?"
	ConfirmDialogType="RadWindow"
	ConfirmTitle="Supprimer"
	ButtonType="ImageButton"
	CommandName="Delete"
	Text="Supprimer"
	UniqueName="DeleteColumnDemande">
	<ItemStyle HorizontalAlign="Center" CssClass="MyImageButton" />
	</telerik:GridButtonColumn>
	<telerik:GridBoundColumn
	SortExpression="CODE_PERMANENT"
	HeaderText="CODE PERMANENT"
	DataField="CODE_PERMANENT"
	UniqueName="CODE_PERMANENT"
	visible="true"
	readonly="true">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="PRENOM"
	HeaderText="Prénom"
	DataField="PRENOM"
	UniqueName="PRENOM">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="NOM"
	HeaderText="Nom"
	DataField="NOM"
	UniqueName="NOM">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="ADRESSE"
	HeaderText="Adresse"
	DataField="ADRESSE"
	UniqueName="ADRESSE">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="VILLE"
	HeaderText="Ville"
	DataField="VILLE"
	UniqueName="VILLE">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="CODE_POSTAL"
	HeaderText="Code Postal"
	DataField="CODE_POSTAL"
	UniqueName="CODE_POSTAL">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="NO_TEL"
	HeaderText="No tel"
	DataField="NO_TEL"
	UniqueName="NO_TEL">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="COURRIEL"
	HeaderText="Courriel"
	DataField="COURRIEL"
	UniqueName="COURRIEL">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="DATE_NAISSANCE"
	HeaderText="Date naissance"
	DataField="DATE_NAISSANCE"
	UniqueName="DATE_NAISSANCE"
	DataFormatString="{0:dd/MM/yyyy}"
	ReadOnly=true>
	</telerik:GridBoundColumn>
	<telerik:GridCheckBoxColumn
	sortexpression="LETTRE_CONSENTEMENT"
	HeaderText="Lettre de consentement"
	DataField="LETTRE_CONSENTEMENT"
	UniqueName="LETTRE_CONSENTEMENT">
	</telerik:GridCheckBoxColumn>
	<telerik:GridCheckBoxColumn
	sortexpression="RECEVOIR_NOUVELLE_OFFRE"
	HeaderText="Recevoir nouvelles offres"
	DataField="RECEVOIR_NOUVELLE_OFFRE"
	UniqueName="RECEVOIR_NOUVELLE_OFFRE">
	</telerik:GridCheckBoxColumn>
	<telerik:GridCheckBoxColumn
	sortexpression="DIPLOME"
	HeaderText="Diplôme"
	DataField="DIPLOME"
	UniqueName="DIPLOME">
	</telerik:GridCheckBoxColumn>
	<telerik:GridCheckBoxColumn
	sortexpression="TROUVE_EMPLOI"
	HeaderText="Trouvé un emploi"
	DataField="TROUVE_EMPLOI"
	UniqueName="TROUVE_EMPLOI">
	</telerik:GridCheckBoxColumn>
	<telerik:GridBoundColumn
	SortExpression="DATE_TROUVE_EMPLOI"
	HeaderText="Date de l'emploi trouvé"
	DataField="DATE_TROUVE_EMPLOI"
	UniqueName="DATE_TROUVE_EMPLOI"
	DataFormatString="{0:dd/MM/yyyy}">
	</telerik:GridBoundColumn>
	</Columns>
	<DetailTables>
	<telerik:GridTableView
	Name="GTVUsagerProgramme"
	DataSourceID="SqlDSUsagerProgramme"
	DataKeyNames="NO_PROGRAMME"
	AllowAutomaticDeletes="true"
	AllowAutomaticInserts=true
	AllowAutomaticUpdates="true"
	CommandItemDisplay="Bottom"
	CommandItemSettings-AddNewRecordText="Ajouter un programme d'étude pour cet usager"
	CommandItemSettings-RefreshText="rafraichir"
	EditFormSettings-EditColumn-CancelText="Annuler"
	EditFormSettings-EditColumn-EditText="Modifier"
	EditFormSettings-EditColumn-InsertText="Ajouter"
	EditFormSettings-EditColumn-UpdateText="Mise à jour"
	EditFormSettings-EditColumn-HeaderButtonType="PushButton"
	NoDetailRecordsText="Il n'y a aucun programme d'étude pour cet usager"
	EditMode="EditForms" >
	<ExpandCollapseColumn>
	<HeaderStyle Width="20px" />
	</ExpandCollapseColumn>
	<ParentTableRelation>
	<telerik:GridRelationFields DetailKeyField="CODE_PERMANENT" MasterKeyField="CODE_PERMANENT" />
	</ParentTableRelation>
	<Columns>
	<telerik:GridBoundColumn
	SortExpression="CODE_PERMANENT"
	HeaderText="CODE PERMANENT"
	DataField="CODE_PERMANENT"
	UniqueName="CODE_PERMANENT"
	visible="true"
	readonly="true">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="NO_PROGRAMME"
	HeaderText="NO_PROGRAMME"
	DataField="NO_PROGRAMME"
	UniqueName="NO_PROGRAMME1"
	visible="false"
	readonly="true">
	</telerik:GridBoundColumn>
	<telerik:GridButtonColumn
	ConfirmText="Supprimer cet programme pour cet usager?"
	ConfirmDialogType="RadWindow"
	ConfirmTitle="Supprimer"
	ButtonType="ImageButton"
	CommandName="Delete"
	Text="Supprimer"
	UniqueName="DeleteColumnProgrammeUsager">
	<ItemStyle HorizontalAlign="Center" CssClass="MyImageButton" />
	</telerik:GridButtonColumn>
	<telerik:GridDropDownColumn
	DataField="NO_PROGRAMME"
	ColumnEditorID="0"
	EditFormColumnIndex="0"
	DataSourceID="SqlDSProgrammeDomaine"
	HeaderText="Programme"
	ListTextField="PNOM"
	ListValueField="NO_PROGRAMME"
	UniqueName="NO_PROGRAMME">
	<HeaderStyle HorizontalAlign="Center" />
	<ItemStyle HorizontalAlign="Center" Width="80px" />
	</telerik:GridDropDownColumn>
	<telerik:GridBoundColumn
	SortExpression="DNOM"
	HeaderText="Nom Domaine"
	DataField="DNOM"
	UniqueName="DNOM"
	ReadOnly="true">
	</telerik:GridBoundColumn>
	<telerik:GridTemplateColumn
	UniqueName="TemplateColumnDateDiplome"
	HeaderText="Date du diplôme"
	DataField="DATE_DIPLOME">
	<ItemTemplate>
	&nbsp;<asp:Label ID="LbDATE_DIPLOME" runat="server" Text='<%#left(Eval("DATE_DIPLOME"),10) %>'></asp:Label>
	</ItemTemplate>
	<EditItemTemplate>
	<telerik:RadDatePicker ID="DPicker_DATE_DIPLOME" Runat="server"   >
	<Calendar ID="Calendar_DATE_DIPLOME" UseColumnHeadersAsSelectors="False" runat="server" UseRowHeadersAsSelectors="False" ViewSelectorText="x"></Calendar>
	</telerik:RadDatePicker>
	<asp:RequiredFieldValidator ID="RequiredFieldValidator1" ControlToValidate="DPicker_DATE_DIPLOME" ErrorMessage="Ce champ est requis" runat="server">
	</asp:RequiredFieldValidator>
	</EditItemTemplate>
	</telerik:GridTemplateColumn>
	</Columns>
	</telerik:GridTableView>
	</DetailTables>
	</MasterTableView>
	</telerik:RadGrid>
	</telerik:RadPageView>

	<telerik:RadPageView ID="RadPageView6" runat="server">
	<telerik:RadGrid
	ID="RadGrid_Log"
	datasourceid="SqlDSLog"
	runat="server"
	autogeneratecolumns="false"
	Skin="Office2007"
	GridLines="None"
	AllowAutomaticInserts="false"
	AllowAutomaticUpdates="false"
	AllowAutomaticDeletes="false"
	ClientSettings-Scrolling-AllowScroll="true"
	width="98%"
	Height="95%"
	HorizontalAlign=Left
	AllowFilteringByColumn=true
	AllowSorting=true
	>
	<ClientSettings>
	<Scrolling AllowScroll=true />
	</ClientSettings>
	<PagerStyle
	NextPageText="Suivant" PrevPageText="Précédent" Mode="NextPrevAndNumeric"
	NextPagesToolTip="Pages suivante"
	NextPageToolTip="Page suivante"
	PrevPagesToolTip="Pages précédente"
	PrevPageToolTip="Page précédente"/>
	<MasterTableView
	Name="MTVLog"
	DataSourceID="SqlDSLog"
	NoMasterRecordsText="Il n'y a aucun Log."
	DataKeyNames="NO_LOG"
	AllowAutomaticDeletes=false
	AllowAutomaticInserts=false
	AllowAutomaticUpdates=false
	NoDetailRecordsText="Il n'y a aucun Log."
	Width="100%">
	<Columns>
	<telerik:GridBoundColumn
	SortExpression="NO_LOG"
	HeaderText="NO_LOG"
	DataField="NO_LOG"
	UniqueName="NO_LOG"
	ReadOnly="true"
	visible=false>
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="DATE"
	HeaderText="DATE"
	DataField="DATE"
	UniqueName="DATE">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="NOM_UTILISATEUR"
	HeaderText="Nom utilisateur"
	DataField="NOM_UTILISATEUR"
	UniqueName="NOM_UTILISATEUR">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="TYPE_ACTION"
	HeaderText="Type d'action"
	DataField="TYPE_ACTION"
	UniqueName="TYPE_ACTION">
	</telerik:GridBoundColumn>
	<telerik:GridBoundColumn
	SortExpression="DESCR"
	HeaderText="Description"
	DataField="DESCR"
	UniqueName="DESCR">
	</telerik:GridBoundColumn>
	</Columns>
	</MasterTableView>
	</telerik:RadGrid>
	</telerik:RadPageView>
	<telerik:RadPageView ID="RadPageView7" runat="server">
	<table align="center" width="80%">
	<tr>
	<td><br /><asp:label runat=server Text="Statistiques globales" CssClass="TexteOrange"></asp:label><br /></td>
	</tr>
	<tr>
	<td><a href="FEN_STAT_LOGIN_ETUDIANT.aspx" target="_blank"><asp:Label text="Nombre total de connexions d'étudiants par mois" CssClass="TexteOrange" runat=server></asp:Label></a></td>
	</tr>
	<tr>
	<td><a href="FEN_STAT_LOGIN_ENTREPRISE.aspx" target="_blank"><asp:Label runat=server CssClass="TexteOrange" text="Nombre total de connexions d'entreprises par mois"></asp:Label></a></td>
	</tr>
	<tr>
	<td><a href="FEN_STAT_OFFRE.aspx" target="_blank"><asp:Label runat=server CssClass="TexteOrange" text="Nombre total d'offres soumises par mois"></asp:label></a></td>
	</tr>
	<tr>
	<td><a href="FEN_STAT_DEMANDE.aspx" target="_blank"><asp:Label runat=server CssClass="TexteOrange" text="Nombre total de demandes soumises par mois"></asp:label></a></td>
	</tr>
	<tr>
	<td><a href="FEN_STAT_TROUVER_EMPLOI.aspx" target="_blank"><asp:Label ID="Label2" runat=server CssClass="TexteOrange" text="Nombre total d'étudiants ayant trouvé un emploi grâce à notre site par mois"></asp:label></a></td>
	</tr>
	<tr>
	<td><br /><br /><asp:label ID="Label1" runat=server Text="Statistiques par entreprise" CssClass="TexteOrange"></asp:label><br /></td>
	</tr>
	<tr>
	<td><a href="FEN_STAT_ENTREPRISE_OFFRE.aspx" target="_blank"><asp:Label runat=server CssClass="TexteOrange" text="Nombre d'offres soumises par entreprise par mois"></asp:label></a></td>
	</tr>
	<tr>
	<td><a href="FEN_STAT_ENTREPRISE_DEMANDE.aspx" target="_blank"><asp:Label runat=server CssClass="TexteOrange" text="Nombre de demandes soumises par entreprise par mois"></asp:label></a><br /><br /></td>
	</tr>
	</table>
	</telerik:RadPageView>
	<telerik:RadPageView ID="RadPageView8" runat="server">
	<table align="center" width="80%">
	<tr>
	<td>
	<table >
	<tr>
	<td valign=bottom>
	<telerik:RadGrid
	ID="RadGrid2"
	Skin="Vista"
	runat="server"
	OnNeedDataSource="RadGrid2_NeedDataSource"
	OnItemCommand="RadGrid2_ItemCommand"
	ShowFooter=true
	CommandItemStyle-HorizontalAlign=Center>
	<MasterTableView
	ShowFooter=true
	CommandItemDisplay="bottom"
	EditMode="InPlace" >
	<CommandItemTemplate>
	<asp:LinkButton ID="LinkButton1" CommandName="UpdateChanges" Runat="server" CssClass="TexteBlanc16">Importer tous</asp:LinkButton>
	</CommandItemTemplate>
	<Columns>
	<telerik:GridTemplateColumn UniqueName="CodePermanent" HeaderText="Code Permanent">
	<ItemTemplate>
	<asp:TextBox ID="TxtCodePermanent" runat="server"></asp:TextBox>
	</ItemTemplate>
	</telerik:GridTemplateColumn>
	</Columns>
	</MasterTableView>
	</telerik:RadGrid>
	</td>
	<td valign=bottom>
	<asp:Button ID="Button1" runat="server" OnClick="Button1_Click" Text="Ajouter un usager" />
	</td>
	</tr>
	</table>
	</td>
	</tr>
	</table>
	</telerik:RadPageView>
	</telerik:RadMultiPage>
	</div>
	<header:b ID="A2" runat="server" />
	</form>
	</body>
	</html>

Good luck!
This is the biggest page I have done ever.
Radgrid_entreprise is the one I insert value in. 

RadGrid_Offre_Programme and Radgrid_Offre are both grid I want to be refreshed

[Sebastian]

Hello Myriam,

Due to the huge size of the code snippets you posted, I am not able to determine the exact cause of the abnormality although I did my best to examine them as thoroughly as possible. Nevertheless, can you check whether replacing the more specific ajax settings for the grid and leaving only one setting which marks the tabstrip as initiator and the tabstrip and multipage as updated controls addresses the issue?

If this does not help, I would like to request to isolate a simplified working sample, exhibiting the problem, and send it enclosed to a regular support ticket. Thus I will be able to test/debug it locally and advice you further.

Best regards,
Sebastian
the Telerik team

Instantly find answers to your questions on the new Telerik Support Portal.
Watch a video on how to optimize your support resource searches and check out more tips on the blogs.

[Myriam]

Hello
I simplify my code. And this time I don't have Ajax in my page.
Still doesn't work. When I add a new record in the first grid, it doesn't refresh the 2 others grids.
Here is my code

<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Default.aspx.vb" Inherits="TestPourServiceDePlacement._Default" %>
<%@ Register assembly="Telerik.Web.UI" namespace="Telerik.Web.UI" tagprefix="telerik" %>
<%@ Register TagPrefix="header" TagName="a" Src="MenuDebut2.ascx" %>
<%@ Register TagPrefix="header" TagName="b" Src="MenuFin2.ascx" %>
<%@ Import Namespace="System.Web.HttpUtility" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>Page sans titre</title>
</head>
<body>
    <form id="form1" runat="server">
   <header:a ID="A1" runat="server" />
    <div>
        <asp:scriptmanager ID="ScriptManager1" runat="server" ></asp:scriptmanager>

     <%-- ********************************************************************************************** --%>
        <%-- ****                       DATASOURCES ONGLET ENTREPRISE                                  **** --%>
        <%-- ********************************************************************************************** --%>
        <asp:SqlDataSource ID="SqlDSEntreprise"
            SelectCommand="SELECT NO_ENTREPRISE,NOM_ENTREPRISE, DESCR, ADRESSE, VILLE, CODE_POSTAL, NO_TEL,NO_CELL,NO_TEL_AUTRE NO_FAX, RESP_COURRIEL, RESP_NOM, RESP_PRENOM,USAGER,MOT_PASSE,SITE_WEB,AUTONOME_OFFRE FROM T_ENTREPRISE"
            DeleteCommand="DELETE FROM [T_ENTREPRISE] WHERE [NO_ENTREPRISE] = ?"
            UpdateCommand="UPDATE [T_ENTREPRISE] SET [NOM_ENTREPRISE] =?,[DESCR]=?,[ADRESSE]=?,[VILLE]=?,[CODE_POSTAL]=?,[NO_TEL]=?,[NO_CELL]=?,[NO_TEL_AUTRE]=?,[NO_FAX]=?,[RESP_COURRIEL]=?,[RESP_NOM]=?,[RESP_PRENOM]=?,[USAGER]=?,[MOT_PASSE]=?,[SITE_WEB]=?,[AUTONOME_OFFRE]=? WHERE NO_ENTREPRISE=?"
            InsertCommand="INSERT INTO [T_ENTREPRISE] ([NOM_ENTREPRISE],[DESCR],[ADRESSE],[VILLE],[CODE_POSTAL],[NO_TEL],[NO_CELL],[NO_TEL_AUTRE],[NO_FAX],[RESP_COURRIEL],[RESP_NOM],[RESP_PRENOM],[USAGER],[MOT_PASSE],[SITE_WEB],[AUTONOME_OFFRE]) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)"
            runat="server"
            ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
        ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>">
            <DeleteParameters>
                <asp:Parameter Name="NO_ENTREPRISE" Type="Int32" />
            </DeleteParameters>
            <UpdateParameters>
                <asp:Parameter Name="NO_ENTREPRISE" Type="Int32" />
                <asp:Parameter Name="NOM_ENTREPRISE" Type="String" />
                <asp:Parameter Name="DESCR" Type="String" />
                <asp:Parameter Name="ADRESSE" Type="String" />
                <asp:Parameter Name="VILLE" Type="String" />
                <asp:Parameter Name="CODE_POSTAL" Type="String" />
                <asp:Parameter Name="NO_TEL" Type="String" />
                <asp:Parameter Name="NO_CELL" Type="String" />
                <asp:Parameter Name="NO_TEL_AUTRE" Type="String" />
                <asp:Parameter Name="NO_FAX" Type="String" />
                <asp:Parameter Name="RESP_COURRIEL" Type="String" />
                <asp:Parameter Name="RESP_NOM" Type="String" />
                <asp:Parameter Name="RESP_PRENOM" Type="String" />
                <asp:Parameter Name="USAGER" Type="String" />
                <asp:Parameter Name="MOT_PASSE" Type="String" />
                <asp:Parameter Name="SITE_WEB" Type="String" />
                <asp:Parameter Name="AUTONOME_OFFRE" Type="int32" />
            </UpdateParameters>
            <InsertParameters>
                <asp:Parameter Name="NOM_ENTREPRISE" Type="String" />
                <asp:Parameter Name="DESCR" Type="String" />
                <asp:Parameter Name="ADRESSE" Type="String" />
                <asp:Parameter Name="VILLE" Type="String" />
                <asp:Parameter Name="CODE_POSTAL" Type="String" />
                <asp:Parameter Name="NO_TEL" Type="String" />
                <asp:Parameter Name="NO_CELL" Type="String" />
                <asp:Parameter Name="NO_TEL_AUTRE" Type="String" />
                <asp:Parameter Name="NO_FAX" Type="String" />
                <asp:Parameter Name="RESP_COURRIEL" Type="String" />
                <asp:Parameter Name="RESP_NOM" Type="String" />
                <asp:Parameter Name="RESP_PRENOM" Type="String" />
                 <asp:Parameter Name="USAGER" Type="String" />
                <asp:Parameter Name="MOT_PASSE" Type="String" />
                <asp:Parameter Name="SITE_WEB" Type="String" />
                <asp:Parameter Name="AUTONOME_OFFRE" Type="int32" />
            </InsertParameters>
        </asp:SqlDataSource>

        <%-- ********************************************************************************************** --%>
        <%-- ****                        DATASOURCES ONGLET OFFRES DEMANDE                             **** --%>
        <%-- ********************************************************************************************** --%>
        <asp:SqlDataSource ID="SqlDSEntrepriseOffre"
            SelectCommand="SELECT NO_ENTREPRISE,NOM_ENTREPRISE, DESCR FROM T_ENTREPRISE"
            runat="server"
           ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
        ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>">
        </asp:SqlDataSource>

        <asp:SqlDataSource ID="SqlDSOffre"
            SelectCommand="SELECT NO_OFFRE,TITRE_OFFRE, NB_POSTE_DISPO,TACHES_RELIEES,DESCRIPTION_COMPLEMENTAIRE,COMPETENCES, EXIGENCES, APTITUDES, TYPE_EMPLOI, NB_HEURE_SEMAINE, RESP_NOM, RESP_PRENOM, RESP_COURRIEL, RESP_NO_TEL, NO_ENTREPRISE, DATE_DEBUT, DATE_FIN, DATE_DEBUT_EMPLOI, DEMANDEUR, STATUS, SALAIRE_OFFERT,COURRIEL_ENVOYE FROM T_OFFRE WHERE NO_ENTREPRISE=?"
            DeleteCommand="DELETE FROM [T_OFFRE] WHERE [NO_OFFRE] = ?"
            UpdateCommand="UPDATE [T_OFFRE] SET [TITRE_OFFRE] = ?,[NB_POSTE_DISPO]=?,[TACHES_RELIEES]=?,[DESCRIPTION_COMPLEMENTAIRE]=?,[COMPETENCES]=?,[EXIGENCES]=?,[APTITUDES]=?,[TYPE_EMPLOI]=?,[NB_HEURE_SEMAINE]=?,[RESP_NOM]=?,[RESP_PRENOM]=?,[RESP_COURRIEL]=?,[RESP_NO_TEL]=?,[NO_ENTREPRISE]=?,[DATE_DEBUT]=?,[DATE_FIN]=?,[DATE_DEBUT_EMPLOI]=?,[DEMANDEUR]=?,[STATUS]=?,[SALAIRE_OFFERT]=?,[COURRIEL_ENVOYE]=? WHERE NO_OFFRE=?"
            InsertCommand="INSERT INTO [T_OFFRE] ([TITRE_OFFRE],[NB_POSTE_DISPO],[TACHES_RELIEES],[DESCRIPTION_COMPLEMENTAIRE],[COMPETENCES],[EXIGENCES],[APTITUDES],[TYPE_EMPLOI],[NB_HEURE_SEMAINE],[RESP_NOM],[RESP_PRENOM],[RESP_COURRIEL],[RESP_NO_TEL],[NO_ENTREPRISE],[DATE_DEBUT],[DATE_FIN],[DATE_DEBUT_EMPLOI],[DEMANDEUR],[STATUS],[SALAIRE_OFFERT],[COURRIEL_ENVOYE]) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)"
            runat="server"
            ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
        ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>">
            <SelectParameters>
                <asp:Parameter Name="NO_ENTREPRISE" Type="Int32" />
            </SelectParameters>
            <DeleteParameters>
                <asp:Parameter Name="NO_OFFRE" Type="Int32" />
            </DeleteParameters>
            <UpdateParameters>
                <asp:Parameter Name="NO_OFFRE" Type="Int32" />
                <asp:Parameter Name="TITRE_OFFRE" Type="String" />
                <asp:Parameter Name="NB_POSTE_DISPO" Type="String" />
                <asp:Parameter Name="TACHES_RELIEES" Type="String" />
                <asp:Parameter Name="DESCRIPTION_COMPLEMENTAIRE" Type="String" />
                <asp:Parameter Name="COMPETENCES" Type="String" />
                <asp:Parameter Name="EXIGENCES" Type="String" />
                <asp:Parameter Name="APTITUDES" Type="String" />
                <asp:Parameter Name="TYPE_EMPLOI" Type="String" />
                <asp:Parameter Name="NB_HEURE_SEMAINE" Type="String" />
                <asp:Parameter Name="RESP_NOM" Type="String" />
                <asp:Parameter Name="RESP_PRENOM" Type="String" />
                <asp:Parameter Name="RESP_COURRIEL" Type="String" />
                <asp:Parameter Name="RESP_NO_TEL" Type="String" />
                <asp:Parameter Name="NO_ENTREPRISE" Type="String" />
                <asp:Parameter Name="DATE_DEBUT" Type="DateTime" />
                <asp:Parameter Name="DATE_FIN" Type="DateTime" />
                <asp:Parameter Name="DATE_DEBUT_EMPLOI" Type="DateTime" />
                <asp:Parameter Name="DEMANDEUR" Type="String" />
                <asp:Parameter Name="STATUS" Type="int32" />
                <asp:Parameter Name="SALAIRE_OFFERT" Type="string" />
                <asp:Parameter Name="COURRIEL_ENVOYE" Type="int32" />
            </UpdateParameters>
            <InsertParameters>
                <asp:Parameter Name="TITRE_OFFRE" Type="String" />
                <asp:Parameter Name="NB_POSTE_DISPO" Type="String" />
                <asp:Parameter Name="TACHES_RELIEES" Type="String" />
                <asp:Parameter Name="DESCRIPTION_COMPLEMENTAIRE" Type="String" />
                <asp:Parameter Name="COMPETENCES" Type="String" />
                <asp:Parameter Name="EXIGENCES" Type="String" />
                <asp:Parameter Name="APTITUDES" Type="String" />
                <asp:Parameter Name="TYPE_EMPLOI" Type="String" />
                <asp:Parameter Name="NB_HEURE_SEMAINE" Type="String" />
                <asp:Parameter Name="RESP_NOM" Type="String" />
                <asp:Parameter Name="RESP_PRENOM" Type="String" />
                <asp:Parameter Name="RESP_COURRIEL" Type="String" />
                <asp:Parameter Name="RESP_NO_TEL" Type="String" />
                <asp:Parameter Name="NO_ENTREPRISE" Type="String" />
                <asp:Parameter Name="DATE_DEBUT" Type="DateTime" />
                <asp:Parameter Name="DATE_FIN" Type="DateTime" />
                <asp:Parameter Name="DATE_DEBUT_EMPLOI" Type="DateTime" />
                <asp:Parameter Name="DEMANDEUR" Type="String" />
                <asp:Parameter Name="STATUS" Type="int32" />
                <asp:Parameter Name="SALAIRE_OFFERT" Type="string" />
                <asp:Parameter Name="COURRIEL_ENVOYE" Type="int32" />
            </InsertParameters>
        </asp:SqlDataSource>



        <asp:SqlDataSource ID="SqlDSPostulant"
            SelectCommand="SELECT NO_DEMANDE,PRENOM,NOM,COURRIEL,LETTRE_CONSENTEMENT,RECEVOIR_NOUVELLE_OFFRE,DIPLOME,T_DEMANDE.CODE_PERMANENT, STATUS, DATE_SOUMISSION, LETTRE_PRESENTATION, NO_OFFRE, T_DEMANDE.NOM_CV FROM T_DEMANDE INNER JOIN T_USAGER ON T_DEMANDE.CODE_PERMANENT=T_USAGER.CODE_PERMANENT WHERE NO_OFFRE = ?"
            DeleteCommand="DELETE FROM [T_DEMANDE] WHERE [NO_DEMANDE] = ?"
            UpdateCommand="UPDATE [T_DEMANDE] SET [STATUS] = 0,[LETTRE_PRESENTATION]=?,[NOM_CV]=? WHERE NO_DEMANDE=?"
            runat="server"
           ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
        ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>">
            <SelectParameters>
                <asp:Parameter Name="NO_OFFRE" Type="Int32" />
            </SelectParameters>
            <DeleteParameters>
                <asp:Parameter Name="NO_DEMANDE" Type="Int32" />
            </DeleteParameters>
            <UpdateParameters>
                <asp:Parameter Name="NO_DEMANDE" Type="Int32" />
                <asp:Parameter Name="STATUS" Type="Int32" />
                <asp:Parameter Name="LETTRE_PRESENTATION" Type="String" />
                <asp:Parameter Name="NOM_CV" Type="String" />
            </UpdateParameters>
        </asp:SqlDataSource>

         <%-- ********************************************************************************************** --%>
        <%-- ****                        DATASOURCES ONGLET OFFRES PROGRAMME                           **** --%>
        <%-- ********************************************************************************************** --%>


        <asp:SqlDataSource ID="SqlDSOffreProgrammeDomaine"
            SelectCommand="SELECT NO_OFFRE,T_OFFRE_PROGRAMME.NO_PROGRAMME,T_PROGRAMME.NOM AS PNOM, T_DOMAINE.NOM AS DNOM FROM T_OFFRE_PROGRAMME INNER JOIN T_PROGRAMME ON T_OFFRE_PROGRAMME.NO_PROGRAMME = T_PROGRAMME.NO_PROGRAMME INNER JOIN T_DOMAINE ON T_PROGRAMME.NO_DOMAINE = T_DOMAINE.NO_DOMAINE WHERE T_OFFRE_PROGRAMME.NO_OFFRE = ?"
            DeleteCommand="DELETE FROM [T_OFFRE_PROGRAMME] WHERE [NO_OFFRE] = ? AND [NO_PROGRAMME] =?"
            InsertCommand="INSERT INTO [T_OFFRE_PROGRAMME] ([NO_OFFRE],[NO_PROGRAMME]) VALUES (?,?)"
            runat="server"
            ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
        ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>">
            <SelectParameters>
                <asp:Parameter Name="NO_OFFRE" Type="Int32" />
            </SelectParameters>
            <DeleteParameters>
                <asp:Parameter Name="NO_OFFRE" Type="Int32" />
                <asp:Parameter Name="NO_PROGRAMME" Type="Int32" />
            </DeleteParameters>
           <InsertParameters>
                <asp:Parameter Name="NO_OFFRE" Type="Int32" />
                <asp:Parameter Name="NO_PROGRAMME" Type="Int32" />
            </InsertParameters>
        </asp:SqlDataSource>

        <telerik:RadTabStrip ID="RadTabStrip1" runat="server"
            Skin="Vista" MultiPageID="RadMultiPage1" SelectedIndex="0" CssClass="TabStrip">
            <Tabs>
                <telerik:RadTab runat="server"   Text="Entreprises">
                </telerik:RadTab>
                <telerik:RadTab runat="server"  Text="Programme par offre">
                </telerik:RadTab>
                <telerik:RadTab runat="server"   Text="Demande par offre">
                </telerik:RadTab>

            </Tabs>
        </telerik:RadTabStrip>



         <telerik:RadMultiPage ID="RadMultiPage1" runat="server" SelectedIndex="0">

                <telerik:RadPageView ID="RadPageView2" runat="server" >

                    <telerik:RadGrid
                        ID="RadGrid_Entreprise"
                        runat="server"
                        DataSourceID="SQLDSEntreprise"
                        autogeneratecolumns="False"
                        Skin="Office2007"
                        AllowAutomaticInserts="True"
                        AllowAutomaticUpdates="True"
                        AllowAutomaticDeletes="True"
                        CommandItemSettings-AddNewRecordText="Ajouter une nouvelle entreprise"
                        AllowFilteringByColumn=true
                        AllowSorting=true
                        OnItemDataBound="RadGrid_Entreprise_ItemDataBound"
                        MasterTableView-EditFormSettings-FormTableAlternatingItemStyle-HorizontalAlign=Left
                        MasterTableView-EditFormSettings-FormMainTableStyle-HorizontalAlign=left HorizontalAlign=Left>
                        <ClientSettings>
                            <Scrolling AllowScroll=true UseStaticHeaders=false  />
                        </ClientSettings>


                     <PagerStyle
                         NextPageText="Suivant" PrevPageText="Précédent" Mode="NextPrevAndNumeric"
                         NextPagesToolTip="Pages suivante"
                         NextPageToolTip="Page suivante"
                         PrevPagesToolTip="Pages précédente"
                         PrevPageToolTip="Page précédente"/>

                     <MasterTableView
                         Name="MTVEntreprise"
                         EditMode="EditForms"
                         DataSourceID="SqlDSEntreprise"
                         NoMasterRecordsText="Il n'y a aucune entreprise."
                         DataKeyNames="NO_ENTREPRISE"
                         CommandItemDisplay="bottom"
                         InsertItemDisplay="Bottom"
                         EditFormSettings-EditColumn-CancelText="Annuler"
                         EditFormSettings-EditColumn-EditText="Modifier"
                         EditFormSettings-EditColumn-InsertText="Ajouter"
                         EditFormSettings-EditColumn-UpdateText="Mise à jour"
                         CommandItemSettings-AddNewRecordText="Ajouter une entreprise"
                         CommandItemSettings-RefreshText="Rafraichir"
                         >

                         <ExpandCollapseColumn>
                             <HeaderStyle Width="20px" />
                         </ExpandCollapseColumn>


                         <Columns>

                            <telerik:GridBoundColumn
                                SortExpression="NO_ENTREPRISE"
                                HeaderText="NO_ENTREPRISE"
                                DataField="NO_ENTREPRISE"
                                UniqueName="NO_ENTREPRISE"
                                visible="false"
                                readonly="true">
                            </telerik:GridBoundColumn>

                            <telerik:GridEditCommandColumn
                                ButtonType="ImageButton"
                                UniqueName="EditCommandColumn">
                            </telerik:GridEditCommandColumn>

                            <telerik:GridButtonColumn
                                ConfirmText="Supprimer cette entreprise?"
                                ConfirmDialogType="RadWindow"
                                ConfirmTitle="Supprimer"
                                ButtonType="ImageButton"
                                CommandName="Delete"
                                Text="Supprimer"
                                UniqueName="DeleteColumnDomaine">

                            </telerik:GridButtonColumn>

                            <telerik:GridBoundColumn
                                SortExpression="NOM_ENTREPRISE"
                                HeaderText="Nom"
                                DataField="NOM_ENTREPRISE"
                                UniqueName="NOM_ENTREPRISE"
                                MaxLength="50">
                            </telerik:GridBoundColumn>

                            <telerik:GridBoundColumn
                                SortExpression="DESCR"
                                HeaderText="Description"
                                DataField="DESCR"
                                UniqueName="DESCR"
                                MaxLength="255">
                            </telerik:GridBoundColumn>

                            <telerik:GridBoundColumn
                                SortExpression="ADRESSE"
                                HeaderText="Adresse"
                                DataField="ADRESSE"
                                UniqueName="ADRESSE"
                                MaxLength="50">
                            </telerik:GridBoundColumn>


                    </MasterTableView>
                        <ClientSettings>
                            <Scrolling AllowScroll="True" />
                        </ClientSettings>
                        <FilterMenu EnableTheming="True" Skin="Office2007">
                            <CollapseAnimation Duration="200" Type="OutQuint" />
                        </FilterMenu>
                </telerik:RadGrid>
            </telerik:RadPageView>

            <telerik:RadPageView ID="RadPageView5" runat="server">
               <telerik:RadGrid
                    ID="RadGrid_Offre_Programme"
                    runat="server"
                    datasourceid="SqlDSEntrepriseOffre"
                    autogeneratecolumns="False"
                    Skin="Office2007"
                    GridLines="None"
                    AllowAutomaticInserts="true"
                    AllowAutomaticUpdates="True"
                    AllowAutomaticDeletes="True"
                    ClientSettings-Scrolling-AllowScroll="true"
                    AllowMultiRowSelection="true"
                    AllowFilteringByColumn=true
                    AllowSorting=true
                    HorizontalAlign=Left
                    OnItemDataBound="RadGrid_Offre_Programme_ItemDataBound"
                    >
                 <ClientSettings  >
                   <Selecting AllowRowSelect="True"/>
                 </ClientSettings>

                <PagerStyle
                    NextPageText="Suivant" PrevPageText="Précédent" Mode="NextPrevAndNumeric"
                    NextPagesToolTip="Pages suivante"
                    NextPageToolTip="Page suivante"
                    PrevPagesToolTip="Pages précédente"
                    PrevPageToolTip="Page précédente"/>



                <MasterTableView
                    Name="MTVEntrepriseOffre"
                    DataSourceID="SqlDSEntrepriseOffre"
                    NoMasterRecordsText="Il n'y a aucune entreprise."
                    DataKeyNames="NO_ENTREPRISE"
                    AllowAutomaticDeletes=false
                    AllowAutomaticInserts=false
                    AllowAutomaticUpdates=false
                    >

                    <ExpandCollapseColumn>
                        <HeaderStyle Width="20px" />
                    </ExpandCollapseColumn>
                    <Columns>
                        <telerik:GridBoundColumn
                            SortExpression="NO_ENTREPRISE"
                            HeaderText="NO ENTREPRISE"
                            DataField="NO_ENTREPRISE"
                            UniqueName="NO_ENTREPRISE"
                            visible="false"
                            readonly="true">
                        </telerik:GridBoundColumn>

                        <telerik:GridBoundColumn
                            SortExpression="NOM_ENTREPRISE"
                            HeaderText="Entreprise"
                            DataField="NOM_ENTREPRISE"
                            UniqueName="NOM_ENTREPRISE"
                            MaxLength="50">
                        </telerik:GridBoundColumn>

                        <telerik:GridBoundColumn
                            SortExpression="DESCR"
                            HeaderText="Description"
                            DataField="DESCR"
                            UniqueName="DESCR"
                            MaxLength="255">
                        </telerik:GridBoundColumn>
                    </Columns>
                    <DetailTables >
                        <telerik:GridTableView
                            TableLayout="Auto"
                            GridLines="Both"
                            ShowFooter=true
                            DataKeyNames="NO_OFFRE"
                            ShowHeader=true
                            DataSourceID="SQLDSOffre"
                            Name="GTVOffre"
                            AllowAutomaticDeletes="true"
                            AllowAutomaticInserts=true
                            AllowAutomaticUpdates="true"
                            CommandItemDisplay="Bottom"
                            CommandItemSettings-AddNewRecordText="Ajouter une offre"
                            CommandItemSettings-RefreshText="rafraichir"
                            EditFormSettings-EditColumn-CancelText="Annuler"
                            EditFormSettings-EditColumn-EditText="Modifier"
                            EditFormSettings-EditColumn-InsertText="Ajouter"
                            EditFormSettings-EditColumn-UpdateText="Mise à jour"
                            EditFormSettings-EditColumn-HeaderButtonType="PushButton"
                            NoDetailRecordsText="Il n'y a aucune offre pour cette entreprise."
                            EditMode="EditForms" >
                            <ParentTableRelation>
                                 <telerik:GridRelationFields DetailKeyField="NO_ENTREPRISE" MasterKeyField="NO_ENTREPRISE" />
                            </ParentTableRelation>

                            <Columns>
                                <telerik:GridClientSelectColumn AutoPostBackOnFilter=false HeaderText="" UniqueName="OffreSelectColumn" ></telerik:GridClientSelectColumn>


                                <telerik:GridBoundColumn
                                    SortExpression="NO_OFFRE"
                                    HeaderText="Num. Réf."
                                    DataField="NO_OFFRE"
                                    UniqueName="NO_OFFRE"
                                    visible="false"
                                    readonly="true">
                                </telerik:GridBoundColumn>

                                <telerik:GridBoundColumn
                                    SortExpression="NO_ENTREPRISE"
                                    DataField="NO_ENTREPRISE"
                                    UniqueName="NO_ENTREPRISE"
                                    visible="false"
                                    readonly="true">
                                </telerik:GridBoundColumn>

                               <telerik:GridButtonColumn
                                    ButtonType="ImageButton"
                                    CommandName="ImprimerOffre"
                                    ItemStyle-Font-Size="Smaller"
                                    UniqueName= "ImprimerOffre"
                                    ImageUrl="./Images/Imprimer.bmp">
                                 </telerik:GridButtonColumn>


                                <telerik:GridEditCommandColumn
                                    ButtonType="ImageButton"
                                    UniqueName="EditCommandColumn">

                                </telerik:GridEditCommandColumn>

                                <telerik:GridButtonColumn
                                    ConfirmText="Supprimer cette offre?"
                                    ConfirmDialogType="RadWindow"
                                    ConfirmTitle="Supprimer"
                                    ButtonType="ImageButton"
                                    CommandName="Delete"
                                    Text="Supprimer"
                                    UniqueName="DeleteColumnDomaine">
                                    <ItemStyle HorizontalAlign="Center"  />
                                </telerik:GridButtonColumn>

                                <telerik:GridBoundColumn
                                    SortExpression="TITRE_OFFRE"
                                    HeaderText="Titre du poste"
                                    DataField="TITRE_OFFRE"
                                    UniqueName="TITRE_OFFRE" MaxLength=60>
                                </telerik:GridBoundColumn>

                                <telerik:GridCheckBoxColumn
                                    SortExpression="COURRIEL_ENVOYE"
                                    HeaderText="Courriels envoyés"
                                    DataField="COURRIEL_ENVOYE"
                                    UniqueName="COURRIEL_ENVOYE">

                                </telerik:GridCheckBoxColumn>

                                <telerik:GridBoundColumn
                                    SortExpression="NB_POSTE_DISPO"
                                    HeaderText="Nbre poste dispo."
                                    DataField="NB_POSTE_DISPO"
                                    UniqueName="NB_POSTE_DISPO">
                                </telerik:GridBoundColumn>

                                <telerik:GridBoundColumn
                                    SortExpression="TACHES_RELIEES"
                                    HeaderText="Tâches reliées"
                                    DataField="TACHES_RELIEES"
                                    UniqueName="TACHES_RELIEES">
                                </telerik:GridBoundColumn>


                            </Columns>
                            <DetailTables>
                                <telerik:GridTableView
                                    Name="MTVOffreProgramme"
                                    DataSourceID="SqlDSOffreProgrammeDomaine"
                                    DataKeyNames="NO_PROGRAMME"
                                    AllowAutomaticDeletes=True
                                    AllowAutomaticInserts=true
                                    AllowAutomaticUpdates=True
                                    CommandItemDisplay="Bottom"
                                    CommandItemSettings-AddNewRecordText="Ajouter un programme"
                                    CommandItemSettings-RefreshText="rafraichir"
                                    EditFormSettings-EditColumn-CancelText="Annuler"
                                    EditFormSettings-EditColumn-InsertText="Ajouter"
                                    EditFormSettings-EditColumn-EditText="Modifier"
                                    EditFormSettings-EditColumn-UpdateText="Mise à jour"
                                    EditFormSettings-EditColumn-HeaderButtonType="PushButton"
                                    NoDetailRecordsText="Il n'y a aucun programme pour cette offre."
                                    EditMode="EditForms" >

                                <ExpandCollapseColumn>
                                    <HeaderStyle Width="20px" />
                                </ExpandCollapseColumn>

                                <ParentTableRelation>
                                    <telerik:GridRelationFields DetailKeyField="NO_OFFRE" MasterKeyField="NO_OFFRE" />
                                </ParentTableRelation>
                                <Columns>
                                    <telerik:GridBoundColumn
                                        SortExpression="NO_PROGRAMME"
                                        HeaderText="NO_PROGRAMME"
                                        DataField="NO_PROGRAMME"
                                        UniqueName="NO_PROGRAMME1"
                                        visible="false"
                                        readonly="true">
                                    </telerik:GridBoundColumn>

                                    <telerik:GridButtonColumn
                                        ConfirmText="Supprimer ce programme pour cette offre?"
                                        ConfirmDialogType="RadWindow"
                                        ConfirmTitle="Supprimer"
                                        ButtonType="ImageButton"
                                        CommandName="Delete"
                                        Text="Supprimer"
                                        UniqueName="DeleteColumnProgrammeUsager">
                                        <ItemStyle HorizontalAlign="Center" CssClass="MyImageButton" />
                                    </telerik:GridButtonColumn>

                                     <telerik:GridDropDownColumn
                                        DataField="NO_PROGRAMME"
                                        ColumnEditorID="0"
                                        EditFormColumnIndex="0"
                                        DataSourceID="SqlDSProgrammeDomaine"
                                        HeaderText="Programme"
                                        ListTextField="PNOM"
                                        ListValueField="NO_PROGRAMME"
                                        UniqueName="NO_PROGRAMME">
                                        <HeaderStyle HorizontalAlign="Center" />
                                        <ItemStyle HorizontalAlign="Center" Width="80px" />
                                     </telerik:GridDropDownColumn>

                                    <telerik:GridBoundColumn
                                        SortExpression="DNOM"
                                        HeaderText="Nom Domaine"
                                        DataField="DNOM"
                                        UniqueName="DNOM"
                                        ReadOnly="true">
                                    </telerik:GridBoundColumn>
                                </Columns>
                            </telerik:GridTableView>
                        </DetailTables>
                    </telerik:GridTableView>
                </DetailTables>
            </MasterTableView>
        </telerik:RadGrid>
        <table align=left>
            <tr>
                <td><asp:CheckBox ID="ChkNonDiplome" Visible=false CssClass="TexteOrange12" runat="server" Text="Inclure les élèves sans diplome" />
                <asp:Button ID="BtnCourriel" Visible=true runat="server" Text="Envoyer un courriel" /></td></tr></table>

    </telerik:RadPageView>
    <telerik:RadPageView ID="RadPageView3" runat="server" >
        <telerik:RadGrid
            ID="RadGrid_offre"
            DataSourceID="SqlDSEntrepriseOffre"
            runat="server"
            autogeneratecolumns="False"
            Skin="Office2007"
            GridLines="None"
            AllowAutomaticInserts="true"
            AllowAutomaticUpdates="True"
            AllowAutomaticDeletes="True"
            AllowMultiRowSelection="true"
            AllowFilteringByColumn=true
            ClientSettings-Scrolling-AllowScroll="true"
            AllowSorting=true
             HorizontalAlign=Left
            >

         <PagerStyle
            NextPageText="Suivant" PrevPageText="Précédent" Mode="NextPrevAndNumeric"
            NextPagesToolTip="Pages suivante"
            NextPageToolTip="Page suivante"
            PrevPagesToolTip="Pages précédente"
            PrevPageToolTip="Page précédente"/>

       <ClientSettings enablepostbackonrowclick= "true" >
            <Selecting AllowRowSelect="True"/>
       </ClientSettings>

         <MasterTableView
            Name="MTVEntrepriseOffre"
            DataSourceID="SqlDSEntrepriseOffre"
            NoMasterRecordsText="Il n'y a aucune entreprise."
            DataKeyNames="NO_ENTREPRISE"
            AllowAutomaticDeletes=false
            AllowAutomaticInserts=false
            AllowAutomaticUpdates=false>

            <ExpandCollapseColumn>
                <HeaderStyle Width="20px" />
            </ExpandCollapseColumn>

            <Columns>
                 <telerik:GridBoundColumn
                    SortExpression="NO_ENTREPRISE"
                    HeaderText="NO ENTREPRISE"
                    DataField="NO_ENTREPRISE"
                    UniqueName="NO_ENTREPRISE"
                    visible="false"
                    readonly="true">
                </telerik:GridBoundColumn>

                <telerik:GridBoundColumn
                    SortExpression="NOM_ENTREPRISE"
                    HeaderText="Entreprise"
                    DataField="NOM_ENTREPRISE"
                    UniqueName="NOM_ENTREPRISE"
                    MaxLength="50">
                </telerik:GridBoundColumn>

                <telerik:GridBoundColumn
                    SortExpression="DESCR"
                    HeaderText="Description"
                    DataField="DESCR"
                    UniqueName="DESCR"
                    MaxLength="255">
                </telerik:GridBoundColumn>
            </Columns>
            <DetailTables >
                <telerik:GridTableView
                    TableLayout="Auto"
                    GridLines="Both"
                    ShowFooter=true
                    DataKeyNames="NO_OFFRE"
                    ShowHeader=true
                    DataSourceID="SQLDSOffre"
                    Name="GTVOffre"
                    AllowAutomaticDeletes="true"
                    AllowAutomaticInserts=true
                    AllowAutomaticUpdates="true"
                    CommandItemDisplay="Bottom"
                    CommandItemSettings-AddNewRecordText="Ajouter une offre"
                    CommandItemSettings-RefreshText="rafraichir"
                    EditFormSettings-EditColumn-CancelText="Annuler"
                    EditFormSettings-EditColumn-EditText="Modifier"
                    EditFormSettings-EditColumn-InsertText="Ajouter"
                    EditFormSettings-EditColumn-UpdateText="Mise à jour"
                    EditFormSettings-EditColumn-HeaderButtonType="PushButton"
                    NoDetailRecordsText="Il n'y a aucune offre pour cette entreprise."
                    EditMode="EditForms" >

                    <ParentTableRelation>
                         <telerik:GridRelationFields DetailKeyField="NO_ENTREPRISE" MasterKeyField="NO_ENTREPRISE" />
                    </ParentTableRelation>

                    <Columns>

                        <telerik:GridBoundColumn
                            SortExpression="NO_OFFRE"
                            HeaderText="Num. Réf."
                            DataField="NO_OFFRE"
                            UniqueName="NO_OFFRE"
                            visible="false"
                            readonly="true">
                        </telerik:GridBoundColumn>

                        <telerik:GridEditCommandColumn
                            ButtonType="ImageButton"
                            UniqueName="EditCommandColumn">
                            <ItemStyle CssClass="MyImageButton" />
                        </telerik:GridEditCommandColumn>

                        <telerik:GridButtonColumn
                            ConfirmText="Supprimer cette offre?"
                            ConfirmDialogType="RadWindow"
                            ConfirmTitle="Supprimer"
                            ButtonType="ImageButton"
                            CommandName="Delete"
                            Text="Supprimer"
                            UniqueName="DeleteColumnDomaine">
                            <ItemStyle HorizontalAlign="Center" CssClass="MyImageButton" />
                        </telerik:GridButtonColumn>

                        <telerik:GridBoundColumn
                            SortExpression="TITRE_OFFRE"
                            HeaderText="Titre du poste"
                            DataField="TITRE_OFFRE"
                            UniqueName="TITRE_OFFRE" MaxLength=60>
                        </telerik:GridBoundColumn>

                        <telerik:GridBoundColumn
                            SortExpression="NB_POSTE_DISPO"
                            HeaderText="Nbre poste dispo."
                            DataField="NB_POSTE_DISPO"
                            UniqueName="NB_POSTE_DISPO">
                        </telerik:GridBoundColumn>



                    </Columns>

                 </telerik:GridTableView>
             </DetailTables>
         </MasterTableView>
         <ClientSettings>
             <Selecting AllowRowSelect="True"></Selecting>
         </ClientSettings>
     </telerik:RadGrid>
 </telerik:RadPageView>


    </telerik:RadMultiPage>
    </div>
     <header:b ID="A2" runat="server" />
    </form>
</body>
</html>

Imports Telerik.Web.UI
Imports System.Drawing
Imports System
Imports System.Data.SqlClient
Imports System.Data
Imports System.Collections
Imports System.ComponentModel
Imports System.Web
Imports System.Web.SessionState
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.Web.UI.HtmlControls
Imports System.Configuration
Imports System.Web.HttpUtility
Partial Public Class _Default
    Inherits System.Web.UI.Page
    Private gridMessage As String = Nothing
    Public L_NO_DOMAINE As Integer
    Public L_NOM_DOMAINE As String
    Public L_NO_ENTREPRISE As Integer
    Public L_CV As String
    Public L_LETTRE As String
    Public L_NO_OFFRE As Integer
    Public fonctionsvbs As New fonctionsvb
    Public Conn As SqlConnection = New SqlConnection(fonctionsvbs.ConnectionString)
    Public ConnJadeAdulte As SqlConnection = New SqlConnection(fonctionsvbs.ConnectionStringJadeAdulte)
    Public emailAdmin As String = fonctionsvbs.EmailAdmin
    Public NO_OFFRE_PROGRAMME_INSERT As Integer
    Public NO_PROGRAMME_OFFRE_INSERT As Integer
    Public temp_No_Offre As Integer
    Public temp_No_Programme As Integer
    Public CodePermInvalide As String
    Public dt As DataTable
    Public liste As New List(Of String)
    Public listcount As Integer

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub



    Private Sub RadGrid_Entreprise_DeleteCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_Entreprise.DeleteCommand
        Dim item As GridDataItem
        Dim temp_no_entreprise As String
        item = CType(e.Item, GridDataItem)

        If (e.Item.OwnerTableView.Name = "MTVEntreprise") Then

            item = DirectCast(e.Item, GridDataItem)
            temp_no_entreprise = item("NO_ENTREPRISE").Text.ToString()

            fonctionsvbs.LogInsert(Session("sDemandeur"), "Supprimer une entreprise", Session("sDemandeur") & " a supprimé l'entreprise no " & temp_no_entreprise)
        End If

    End Sub


    Public Sub RadGrid_Entreprise_ItemDataBound(ByVal sender As Object, ByVal e As Telerik.Web.UI.GridItemEventArgs) Handles RadGrid_Entreprise.ItemDataBound

        If TypeOf e.Item Is GridEditableItem AndAlso e.Item.IsInEditMode Then
            Dim editItem As GridEditableItem = DirectCast(e.Item, GridEditableItem)
            'Dim Uploadbx As FileUpload = DirectCast(editItem("TemplateColumn").FindControl("LOGO"), FileUpload)
            'Uploadbx.Width = 400
            'For TemplateColumns

            Dim txtbxNomEntreprise As TextBox = DirectCast(editItem("NOM_ENTREPRISE").Controls(0), TextBox)
            txtbxNomEntreprise.Width = 325
            Dim txtbxDescr As TextBox = DirectCast(editItem("DESCR").Controls(0), TextBox)
            txtbxDescr.Width = 325
            Dim txtbxAdresse As TextBox = DirectCast(editItem("ADRESSE").Controls(0), TextBox)
            txtbxAdresse.Width = 325
            Dim txtbxVille As TextBox = DirectCast(editItem("VILLE").Controls(0), TextBox)
            txtbxVille.Width = 250
            Dim txtbxRespCourriel As TextBox = DirectCast(editItem("RESP_COURRIEL").Controls(0), TextBox)
            txtbxRespCourriel.Width = 325
            Dim txtbxRespNom As TextBox = DirectCast(editItem("RESP_NOM").Controls(0), TextBox)
            txtbxRespNom.Width = 250
            Dim txtbxSiteWeb As TextBox = DirectCast(editItem("SITE_WEB").Controls(0), TextBox)
            txtbxSiteWeb.Width = 325
            ' (For GridBoundColumns)
        End If
    End Sub

    Private Sub RadGrid_Entreprise_ItemInserted(ByVal source As Object, ByVal e As Telerik.Web.UI.GridInsertedEventArgs) Handles RadGrid_Entreprise.ItemInserted
        Dim strsqlEntreprise As String
        Dim cmdEntreprise As SqlCommand
        Dim myDAEntreprise As SqlDataAdapter
        Dim dsEntreprise As New DataSet
        If "MTVEntreprise".Equals(e.Item.OwnerTableView.Name) Then
            strsqlEntreprise = "SELECT * FROM T_ENTREPRISE ORDER BY NO_ENTREPRISE DESC"
            cmdEntreprise = New SqlCommand(strsqlEntreprise, Conn)
            myDAEntreprise = New SqlDataAdapter(cmdEntreprise)
            Conn.Open()
            myDAEntreprise.Fill(dsEntreprise)
            Conn.Close()

            fonctionsvbs.LogInsert(Session("sDemandeur"), "Ajouter une entreprise", Session("sDemandeur") & " a ajouté l'entreprise no " & dsEntreprise.Tables(0).Rows(0).Item("NO_ENTREPRISE"))
        End If


    End Sub

    Private Sub RadGrid_Entreprise_UpdateCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_Entreprise.UpdateCommand
        Dim item As GridEditFormItem
        item = CType(e.Item, GridEditFormItem)
        Dim dataItem As GridEditFormItem = DirectCast(e.Item, GridEditFormItem)
        Dim txtbxNomEntreprise As TextBox = DirectCast(dataItem("NOM_ENTREPRISE").Controls(0), TextBox)

        fonctionsvbs.LogInsert(Session("sDemandeur"), "Informations d''entreprise modifiées", Session("sDemandeur") & " a modifié les informations de l'entreprise " & txtbxNomEntreprise.Text)
    End Sub


    Private Sub RadGrid_offre_DeleteCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_offre.DeleteCommand
        Dim dir_name As String
        Dim temp_Code_permanent As String
        Dim temp_No_Offre As Integer
        Dim item As GridDataItem
        item = CType(e.Item, GridDataItem)
        If (e.Item.OwnerTableView.Name = "MTVPostulant") Then


            item = DirectCast(e.Item, GridDataItem)
            temp_Code_permanent = item("CODE_PERMANENT").Text.ToString()
            temp_No_Offre = item("NO_OFFRE").Text.ToString()

            fonctionsvbs.LogInsert(Session("sDemandeur"), "Supprimer une demande", Session("sDemandeur") & " a supprimé la demande de " & temp_Code_permanent & " sur l'offre no " & temp_No_Offre)

            dir_name = Server.MapPath(".\Offre\" & temp_No_Offre & "\" & temp_Code_permanent)
            If My.Computer.FileSystem.DirectoryExists(dir_name) = True Then
                My.Computer.FileSystem.DeleteDirectory(dir_name, FileIO.DeleteDirectoryOption.DeleteAllContents)
            Else
                'MsgBox("Le dossier à supprimer n'existe pas")
            End If
        ElseIf (e.Item.OwnerTableView.Name = "GTVOffre") Then
            item = DirectCast(e.Item, GridDataItem)
            temp_No_Offre = item("NO_OFFRE").Text.ToString()

            fonctionsvbs.LogInsert(Session("sDemandeur"), "Supprimer une offre", Session("sDemandeur") & " a supprimé l'offre no " & temp_No_Offre)

            dir_name = Server.MapPath(".\Offre\" & temp_No_Offre)
            If My.Computer.FileSystem.DirectoryExists(dir_name) = True Then
                My.Computer.FileSystem.DeleteDirectory(dir_name, FileIO.DeleteDirectoryOption.DeleteAllContents)
            Else
                'MsgBox("Le dossier à supprimer n'existe pas")
            End If
        End If
    End Sub


    Private Sub RadGrid_offre_InsertCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_offre.InsertCommand
        Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
        Dim item As GridEditFormItem
        item = CType(e.Item, GridEditFormItem)
        If "GTVOffre".Equals(e.Item.OwnerTableView.Name) Then
            L_NO_ENTREPRISE = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NO_ENTREPRISE").ToString()
            Me.SqlDSOffre.InsertParameters("NO_ENTREPRISE").DefaultValue = L_NO_ENTREPRISE

            Dim dataItem As GridEditFormItem = DirectCast(e.Item, GridEditFormItem)

            Dim DatePickDateDebut As RadDatePicker = DirectCast(item("TemplateColumnDateDebut").FindControl("DPicker_DATE_DEBUT"), RadDatePicker)
            If Not (DatePickDateDebut.SelectedDate Is Nothing) Then
                Me.SqlDSOffre.InsertParameters("DATE_DEBUT").DefaultValue = DatePickDateDebut.SelectedDate
            End If

            Dim DatePickDateFin As RadDatePicker = DirectCast(item("TemplateColumnDateFin").FindControl("DPicker_DATE_FIN"), RadDatePicker)
            If Not (DatePickDateFin.SelectedDate Is Nothing) Then
                Me.SqlDSOffre.InsertParameters("DATE_FIN").DefaultValue = DatePickDateFin.SelectedDate
            End If

            Dim DatePickDateDebutEmploi As RadDatePicker = DirectCast(item("TemplateColumnDateDebutEmploi").FindControl("DPicker_DATE_DEBUT_EMPLOI"), RadDatePicker)
            If Not (DatePickDateDebutEmploi.SelectedDate Is Nothing) Then
                Me.SqlDSOffre.InsertParameters("DATE_DEBUT_EMPLOI").DefaultValue = DatePickDateDebutEmploi.SelectedDate
            End If

        End If
    End Sub

    Private Sub RadGrid_offre_ItemDataBound(ByVal sender As Object, ByVal e As Telerik.Web.UI.GridItemEventArgs) Handles RadGrid_offre.ItemDataBound


        If (TypeOf e.Item Is GridEditableItem AndAlso e.Item.IsInEditMode) And (e.Item.OwnerTableView.Name = "GTVOffre") Then
            Dim editItem As GridEditableItem = DirectCast(e.Item, GridEditableItem)
            'For TemplateColumns
            'Dim Uploadbx As FileUpload = DirectCast(editItem("TemplateColumn").FindControl("LOGO"), FileUpload)
            'Uploadbx.Width = 400

            'For GridBoundColumns
            Dim txtbxTitreOffre As TextBox = DirectCast(editItem("TITRE_OFFRE").Controls(0), TextBox)
            txtbxTitreOffre.Width = 250
            Dim txtbxTachesReliees As TextBox = DirectCast(editItem("TACHES_RELIEES").Controls(0), TextBox)
            txtbxTachesReliees.Width = 325
            txtbxTachesReliees.TextMode = TextBoxMode.MultiLine
            Dim txtbxDescriptionComplementaire As TextBox = DirectCast(editItem("DESCRIPTION_COMPLEMENTAIRE").Controls(0), TextBox)
            txtbxDescriptionComplementaire.Width = 325
            txtbxDescriptionComplementaire.TextMode = TextBoxMode.MultiLine
            Dim txtbxCompetences As TextBox = DirectCast(editItem("COMPETENCES").Controls(0), TextBox)
            txtbxCompetences.Width = 325
            txtbxCompetences.TextMode = TextBoxMode.MultiLine
            Dim txtbxExigences As TextBox = DirectCast(editItem("EXIGENCES").Controls(0), TextBox)
            txtbxExigences.Width = 325
            txtbxExigences.TextMode = TextBoxMode.MultiLine
            Dim txtbxAptitudes As TextBox = DirectCast(editItem("APTITUDES").Controls(0), TextBox)
            txtbxAptitudes.Width = 325
            txtbxAptitudes.TextMode = TextBoxMode.MultiLine
            Dim txtbxTypeEmploi As TextBox = DirectCast(editItem("TYPE_EMPLOI").Controls(0), TextBox)
            txtbxTypeEmploi.Width = 325
            Dim txtbxNbHeureSemaine As TextBox = DirectCast(editItem("NB_HEURE_SEMAINE").Controls(0), TextBox)
            txtbxNbHeureSemaine.Width = 325
            Dim txtbxRespNom As TextBox = DirectCast(editItem("RESP_NOM").Controls(0), TextBox)
            txtbxNbHeureSemaine.Width = 250
            Dim txtbxRespPrenom As TextBox = DirectCast(editItem("RESP_PRENOM").Controls(0), TextBox)
            txtbxNbHeureSemaine.Width = 250
            Dim txtbxRespCourriel As TextBox = DirectCast(editItem("RESP_COURRIEL").Controls(0), TextBox)
            txtbxRespCourriel.Width = 250
            Dim txtbxDemandeur As TextBox = DirectCast(editItem("DEMANDEUR").Controls(0), TextBox)
            txtbxDemandeur.Width = 325
            Dim txtbxSalaireOffert As TextBox = DirectCast(editItem("SALAIRE_OFFERT").Controls(0), TextBox)
            txtbxSalaireOffert.Width = 325
        End If

    End Sub

    Private Sub RadGrid_offre_ItemInserted(ByVal source As Object, ByVal e As Telerik.Web.UI.GridInsertedEventArgs) Handles RadGrid_offre.ItemInserted
        Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
        Dim strsqlOffre As String
        Dim cmdOFfre As SqlCommand
        Dim myDAOffre As SqlDataAdapter
        Dim dsOffre As New DataSet
        Dim tempnomEntreprise As String
        If "GTVOffre".Equals(e.Item.OwnerTableView.Name) Then

            strsqlOffre = "SELECT * FROM T_OFFRE ORDER BY NO_OFFRE DESC"
            cmdOFfre = New SqlCommand(strsqlOffre, Conn)
            myDAOffre = New SqlDataAdapter(cmdOFfre)
            Conn.Open()
            myDAOffre.Fill(dsOffre)
            Conn.Close()
            tempnomEntreprise = fonctionsvbs.TrouveNomEntreprise("NoOffre", dsOffre.Tables(0).Rows(0).Item("NO_OFFRE"))

            fonctionsvbs.LogInsert(Session("sDemandeur"), "Ajouter une offre", Session("sDemandeur") & " a ajouté l'offre " & dsOffre.Tables(0).Rows(0).Item("NO_OFFRE"), tempnomEntreprise)
        End If


    End Sub

    Private Sub RadGrid_offre_UpdateCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_offre.UpdateCommand
        Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
        If "GTVOffre".Equals(e.Item.OwnerTableView.Name) Then
            L_NO_ENTREPRISE = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NO_ENTREPRISE").ToString()
            Me.SqlDSOffre.UpdateParameters("NO_ENTREPRISE").DefaultValue = L_NO_ENTREPRISE

            Dim item As GridEditFormItem
            item = CType(e.Item, GridEditFormItem)
            Dim dataItem As GridEditFormItem = DirectCast(e.Item, GridEditFormItem)

            Dim DatePickDateDebut As RadDatePicker = DirectCast(item("TemplateColumnDateDebut").FindControl("DPicker_DATE_DEBUT"), RadDatePicker)
            If Not (DatePickDateDebut.SelectedDate Is Nothing) Then
                Me.SqlDSOffre.UpdateParameters("DATE_DEBUT").DefaultValue = DatePickDateDebut.SelectedDate
            End If

            Dim DatePickDateFin As RadDatePicker = DirectCast(item("TemplateColumnDateFin").FindControl("DPicker_DATE_FIN"), RadDatePicker)
            If Not (DatePickDateFin.SelectedDate Is Nothing) Then
                Me.SqlDSOffre.UpdateParameters("DATE_FIN").DefaultValue = DatePickDateFin.SelectedDate
            End If


            Dim DatePickDateDebutEmploi As RadDatePicker = DirectCast(item("TemplateColumnDateDebutEmploi").FindControl("DPicker_DATE_DEBUT_EMPLOI"), RadDatePicker)
            If Not (DatePickDateDebutEmploi.SelectedDate Is Nothing) Then
                Me.SqlDSOffre.UpdateParameters("DATE_DEBUT_EMPLOI").DefaultValue = DatePickDateDebutEmploi.SelectedDate
            End If
            Dim temp_No_Offre As TextBox = DirectCast(item("NO_OFFRE").Controls(0), TextBox)

            fonctionsvbs.LogInsert(Session("sDemandeur"), "Modifier une offre", Session("sDemandeur") & " a modifié l'offre no " & temp_No_Offre.Text)
        ElseIf "MTVPostulant".Equals(e.Item.OwnerTableView.Name) Then
            Dim L_NO_Offre = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NO_OFFRE").ToString()
            Dim strsqlUpdate As String
            Dim item As GridEditFormItem
            Dim temp_no_Demande As String
            Dim temp_no_offre As Integer
            item = CType(e.Item, GridEditFormItem)

            Dim dataItem As GridEditFormItem = DirectCast(e.Item, GridEditFormItem)
            temp_no_Demande = item("NO_DEMANDE").Text.ToString
            Dim codePermanent As TextBox = DirectCast(item("CODE_PERMANENT").Controls(0), TextBox)
            strsqlUpdate = ""
            strsqlUpdate = "UPDATE [T_DEMANDE] SET [STATUS] = ? "

            Dim FileUpLettre As FileUpload = DirectCast(item("TemplateColumnLETTRE_PRESENTATION").FindControl("LETTRE_PRESENTATION"), FileUpload)
            'Dim Uploadbx As FileUpload = DirectCast(editItem("TemplateColumn").FindControl("LOGO"), FileUpload)

            L_LETTRE = FileUpLettre.FileName
            If L_LETTRE <> "" Then
                Me.SqlDSPostulant.UpdateParameters("LETTRE_PRESENTATION").DefaultValue = L_LETTRE

                NomFichier(FileUpLettre, codePermanent.Text, "D", "lettre")
                strsqlUpdate = strsqlUpdate & ",[LETTRE_PRESENTATION]=? "
                SauvegarderFichier(FileUpLettre, "lettre", L_NO_Offre, codePermanent.Text)
            End If

            Dim FileUpcv As FileUpload = DirectCast(item("TemplateColumnCV").FindControl("CV"), FileUpload)
            L_CV = FileUpcv.FileName
            If L_CV <> "" Then
                Me.SqlDSPostulant.UpdateParameters("NOM_CV").DefaultValue = L_CV

                NomFichier(FileUpcv, codePermanent.Text, "D", "cv")
                strsqlUpdate = strsqlUpdate & ",[NOM_CV]=? "
                SauvegarderFichier(FileUpcv, "cv", L_NO_Offre, codePermanent.Text)
            End If

            strsqlUpdate = strsqlUpdate & "WHERE NO_DEMANDE=?"

            SqlDSPostulant.UpdateCommand = strsqlUpdate
            temp_no_offre = parentItem("NO_OFFRE").Text
            fonctionsvbs.LogInsert(Session("sDemandeur"), "Modifier une demande", Session("sDemandeur") & " a modifié la demande de " & codePermanent.Text & " sur l'offre no " & temp_no_offre)
        End If
    End Sub

    Protected Function SauvegarderFichier(ByVal sNomFichier As FileUpload, ByVal sType As String, ByVal sNoOffre As Integer, ByVal scodepermanent As String)

        If sNomFichier.HasFile = True Then
            Dim filepath As String = sNomFichier.PostedFile.FileName
            Dim pat As String = "\\(?:.+)\\(.+)\.(.+)"
            Dim r As Regex = New Regex(pat)
            'run
            Dim m As Match = r.Match(filepath)
            Dim file_ext As String = m.Groups(2).Captures(0).ToString()
            Dim filename As String = m.Groups(1).Captures(0).ToString()
            Dim file As String = filename & "." & file_ext

            Dim dir_name As String = Server.MapPath(".\Offre\" & sNoOffre & "\" & scodepermanent & "\")
            If System.IO.Directory.Exists(dir_name) Then
                'Ne rien faire
            Else
                MkDir(Server.MapPath(".\Offre\" & sNoOffre & "\" & scodepermanent & "\"))
            End If


            'save the file to the server
            sNomFichier.PostedFile.SaveAs(Server.MapPath(".\Offre\" & sNoOffre & "\" & scodepermanent & "\") & file)

            Return file
        Else
            Return ""
        End If
    End Function

    Protected Function NomFichier(ByVal NomUpload As FileUpload, ByVal CODE_PERMANENT As String, ByVal LettreTable As String, ByVal sPath As String)

        If NomUpload.HasFile = True Then
            Dim filepath As String = NomUpload.PostedFile.FileName
            Dim pat As String = "\\(?:.+)\\(.+)\.(.+)"
            Dim r As Regex = New Regex(pat)
            'run
            Dim m As Match = r.Match(filepath)
            Dim file_ext As String = m.Groups(2).Captures(0).ToString()
            Dim filename As String = LettreTable & CODE_PERMANENT
            Dim file As String = filename & "." & file_ext

            'save the file to the server
            NomUpload.PostedFile.SaveAs(Server.MapPath(".\" & sPath & "\") & file)
            Return file
        Else
            Return ""
        End If
    End Function



    Private Sub RadGrid_Offre_Programme_DeleteCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_Offre_Programme.DeleteCommand
        Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
        Dim masterPrKey As String
        Dim detailPrKey As Integer
        Dim strsqlprogramme As String
        Dim cmdProgramme As SqlCommand
        Dim myDAProgramme As New SqlDataAdapter
        Dim dsProgramme As New DataSet


        If (e.Item.OwnerTableView.Name = "MTVOffreProgramme") Then

            detailPrKey = CType(e.Item.OwnerTableView.DataKeyValues(e.Item.ItemIndex)("NO_PROGRAMME"), Integer)
            masterPrKey = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NO_OFFRE").ToString()

            Me.SqlDSOffreProgrammeDomaine.DeleteParameters("NO_OFFRE").DefaultValue = masterPrKey
            Me.SqlDSOffreProgrammeDomaine.DeleteParameters("NO_PROGRAMME").DefaultValue = detailPrKey

            strsqlprogramme = "SELECT * FROM T_PROGRAMME WHERE NO_PROGRAMME = " & detailPrKey
            cmdProgramme = New SqlCommand(strsqlprogramme, Conn)
            myDAProgramme = New SqlDataAdapter(cmdProgramme)
            Conn.Open()
            myDAProgramme.Fill(dsProgramme)
            Conn.Close()

            fonctionsvbs.LogInsert(Session("sDemandeur"), "Supprimer un programme à une offre", Session("sDemandeur") & " a supprimé le programme " & dsProgramme.Tables(0).Rows(0).Item("NOM") & " à l'offre " & masterPrKey)
        ElseIf (e.Item.OwnerTableView.Name = "GTVOffre") Then
            masterPrKey = CType(e.Item.OwnerTableView.DataKeyValues(e.Item.ItemIndex)("NO_OFFRE"), Integer)
            fonctionsvbs.LogInsert(Session("sDemandeur"), "Supprimer une offre", Session("sDemandeur") & " a supprimé l'offre " & masterPrKey)
        End If
    End Sub

    Private Sub RadGrid_Offre_Programme_InsertCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_Offre_Programme.InsertCommand
        Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)

        Dim item As GridEditFormItem
        item = CType(e.Item, GridEditFormItem)
        If "MTVOffreProgramme".Equals(e.Item.OwnerTableView.Name) Then
            Dim strsqlprogramme As String
            Dim cmdProgramme As SqlCommand
            Dim myDAProgramme As New SqlDataAdapter
            Dim strsqlprogrammeSelect As String
            Dim cmdProgrammeSelect As SqlCommand
            Dim myDAProgrammeSelect As New SqlDataAdapter
            Dim dsProgrammeSelect As New DataSet
            Dim dsProgramme2 As New DataSet
            Dim nomprogramme As String
            Dim nomprogramme1 As String
            Dim nooffre As Integer = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NO_OFFRE").ToString()

            Dim cbProgramme As RadComboBox = DirectCast(item("NO_PROGRAMME").Controls(0), RadComboBox)

            Me.SqlDSOffreProgrammeDomaine.InsertParameters("NO_OFFRE").DefaultValue = nooffre
            Me.SqlDSOffreProgrammeDomaine.InsertParameters("NO_PROGRAMME").DefaultValue = cbProgramme.SelectedValue

            strsqlprogrammeSelect = "SELECT EXIGENCES FROM T_OFFRE WHERE NO_OFFRE=" & nooffre
            cmdProgrammeSelect = New SqlCommand(strsqlprogrammeSelect, Conn)
            myDAProgrammeSelect = New SqlDataAdapter(cmdProgrammeSelect)
            Conn.Open()
            myDAProgrammeSelect.Fill(dsProgrammeSelect)
            Conn.Close()

            NO_OFFRE_PROGRAMME_INSERT = nooffre
            NO_PROGRAMME_OFFRE_INSERT = cbProgramme.SelectedValue
            nomprogramme = cbProgramme.Text
            nomprogramme1 = Replace(nomprogramme, "'", "''")
            If dsProgrammeSelect.Tables(0).Rows(0).Item("EXIGENCES") Is DBNull.Value Then
                strsqlprogramme = "UPDATE [T_OFFRE] SET [EXIGENCES] ='" & nomprogramme1 & "' WHERE NO_OFFRE=" & nooffre
            Else
                strsqlprogramme = "UPDATE [T_OFFRE] SET [EXIGENCES] = EXIGENCES + '<br>' + '" & nomprogramme1 & "' WHERE NO_OFFRE=" & nooffre
            End If

            cmdProgramme = New SqlCommand(strsqlprogramme, Conn)
            myDAProgramme = New SqlDataAdapter(cmdProgramme)
            Conn.Open()
            myDAProgramme.Fill(dsProgramme2)
            Conn.Close()


        ElseIf "GTVOffre".Equals(e.Item.OwnerTableView.Name) Then
            Dim noEntreprise As Integer = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NO_ENTREPRISE").ToString()

            Me.SqlDSOffre.InsertParameters("NO_ENTREPRISE").DefaultValue = noEntreprise

            Dim DatePickDateDebut As RadDatePicker = DirectCast(item("TemplateColumnDateDebut").FindControl("DPicker_DATE_DEBUT"), RadDatePicker)
            If Not (DatePickDateDebut.SelectedDate Is Nothing) Then
                Me.SqlDSOffre.InsertParameters("DATE_DEBUT").DefaultValue = DatePickDateDebut.SelectedDate
            End If

            Dim DatePickDateFin As RadDatePicker = DirectCast(item("TemplateColumnDateFin").FindControl("DPicker_DATE_FIN"), RadDatePicker)
            If Not (DatePickDateFin.SelectedDate Is Nothing) Then
                Me.SqlDSOffre.InsertParameters("DATE_FIN").DefaultValue = DatePickDateFin.SelectedDate
            End If


            Dim DatePickDateDebutEmploi As RadDatePicker = DirectCast(item("TemplateColumnDateDebutEmploi").FindControl("DPicker_DATE_DEBUT_EMPLOI"), RadDatePicker)
            If Not (DatePickDateDebutEmploi.SelectedDate Is Nothing) Then
                Me.SqlDSOffre.InsertParameters("DATE_DEBUT_EMPLOI").DefaultValue = DatePickDateDebutEmploi.SelectedDate
            End If
            'fonctionsvbs.LogInsert(Session("sDemandeur"), "Ajouter un programme à une offre", Session("sDemandeur") & " a ajouté le programme " & cbProgramme.Text & " à l'offre" & nooffre)
        End If
    End Sub

    Private Sub RadGrid_Offre_Programme_ItemCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_Offre_Programme.ItemCommand
        Dim item As GridDataItem
        Dim NoOffre As String
        Dim lien As String
        If e.CommandName = "ImprimerOffre" Then
            item = CType(e.Item, GridDataItem)
            NoOffre = item("NO_OFFRE").Text
            lien = "FEN_IMPRIMER_OFFRE.aspx?NoOffre=" & NoOffre
            Response.Redirect(lien)
        End If

    End Sub

    Public Sub RadGrid_Offre_Programme_ItemDataBound(ByVal sender As Object, ByVal e As Telerik.Web.UI.GridItemEventArgs) Handles RadGrid_Offre_Programme.ItemDataBound

        If (TypeOf e.Item Is GridEditFormInsertItem) AndAlso (e.Item.OwnerTableView.IsItemInserted = True) AndAlso (e.Item.OwnerTableView.Name = "GTVOffre") Then
            Dim insertItem As GridEditFormInsertItem = DirectCast(e.Item, GridEditFormInsertItem)
            Dim chkbx As CheckBox = DirectCast(insertItem("COURRIEL_ENVOYE").Controls(0), CheckBox)
            insertItem("COURRIEL_ENVOYE").Parent.Visible = False
            chkbx.Style.Add("display", "none")

            'Dim editItem As GridEditableItem = DirectCast(e.Item, GridEditableItem)
            Dim txtbxTitreOffre As TextBox = DirectCast(insertItem("TITRE_OFFRE").Controls(0), TextBox)
            txtbxTitreOffre.Width = 250
            Dim txtbxTachesReliees As TextBox = DirectCast(insertItem("TACHES_RELIEES").Controls(0), TextBox)
            txtbxTachesReliees.Width = 325
            txtbxTachesReliees.TextMode = TextBoxMode.MultiLine
            txtbxTachesReliees.MaxLength = 255
            Dim txtbxDescriptionComplementaire As TextBox = DirectCast(insertItem("DESCRIPTION_COMPLEMENTAIRE").Controls(0), TextBox)
            txtbxDescriptionComplementaire.Width = 325
            txtbxDescriptionComplementaire.TextMode = TextBoxMode.MultiLine
            Dim txtbxCompetences As TextBox = DirectCast(insertItem("COMPETENCES").Controls(0), TextBox)
            txtbxCompetences.Width = 325
            txtbxCompetences.TextMode = TextBoxMode.MultiLine
            Dim txtbxExigences As TextBox = DirectCast(insertItem("EXIGENCES").Controls(0), TextBox)
            txtbxExigences.Width = 325
            txtbxExigences.TextMode = TextBoxMode.MultiLine
            Dim txtbxAptitudes As TextBox = DirectCast(insertItem("APTITUDES").Controls(0), TextBox)
            txtbxAptitudes.Width = 325
            txtbxAptitudes.TextMode = TextBoxMode.MultiLine
            Dim txtbxTypeEmploi As TextBox = DirectCast(insertItem("TYPE_EMPLOI").Controls(0), TextBox)
            txtbxTypeEmploi.Width = 325
            Dim txtbxNbHeureSemaine As TextBox = DirectCast(insertItem("NB_HEURE_SEMAINE").Controls(0), TextBox)
            txtbxNbHeureSemaine.Width = 325
            Dim txtbxRespNom As TextBox = DirectCast(insertItem("RESP_NOM").Controls(0), TextBox)
            txtbxNbHeureSemaine.Width = 250
            Dim txtbxRespPrenom As TextBox = DirectCast(insertItem("RESP_PRENOM").Controls(0), TextBox)
            txtbxNbHeureSemaine.Width = 250
            Dim txtbxRespCourriel As TextBox = DirectCast(insertItem("RESP_COURRIEL").Controls(0), TextBox)
            txtbxRespCourriel.Width = 250
            Dim txtbxDemandeur As TextBox = DirectCast(insertItem("DEMANDEUR").Controls(0), TextBox)
            txtbxDemandeur.Width = 325
            Dim txtbxSalaireOffert As TextBox = DirectCast(insertItem("SALAIRE_OFFERT").Controls(0), TextBox)
            txtbxSalaireOffert.Width = 325


        End If
        If (TypeOf e.Item Is GridEditableItem AndAlso e.Item.IsInEditMode) And (e.Item.OwnerTableView.Name = "GTVOffre") Then

            Dim editItem As GridEditableItem = DirectCast(e.Item, GridEditableItem)
            Dim txtbxTitreOffre As TextBox = DirectCast(editItem("TITRE_OFFRE").Controls(0), TextBox)
            txtbxTitreOffre.Width = 250
            Dim txtbxTachesReliees As TextBox = DirectCast(editItem("TACHES_RELIEES").Controls(0), TextBox)
            txtbxTachesReliees.Width = 325
            txtbxTachesReliees.TextMode = TextBoxMode.MultiLine
            txtbxTachesReliees.MaxLength = 255
            Dim txtbxDescriptionComplementaire As TextBox = DirectCast(editItem("DESCRIPTION_COMPLEMENTAIRE").Controls(0), TextBox)
            txtbxDescriptionComplementaire.Width = 325
            txtbxDescriptionComplementaire.TextMode = TextBoxMode.MultiLine
            Dim txtbxCompetences As TextBox = DirectCast(editItem("COMPETENCES").Controls(0), TextBox)
            txtbxCompetences.Width = 325
            txtbxCompetences.TextMode = TextBoxMode.MultiLine
            Dim txtbxExigences As TextBox = DirectCast(editItem("EXIGENCES").Controls(0), TextBox)
            txtbxExigences.Width = 325
            txtbxExigences.TextMode = TextBoxMode.MultiLine
            Dim txtbxAptitudes As TextBox = DirectCast(editItem("APTITUDES").Controls(0), TextBox)
            txtbxAptitudes.Width = 325
            txtbxAptitudes.TextMode = TextBoxMode.MultiLine
            Dim txtbxTypeEmploi As TextBox = DirectCast(editItem("TYPE_EMPLOI").Controls(0), TextBox)
            txtbxTypeEmploi.Width = 325
            Dim txtbxNbHeureSemaine As TextBox = DirectCast(editItem("NB_HEURE_SEMAINE").Controls(0), TextBox)
            txtbxNbHeureSemaine.Width = 325
            Dim txtbxRespNom As TextBox = DirectCast(editItem("RESP_NOM").Controls(0), TextBox)
            txtbxNbHeureSemaine.Width = 250
            Dim txtbxRespPrenom As TextBox = DirectCast(editItem("RESP_PRENOM").Controls(0), TextBox)
            txtbxNbHeureSemaine.Width = 250
            Dim txtbxRespCourriel As TextBox = DirectCast(editItem("RESP_COURRIEL").Controls(0), TextBox)
            txtbxRespCourriel.Width = 250
            Dim txtbxDemandeur As TextBox = DirectCast(editItem("DEMANDEUR").Controls(0), TextBox)
            txtbxDemandeur.Width = 325
            Dim txtbxSalaireOffert As TextBox = DirectCast(editItem("SALAIRE_OFFERT").Controls(0), TextBox)
            txtbxSalaireOffert.Width = 325

        End If




    End Sub


    Private Sub RadGrid_Offre_Programme_ItemInserted(ByVal source As Object, ByVal e As Telerik.Web.UI.GridInsertedEventArgs) Handles RadGrid_Offre_Programme.ItemInserted
        Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)


        Dim strsqlProgramme As String
        Dim cmdProgramme As SqlCommand
        Dim myDAProgramme As SqlDataAdapter
        Dim dsProgramme As New DataSet
        Dim strsqlOffre As String
        Dim cmdOffre As SqlCommand
        Dim myDAOffre As SqlDataAdapter
        Dim dsOffre As New DataSet
        Dim tempnomEntreprise As String
        If "MTVOffreProgramme".Equals(e.Item.OwnerTableView.Name) Then
            strsqlProgramme = "SELECT * FROM T_PROGRAMME WHERE NO_PROGRAMME = " & NO_PROGRAMME_OFFRE_INSERT
            cmdProgramme = New SqlCommand(strsqlProgramme, Conn)
            myDAProgramme = New SqlDataAdapter(cmdProgramme)
            Conn.Open()
            myDAProgramme.Fill(dsProgramme)
            Conn.Close()

            fonctionsvbs.LogInsert(Session("sDemandeur"), "Ajouter un programme à une offre", Session("sDemandeur") & " a ajouté le programme " & dsProgramme.Tables(0).Rows(0).Item("NOM") & " à l'offre no " & NO_OFFRE_PROGRAMME_INSERT)
        ElseIf "GTVOffre".Equals(e.Item.OwnerTableView.Name) Then

            strsqlOffre = "SELECT * FROM T_OFFRE ORDER BY NO_OFFRE DESC"
            cmdOffre = New SqlCommand(strsqlOffre, Conn)
            myDAOffre = New SqlDataAdapter(cmdOffre)
            Conn.Open()
            myDAOffre.Fill(dsOffre)
            Conn.Close()
            tempnomEntreprise = fonctionsvbs.TrouveNomEntreprise("NoOffre", dsOffre.Tables(0).Rows(0).Item("NO_OFFRE"))

            fonctionsvbs.LogInsert(Session("sDemandeur"), "Ajouter une offre", Session("sDemandeur") & " a ajouté l'offre " & dsOffre.Tables(0).Rows(0).Item("NO_OFFRE"))
        End If
        Me.RadGrid_Offre_Programme.Rebind()
    End Sub

    Private Sub RadGrid_Offre_Programme_UpdateCommand(ByVal source As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid_Offre_Programme.UpdateCommand
        If "GTVOffre".Equals(e.Item.OwnerTableView.Name) Then
            Dim parentItem As GridDataItem = DirectCast(e.Item.OwnerTableView.ParentItem, GridDataItem)
            Dim noEntreprise As Integer = parentItem.OwnerTableView.DataKeyValues(parentItem.ItemIndex)("NO_ENTREPRISE").ToString()
            Dim item As GridEditFormItem
            item = CType(e.Item, GridEditFormItem)

            Dim Nooffre As TextBox = DirectCast(item("NO_OFFRE").Controls(0), TextBox)

            Me.SqlDSOffre.UpdateParameters("NO_ENTREPRISE").DefaultValue = noEntreprise

            Dim DatePickDateDebut As RadDatePicker = DirectCast(item("TemplateColumnDateDebut").FindControl("DPicker_DATE_DEBUT"), RadDatePicker)
            If Not (DatePickDateDebut.SelectedDate Is Nothing) Then
                Me.SqlDSOffre.UpdateParameters("DATE_DEBUT").DefaultValue = DatePickDateDebut.SelectedDate
            End If

            Dim DatePickDateFin As RadDatePicker = DirectCast(item("TemplateColumnDateFin").FindControl("DPicker_DATE_FIN"), RadDatePicker)
            If Not (DatePickDateFin.SelectedDate Is Nothing) Then
                Me.SqlDSOffre.UpdateParameters("DATE_FIN").DefaultValue = DatePickDateFin.SelectedDate
            End If


            Dim DatePickDateDebutEmploi As RadDatePicker = DirectCast(item("TemplateColumnDateDebutEmploi").FindControl("DPicker_DATE_DEBUT_EMPLOI"), RadDatePicker)
            If Not (DatePickDateDebutEmploi.SelectedDate Is Nothing) Then
                Me.SqlDSOffre.UpdateParameters("DATE_DEBUT_EMPLOI").DefaultValue = DatePickDateDebutEmploi.SelectedDate
            End If

            fonctionsvbs.LogInsert(Session("sDemandeur"), "Modifier un offre", Session("sDemandeur") & " a modifier l'offre no " & Nooffre.Text)
        End If
    End Sub
End Class

Does someone has an idea?
Please