<% ‘Write HTTP headers before any other output If Request.Form(“expires”) = “on” Then _ Response.Expires = Request.Form(“expires_value”) If Request.Form(“expiresabs”) = “on” Then _ Response.ExpiresAbsolute = Request.Form(“expiresabs_value”) If Request.Form(“lastmod”) = “on” Then _ Response.AddHeader “LAST-MODIFIED”, Cstr(Request.Form(“lastmod_value”)) If Request.Form(“pragma”) = “on” Then _ Response.AddHeader “PRAGMA”, CStr(Request.Form(“pragma_value”)) If Request.Form(“refresh”) = “on” Then _ Response.AddHeader “REFRESH”, CStr(Request.Form(“refresh_value”)) If Request.Form(“addheader”) = “on” And Len(Request.Form(“addheader_name”)) Then _ Response.AddHeader CStr(Request.Form(“addheader_name”)), _ CStr(Request.Form(“addheader_value”)) If Request.Form(“status”) = “on” Then _ Response.Status = Request.Form(“status_value”) %> <HTML> ... ... Show code and execution time ... 其余部分仅仅是显示已被执行的代码和执行时间。读者会注意到包含在网页中的定制的报头“PRAGMA“,一些(先前的)代理服务器使用它作为网页是否应被缓存的指示。缺省是网页被缓冲,除非接受到HTTP报头 “PRAGMA=NO-CACHE“。