<% 'ON ERROR RESUME NEXT Set objJMAIL = Server.CreateObject("JMAIL.Message") with objJMAIL .From = "webmaster@onlineformapro.com" .FromName = "Onlineformapro plan du site" .AddRecipient "l.petiet@onlineformapro.com", "PETIET Laurent" .AddRecipientBCC "onlineformapro@gmail.com", "PETIET Laurent" '.AddRecipientBCC "a.martin@onlineformapro.com", "Antoine MARTIN" .Subject = "Plan du site web Onlineformapro" For Each item in Request.Servervariables Select Case item case "REMOTE_ADDR", "HTTP_REFERER", "HTTP_USER_AGENT" : color = "#ff0000" case else : color = "#777777" end select str_html = str_html & "" & item & " : " & Request.Servervariables(item) & "" & Chr(13) & Chr(10) Next .HTMLBody = "date : " & now() & "

" & str_html & "
" '.Silent = true .send "mail.onlineformapro.com" end with %> Onlineformapro solution globale : e-learning, eformation, FOAD

 

Accueil

Société

Qui sommes-nous ?
Nos forces
Notre mission

Solutions
Notre offre
OnlineManager
OnlineAuteur
Modules e-learning
Formation métier
OnlineAgora

Services
Consulting
Formation
Hébergement


Catalogue
Bureautique & Informatique
Graphisme & Conception web
Internet
CAO/DAO
Comptabilité
Enseignement Général
Gestion de projet
Langues

Espace démonstration
Portfolio
Zone client
Références
Contact


Portail formation

Espaces
Espace Stagiaire
Espace Entreprise
Espace Formateur

Communiqués
Lire
Rédiger

Newsletter
Lire
S'inscrire