如何在Asp中设计跨越域的Cookie_ASP教程

推荐：如何用ASP实现对ORACLE数据库的操作
ASP（Active Server Pages）是微软公司为开发互联网应用程序所提出的工具之一，ASP与数据库的联接一般通过ADO（Activex Data Object）来实现的，就象《计算机世界》2000年3月20日的《用ASP

Cookie简介

首先，我们对Cookie做一个简单的介绍，说明如何利用ASP来维护cookie。

Cookie是存储在客户端计算机中的一个小文件，这就意味着每当一个用户访问你的站点，你就可以秘密地在它的硬盘上放置一个包含有关信息的文件。这个文件几乎可以包含任何你打算设置的信息，包括用户信息、站点状态等等。这样的话，就有一个潜在的危险:这些信息有可能被黑客读取。为了防止这个问题的发生，一个有效的办法就是cookie只能被创建它的域所存取。这就是说:比如ytu.edu.cn只能访问ytu.edu.cn创建的cookie。通常来讲，这没有什么问题；但是，如果需要两个不同域上的两个不同站点共享保存在cookie中的用户信息，该如何处理呢?当然可以选择复制用户信，但是，如果你需要用户只能在一个站点上注册，并且自东成为另外一个站点的注册用户呢?或者，两个站点共享一个用户数据库，而又需要用户自动登录呢?这时候，跨越域共享cookie是最好的解决方案。

这里，先看一些ASP处理cookie的代码，以便以后便于引用参考。

以下为引用的内容： '创建Cookie 　　Response.Cookies("MyCookie").Expires=Date 365 　　Response.Cookies("MyCookle").Domain="mydomaln.com" 　　Response.Cookies("MyCookle")("Username")=strUsername 　　Response.Cookies("MyCookle")("Password")=strPassword

读写cookie非常简单，上面的代码创建一个cookie并给cookie设置属性:域、过期时间，以及其他一些保存在cookie中的值。这里，strUsename，strPassword是在前面某个地方设置的变量。然后，通过下面的语句在cookie中读取。

以下为引用的内容： 　 '读取Cookie 　　datExpDate=Request.Cookies("MyCookie") 　　strDomaln=Request.Cookies("MyCookle").Domain 　　strUsername=Request.Cookies("MyCookle")("Username") 　　strPassword=Request.Cookies("MyCookie")("Password")

更详细的信息，可以参考ASP的资料。

实现

简单地共享cookie的诀窍是重定向，一般过程为:

1.一个用户点击siteA.com。

2.如果用户没有siteA.com的cookie，就把用户重定向到siteB.com。

3.如果用户有siteB.com的cookie，把用户连同一个特殊的标志(将在下面解释)重定向回siteA.com，否则，只把用户重定向到siteA.com。

4.在siteA.com创建cookie。

看起来很简单，仔细分析一下:siteA.com和siteB.com共享相同的用户设置，所以，如果用户有siteB.com的cookie(已经注册)，siteA.com能够同样读取cookie、提供cookie所允许的特性。这样，访问siteA.com的用户就如同访问了siteB.com。

这个检查的环节应该在siteA.com中的文件所包含一个cookies.inc中实现。让我们看一下这段代码:

以下为引用的内容： 　　l—1 　　'SiteA.com"检查cookie 　　If Request.Querystring("Checked")＜＞"True" then 　　If not Request.Cookies("SiteA_Cookie").Haskeys then '重走向到siteB.com 　　Response.Redlrect("http://www.siteB.com/cookie.asp") 　　End if 　　End if

如果用户有一个siteA.com的cookie，则不需要做任何事情了；第一个if语句用来消除无限的循环。让我们看一下siteB.com上的cookie.asp文件来获得进一步的理解。

如果用户在siteB.com上仍没有cookie，于是，将他送回到siteA.com，并且通过在查询语句中提供一个叫做"checkd"的参数让应用程序知道你已经检查过cookie了。否则，将用户送回到siteB.com，并退出循环。

然而，如果用户拥有siteB.com的cookie，我们需要将用户送回siteA.com并告诉siteA.com。为此，我们在数据库中附加一个唯一的标志，username。所以，我们扩展siteA.com中的代码。 　　

以下为引用的内容： l—3 　　'SiteA.com ... ... '检查标志 　　If Request.Querystring("identifier")＜＞"" then 　　strUsername=Request.Querystring("identifier") 　　'记录到数据库 　　Response.Cookies("siteA_Cookie").Expires=Date 365 　　Response.Cookies("SiteA_Cookie").Domain="siteA.com" 　　Response.Cookies("siteA_Cookie")("Username")=strUsername 　　End if

分享：浅析ASP中的Debug类--VBScript
不知道用ASP写代码的朋友是不是和我有一样的感受，ASP中最头疼的就是调试程序的时候不方便，我想可能很多朋友都会用这样的方法“response.write ”，然后输出相关的语句来看看是