home *** CD-ROM | disk | FTP | other *** search
/ Freelog 9 / Freelog009.iso / BAS / Internet / Abb / dopref.asp < prev    next >
Text File  |  2000-03-02  |  2KB  |  48 lines
  1. <% @ LANGUAGE="VBScript" lcid="1036" %>
  2. <!--#include file="include.asp"-->
  3. <%
  4.     vision2=request.form("vision")
  5.     cookie2=request.form("cookie")
  6.     
  7.     If cookie2="Oui" Then
  8.         Response.Cookies("abb").Expires = Now()
  9.     Else
  10.         Response.Cookies("abb")("vision") = vision2
  11.         Response.Cookies("abb").Expires = Now() + 365
  12.     End If
  13. %>
  14. <html>
  15.  
  16. <head>
  17. <meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
  18. <meta name="GENERATOR" content="Microsoft FrontPage 4.0">
  19. <meta name="ProgId" content="FrontPage.Editor.Document">
  20. <title>ABB</title>
  21. <style type="text/css">
  22. <!--
  23. A:link{text-decoration: none; color: <% =EnvironnementRes("envlnk") %>;}
  24. A:visited{text-decoration: none; color: <% =EnvironnementRes("envlnk") %>;}
  25. A:active{text-decoration: underline; color: <% =EnvironnementRes("envvlnk") %>;}
  26. A:hover{text-decoration: underline; color: <% =EnvironnementRes("envvlnk") %>;}
  27. -->
  28. </style>
  29. </head>
  30.  
  31. <body bgcolor="<% =EnvironnementRes("envback") %>" text="<% =EnvironnementRes("envtxt") %>" link="<% =EnvironnementRes("envlnk") %>" vlink="<% =EnvironnementRes("envvlnk") %>">
  32. <font face="Arial" size="2"><b>
  33. <center>Vos prΘfΘrences ont ΘtΘ sauvΘes !<br><br>Vous allez automatiquement Ωtre ramenΘ sur le forum.<br>Sinon cliquez ici : <a href="default.asp">Retour au forum</a></center>
  34. <%
  35. temps=Now()
  36. While DateDiff("s",temps,Now())<3
  37. Wend
  38. %>
  39. <script language="javascript">
  40. document.location="default.asp";
  41. </script>
  42.  
  43. </b></font>
  44. <!--#include file="basdepage.asp"-->
  45. </body>
  46.  
  47. </html>
  48.