<%@LANGUAGE="VBSCRIPT"%> <% msg=""%> <% Dim MM_editAction MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME")) If (Request.QueryString <> "") Then MM_editAction = MM_editAction & "?" & Server.HTMLEncode(Request.QueryString) End If ' boolean to abort record edit Dim MM_abortEdit MM_abortEdit = false %> <% ' IIf implementation Function MM_IIf(condition, ifTrue, ifFalse) If condition = "" Then MM_IIf = ifFalse Else MM_IIf = ifTrue End If End Function %> <% If (CStr(Request("MM_insert")) = "form_inscription") Then If (Not MM_abortEdit) Then ' execute the insert Dim MM_editCmd Set MM_editCmd = Server.CreateObject ("ADODB.Command") MM_editCmd.ActiveConnection = MM_agitel_connect_STRING MM_editCmd.CommandText = "INSERT INTO T_PREINSCRIPTION (nom_preins, prenoms_preins, email_preins, datenais_preins, lieunais_preins, nation_preins, sexe_preins, adpos_preins, pays_preins, ville_preins, telcores_preins, telperso_preins, formcycle_preins, form_preins, derclasse_preins, derannee_preins, derecole_preins, deradpos_preins, dertel_preins, derfax_preins, derpays_preins, derville_preins, diplome1_preins, date1_preins, lieu1_preins, diplome2_preins, date2_preins, lieu2_preins, diplome3_preins, date3_preins, lieu3_preins, fonction1_preins, entrep1_preins, dateent1_preins, duree1_preins, fonction2_preins, entrep2_preins, dateent2_preins, duree2_preins, fonction3_preins, entrep3_preins, dateent3_preins, duree3_preins, sondage_preins, lieusond_preins, raison_preins, dejaexpro_preins, carriere_preins, date_preins) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)" MM_editCmd.Prepared = true MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param1", 202, 1, 50, Request.Form("nom_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param2", 202, 1, 50, Request.Form("prenom_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param3", 202, 1, 255, Request.Form("email_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param4", 135, 1, -1, MM_IIF(Request.Form("datenais_txt"), Request.Form("datenais_txt"), null)) ' adDBTimeStamp MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param5", 202, 1, 50, Request.Form("lieunais_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param6", 202, 1, 50, Request.Form("nation_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param7", 202, 1, 20, Request.Form("sexe_opt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param8", 203, 1, 1073741823, Request.Form("adpost_txt")) ' adLongVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param9", 202, 1, 50, Request.Form("pays_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param10", 202, 1, 50, Request.Form("ville_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param11", 202, 1, 50, Request.Form("telcores_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param12", 202, 1, 50, Request.Form("telperso_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param13", 202, 1, 15, Request.Form("cycle_opt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param14", 202, 1, 255, Request.Form("niveaux_select")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param15", 202, 1, 50, Request.Form("derclasse_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param16", 5, 1, -1, MM_IIF(Request.Form("derannee_txt"), Request.Form("derannee_txt"), null)) ' adDouble MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param17", 202, 1, 50, Request.Form("derecole_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param18", 203, 1, 1073741823, Request.Form("deradpos_txt")) ' adLongVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param19", 202, 1, 50, Request.Form("dertel_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param20", 202, 1, 50, Request.Form("derfax_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param21", 202, 1, 50, Request.Form("derpays_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param22", 202, 1, 50, Request.Form("derville_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param23", 202, 1, 255, Request.Form("diplome1_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param24", 202, 1, 50, Request.Form("datedip1_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param25", 202, 1, 50, Request.Form("lieudip1_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param26", 202, 1, 255, Request.Form("diplome2_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param27", 202, 1, 50, Request.Form("datedip2_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param28", 202, 1, 50, Request.Form("lieudip2_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param29", 202, 1, 255, Request.Form("diplome3_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param30", 202, 1, 50, Request.Form("datedip3_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param31", 202, 1, 50, Request.Form("lieudip3_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param32", 202, 1, 255, Request.Form("fonction1_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param33", 202, 1, 50, Request.Form("entrepres1_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param34", 202, 1, 50, Request.Form("dateent1_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param35", 202, 1, 3, Request.Form("duree1_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param36", 202, 1, 255, Request.Form("fonction2_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param37", 202, 1, 50, Request.Form("entrepres2_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param38", 202, 1, 50, Request.Form("dateent2_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param39", 202, 1, 3, Request.Form("duree2_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param40", 202, 1, 255, Request.Form("fonction3_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param41", 202, 1, 50, Request.Form("entrepres3_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param42", 202, 1, 50, Request.Form("dateent3_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param43", 202, 1, 3, Request.Form("duree3_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param44", 202, 1, 50, Request.Form("qconnaitre_opt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param45", 202, 1, 255, Request.Form("lieuconnaitre_txt")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param46", 203, 1, 1073741823, Request.Form("raison_txt")) ' adLongVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param47", 203, 1, 1073741823, Request.Form("exppro_txt")) ' adLongVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param48", 203, 1, 1073741823, Request.Form("carriere_txt")) ' adLongVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param49", 135, 1, -1, MM_IIF(Request.Form("datepeins_txt"), Request.Form("datepeins_txt"), null)) ' adDBTimeStamp on error resume next MM_editCmd.Execute MM_editCmd.ActiveConnection.Close ' append the query string to the redirect URL Dim MM_editRedirectUrl MM_editRedirectUrl = "preinscription.php" If (Request.QueryString <> "") Then If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0) Then MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString Else MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString End If End If ' Response.Redirect(MM_editRedirectUrl) msg="Ok" End If End If %> <% if (err.number<>0) then msg="erreur" end if %> <% Dim liste_niveau Dim liste_niveau_cmd Dim liste_niveau_numRows Set liste_niveau_cmd = Server.CreateObject ("ADODB.Command") liste_niveau_cmd.ActiveConnection = MM_agitel_connect_STRING liste_niveau_cmd.CommandText = "SELECT * FROM T_CLASSE ORDER BY lib_classe ASC" liste_niveau_cmd.Prepared = true Set liste_niveau = liste_niveau_cmd.Execute liste_niveau_numRows = 0 %> Les Pré-Inscriptions de AGITEL-FORMATION
Search
The Pre-enrolment at AGITEL-FORMATION
Login :
Password :
<%=(liste_actu.Fields.Item("titre_eve").Value)%>

<%=(liste_actu.Fields.Item("date_eve").Value)%> <%=(liste_actu.Fields.Item("heure_eve").Value)%>
<%=(liste_actu.Fields.Item("resume_eve").Value)%> 
No event
Name and Surname :
E-mail
Subscribe
Unsubscribe
 
<% if msg="Ok" then%>
L'enregistrement s'est déroulé avec succès
Après analyse de cette pré-inscription vous serez contacté par le service recrutement de AGITEL-FORMATION pour l'Inscription effective dans l'établissement.
<% end if%> <% if msg="erreur" then%>
L'ensegistrement à échoué
Veuillez essayer à nouveau en remplissant correctement le formulaire
<%=err.description%> <% end if%>
Applicant Identity
Name :
" size="30" />
Surname :
" size="40" />
E-mail :
" size="50" />
Date of birth :
" size="20" />
Birth Place :  
" size="35" />
Nationality :
" size="30" />
Sex :
/> Male /> Female
P.O Box :
Country :
" size="40" />
Town/City :
" size="40" />
Correspondent Phone Number  :
" size="30" />
Private Phone Number  :
" size="30" />
 
Chosen/Selected Training
/> Candidate for the 1st Cycle entry
/> Candidate for the 2nd Cycle entry (from 2nd year students level to Master degree student level
/> Candidate for the 3rd Cycle entry (from 2nd year students level to Master degree student level
/> Candidate benefiting from the validation of professional knowledge Or in professional reconversion
 
Training Choice
Previous form
" size="50" />
Academic Year
" size="30" />
Name of the school attended  :
" size="50" />
School Box  :
Phone  :
" size="30" />
Fax :
" size="30" />
Country :
" size="40" />
Town :
" size="40" />
 

Degrees / Diplomas Obtained  :
  (start by the most recent)
# Diplomas Date Place
1
" size="13" />
" size="3" />
" size="10" />
2 " size="13" /> " size="3" /> " size="10" />
3 " size="13" /> " size="3" /> " size="10" />
 

Work Experience And Training Periods
# Title Company Start up
Date
Length
of time
1
" size="8" /> " size="8" /> " size="3" /> " size="1" />
2 " size="8" /> " size="8" /> " size="3" /> " size="1" />
3 " size="8" /> " size="8" /> " size="3" /> " size="1" />
 

Renseignement Compléméntaires

Comment avez-vous connu AGITEL-FORMATION ?

/>
Annuaire de formations supérieures
/>
Documentation envoyée dans votre établissement de formation
/>
Salon
/>
Publicité dans des magazines
/>
Recommandation par un ancien élève
/> Revue d’information et d’orientation 
/> Publicité par affichage
/> Entourage, relations
/> Organisme d’orientation
/> Autre (Veuillez préciser)
  " size="30" />

Motivations
Veuillez exprimer ci-dessous les raisons qui vous conduisent à choisir ce métier :
Avez-vous déjà eu une expérience professionnelle ? Précisez laquelle :
Quelle carrière aimeriez-vous avoir ? Dans quelle branche et pourquoi ?


 
<% liste_niveau.Close() Set liste_niveau = Nothing %>