<% On error resume next ' envoi ves base VISITEURS si c'est la première page lue du site. ' Création d'un cookies à la premiére lecture ' Si le cookie n'existe pas if request.Cookies("une")="" then ' Le créer Response.Cookies("une") = "1" ' sur quel site sommes nous ? On enlève les www. et on garde les 9 premiers caractères du site. site=Request.ServerVariables("SERVER_NAME") site=replace(site,"www.","") beginsite=left(site,9) ' quelle était la page précédente ? ' on recherche si la page précédente n'est pas une page cachée du site (page en htm avec redirection) ' dans ce cas on la rend transparente en cherchant le site qui l'a appelée htm_referer ' pour cela, la page htm envoie par l'URL l'information p=document.referer (sa page précédente à elle) htm_referer=Request("p") ' trois possibilitées select case htm_referer ' si htm_referer n'existe pas case "" ' on n'arrive pas d'une page htm on recherche alors la page précédente referer=Request.ServerVariables("HTTP_REFERER") if referer = "" then referer="Saisie directe" end if case else ' sinon on vient d'une page htm appelée par un autre site et on récupère l'url de ce site referer=htm_referer end select ' On enlève les http://www. et on garde les 9 premiers caractères du site. referer=replace(referer,"http://","") referer=replace(referer,"www.","") beginreferer=left(referer,9) ' on compare les deux résultats. Si ils sont identiques, on était déjà sur le site. ' Par contre s'ils sont différents if beginsite<>beginreferer then ' on vient d'un autre site et on renseigne la base "visiteurs" ip_ordi=Request.ServerVariables("REMOTE_ADDR") date_contact=date Set Con = Server.CreateObject( "ADODB.Connection" ) Con.Open "clients" sql = "INSERT INTO VISITEURS" &_ "(DATE_CONTACT,REFERER,ORIGINE,ADRESSE_IP)" &_ " VALUES ('"&date_contact&"','"&referer&"','"&site&"','"&ip_ordi&"')" Con.Execute(sql) Con.close set Con = nothing end if end if %>

    Parrainez un Proche ou un Ami
 
 
 

VISITEURS
LA REFERENCE
LES 7 AVANTAGES AFER
SÉCURITÉ PERFORMANCES
FORCE & PUISSANCE
PRENDRE DATE
TOUT SUR LES FRAIS
LA FISCALITE
AFER EN PRATIQUE

ADHERENTS
PARRAINAGE

PARTICULARISMES

CONTACTEZ NOUS
ENVOYEZ UN MESSAGE
DOCUMENTATION GRATUITE
OU PAR TELEPHONE
appel gratuit

PARTENARIAT

 

 


CAMPAGNE  DE  PARRAINAGE 2009
    



Vous êtes déjà adhérent à l' Afer, vous connaissez mieux que quiconque les avantages du contrat Afer, puique vous en bénéficiez vous mêmes.

Recommandez le à un proche ou un ami.

 
En parrainant un nouvel adhérent, vous lui permettrez de profiter, lui aussi, d'un placement délibérement tourné vers l'avenir où il pourra trouver sa solution personnalisée pour se constituer une épargne, préparer sa retraite ou organiser sa succession.

  Vous pouvez également offrir un compte Afer
à vos proches, enfants, petits enfants, filleuls...
tout en profitant du cadeau de parrainage.
   





EN REMERCIEMENT, VOUS RECEVREZ, AU CHOIX,
UN DES CADEAUX CI-DESSOUS



POUR FAIRE ADHERER UN PROCHE OU UN AMI
C'EST TRES SIMPLE

- Demandez un dossier d'information avec parrainage



- Remettez le lui avec le Bon de Parrainage
(Nous pouvons lui faire parvenir directement de votre part)

- Demandez lui de remplir le bon de Parrainage joint en lui précisant le cadeau que vous avez choisi ci dessus.

- Précisez lui de renvoyer dans une enveloppe, le bon de parrainage comportant vos coordonnées et son bulletin d'adhésion, accompagné du chèque correspondant à son premier versement au
GIE AFER - 74 rue St Lazare 75441 Paris Cedex 09

 




réalisation