<% IF session("ID_UTILISATEUR")<>"" THEN Response.Redirect "http://" & Request.ServerVariables("SERVER_NAME") & "/intranet/home.html" END IF session.abandon %>

<%=formatdatetime(now,1)%>

Bienvenue sur l'intranet <% SELECT CASE request("ERREUR") CASE 1 Response.Write "
Username erroné" CASE 2 Response.Write "
Mot de passe erroné" CASE 3 Response.Write "
Mot de passe envoyé par email" END SELECT %>
Nom d'utilisateur ">
Mot de passe

[ Oublié le mot de passe ? ]

[ Home page ]