日期:2010-09-13  浏览次数:20840 次

  为了考虑Cookies的安全,一般我们需要清除站内使用的Cookies的值。这里提供一段代码,思路就是采用集合的方法,当然也兼容清除含有字典HasKeys的Cookies值噢。

Dim Cookie, Subkey
For Each Cookie in Request.Cookies
if Not(Request.Cookies(Cookie).HasKeys) then
Response.Cookies(Cookie) = Empty
else
For Each Subkey in Request.Cookies(Cookie)
Response.Cookies(Cookie)(Subkey) = Empty
Next
end if
Next