<% dim x,y for each x in Request.Cookies response.write("

") if Request.Cookies(x).HasKeys then for each y in Request.Cookies(x) response.write(x &":" &y &"=" &Request.Cookies(x)(y)) response.write("
") next else response.write(x &"=" &Request.Cookies(x) &"
") end if response.write "

" next %>