<%@ LANGUAGE="VBSCRIPT" %> <%Response.Buffer = True %> E-ROBINSON
   
formulaire d'inscription
 

Remplissez le formulaire ci-dessous, puis validez. Vous recevrez un accusé de réception pour chacune des adresses email inscrites sur ce compte.

N'oubliez pas de valider chacune de ces adresses en répondant à chacun des accusés de réception.

 
     
  Champs obligatoires
(nom et prénom, email, mot de passe et "en cas d'oubli ...")
 
   
  <% SQLsel = "SELECT Civilite.IDCivilite, Civilite.Civilite FROM Civilite ORDER BY Civilite.Civilite;" Call OpenResulte(SQLSel, Civilite) do until Civilite.eof Response.Write(" " & Civilite.fields("Civilite") & "") Civilite.movenext loop %>
Prénom*  
Nom*  
Votre adresse e-mail *  
Votre mot de passe *
(8 caractères maximum)
 
En cas d'oubli  
Choisissez une question*   <% SQLsel = "SELECT Question.IDQuestion, Question.Question FROM Question ORDER BY Question.Question;" Call OpenResulte(SQLSel, Question) Response.Write("") %>
Votre réponse*  
   
Newsletter  
 

Nous vous proposons de recevoir périodiquement (tous les deux mois environ) une newsletter d'information sur l'évolution de l'emailing en général et du site e-robinson en particulier. Votre acceptation comporte en outre deux avantages :

  • vous permettre de garder en mémoire votre inscription et ses conséquences ; vous pourrez ainsi mieux juger du respect ou non de l'engagement des entreprises adhérentes au système;
  • vérifier la validité de votre adresse ; en effet le fonctionnement du système sera d'autant plus efficace que la qualité du fichier sera bonne.

Vous pouvez bien évidement à tout moment vous désabonner de cette lettre.

 
 
 
 

Autres options
Précisez éventuellement d'autres adresses email ainsi que vos coordonnées postales. Attention ! toutes les adresses indiquées ici devront être validées (réponse à notre accusé de réception) pour être prises en compte par le système.

 
 
 
 
  Coordonnées postales
N°   
Rue   
Résidence  
Lieu-dit  
Appartement  
Votre code postal   
Votre ville   
Votre pays    <% SQLsel = "SELECT Pays.IDPays, Pays.Pays FROM Pays ORDER BY Pays.Pays;" Call OpenResulte(SQLSel, Pays) Response.Write("") %>
 

Autres adresses e-mail à prendre en compte :

E-Mail 2 :  
E-Mail 3 :  
E-Mail 4 :  
E-Mail 5 :  
E-Mail 6 :  
E-Mail 7 :  
E-Mail 8 :  
E-Mail 9 :  
E-Mail 10 :