Programalama > ASP

Diyelim ki Flash animasyonlarını bolca kullanıdığımız bir sayfamız var ve biz ziyaretçinin bilgisayarının flash animasyonlarını desteklemediğinden korkuyoruz. Ziyaretçi siteye ilk girdiğinde diyoruz ki "Eğer yukarıdaki animasyonu göremiyorsanız aşağıdaki linke tıklayın. Görmüyorsa tıklıyor ve desteği indiriyor. Görüyor isede bu sayfanın siteye her girdiğinde karşısına çıkmasını istemiyor. Bizde ona "Bir dahaki girişimde bu sayfayı gösterme" diye bir checkbox sunuyoruz. Tıklayınca siteye birdahaki girişinde bu sayfa grünmeyecek. Doğrudan anasayfaya gidecek

---------------------------------------------
<%
IF request.cookies("check") = "check" then
Response.Redirect "anasayfa.asp"
ELSE
%>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
<title>New Page 1</title>
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
</head>

<body>

<p align="center"><embed width="164" height="132" src="son[1].swf"></p>

<p align="center">Eğer yukarıdaki animasyonu göremiyorsanız lütfen aşağıdaki linke
tıklayın.<br>
<a href="www.macromedia.com">LİNK</a></p>

<p align="center"> </p>

<form method="POST" action="default.asp">
<div align="center"><center><p><input type="checkbox" name="check" value="ON" checked>Birdahaki
girişimde bu sayfayı gösterme<br>
<input type="submit" value="GİRİŞ" name="B1"></p>
</center></div>
</form>
<%
END IF
%>
</body>
</html>
------------------------------------
Şeklindeki giriş sayfamızı hazırladık. Şimdide checkbox işaretliyse ziyaretçiye çerez göndereceğiz. Aşağıdaki koduda anasayfa.asp dosyamızın başına kaydediyoruz.
---------------------------------------
<%
Dim check
check = request.form("check")
IF check = "ON" Then
response.cookies("check") = "check"
response.cookies("check").expires=now()+365 
END IF
%>


Yorumlar                 Yorum Yaz
Bu hazır kod'a ilk yorumu siz yapın!
KATEGORİLER
ASP - 240
ASP.NET - 24
C# - 75
C++ - 174
CGI - 8
DELPHI - 247
FLASH - 49
HTML - 536
PASCAL - 246
PERL - 11
PHP - 160
WML - 9
XML - 2
Copyright © 2002 - 2017 Hazır Kod - Tüm Hakları Saklıdır.
Siteden yararlanırken gizlilik ilkelerini okumanızı tavsiye ederiz.
hazirkod.com bir İSObil projesidir.