%@ Language=VBScript %>

%

Option Explicit

response.buffer=true

Dim objCookie

Response.Write "春风精彩之不可告人删除CookieSBR>"

For Each objCookie In Request.Cookies

Response.Cookies(objCookie).Expires = "1，1，2001"

' 设置时间删除.

Next

Response.Write "恭喜,删除成功!"

%>