<%@ Language=VBScript %>

<%

Option Explicit

response.buffer=true

Dim objCookie

Response.Write "春風精彩之不可告人刪除CookieS<BR>"

For Each objCookie In Request.Cookies

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

' 設置時間刪除.

Next

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

%>