<% 

  dim a,b,c,d,x,y,z

  'not programmed:
  'Cookies(cookie)[(key)|.attribute]


'************************************************************
'   READ AND SET PROPERTIES
'============================================================
'response.Buffer [=flag]
'-------------------------------------------------------
'x = response.Buffer 
 x = response.Buffer 
'response.buffer
 response.buffer
'response.Buffer = (sin(x) & "some")
 response.Buffer = (sin(x) & "some")
'
'=======================================================
'
'
'=======================================================
'CacheControl [=Cache Control Header]
'-------------------------------------------------------
'x = 'CacheControl
 x = response.CacheControl  
'
'response.CacheControl 
 response.CacheControl 
'
'response.CacheControl = f("Cache Control Header")
 response.CacheControl = f("Cache Control Header")
'=======================================================
'
'
'=======================================================
'Response.ContentType [=ContentType]
'-------------------------------------------------------
'x = Response.ContentType
 x = Response.ContentType 
'
'Response.ContentType = ContentType + "some"
 Response.ContentType = ContentType + "some"
'
'Response.ContentType 
 Response.ContentType 
'=======================================================

'=======================================================
'Response.Expires [=number] 
'-------------------------------------------------------
'x =Response.Expires 
 x =Response.Expires 
'
'Response.Expires =number & x
 Response.Expires =number & x
'
'Response.Expires 
 Response.Expires 
'=======================================================
'
'
'=======================================================
'Response.ExpiresAbsolute [ = #[date] [time]#] 
'-------------------------------------------------------
'x = Response.ExpiresAbsolute 
 x = Response.ExpiresAbsolute 
'
'Response.ExpiresAbsolute 
Response.ExpiresAbsolute 
'
'Response.ExpiresAbsolute = #April, 23, 2002  13:40:33#
 Response.ExpiresAbsolute = #April, 23, 2002  13:40:33#
'
'Response.ExpiresAbsolute = "April, 23, 2002"
 Response.ExpiresAbsolute =  "April, 23, 2002"
'
'Response.ExpiresAbsolute =f("April, 23, 2002" + x)
 Response.ExpiresAbsolute =f("April, 23, 2002" + x)
'=======================================================
'
'
'=======================================================
'Response.Status = StatusDescription
'-------------------------------------------------------
'x =Response.Status  
x =Response.Status  
'
'Response.Status = StatusDescription & x
Response.Status = StatusDescription & x
'=======================================================
'
'
'=======================================================
'Response.IsClientConnected ()
'-------------------------------------------------------
'x =Response.IsClientConnected () 
x =Response.IsClientConnected () 
'=======================================================
'
'
'=======================================================
'Response.Charset(CharsetName)   
'-------------------------------------------------------
'x =Response.Charset  
x =Response.Charset  
'
'Response.Charset(CharsetName & x)   
Response.Charset(CharsetName & x)   
'=======================================================
'
'
'=======================================================
'Response.PICS(PICSLabel)   
'-------------------------------------------------------
'x =Response.PICS(PICSLabel)   
x =Response.PICS(PICSLabel)   
'
'Response.PICS(PICSLabel & x)   
Response.PICS(PICSLabel & x)   
'=======================================================
'
'
'mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm
'  METHODS
'=======================================================
'Response.AddHeader name, value
'-------------------------------------------------------
'Response.AddHeader name & x, value & x
Response.AddHeader name & x, value & x
'=======================================================
'
'
'=======================================================
'Response.AppendToLong string
'-------------------------------------------------------
'Response.AppendToLong string
Response.AppendToLong string & x
'=======================================================
'
'
'=======================================================
'Response.BinaryWrite data
'-------------------------------------------------------
'Response.BinaryWrite data & x
Response.BinaryWrite data & x
'=======================================================
'
'
'=======================================================
'Response.Clear
'-------------------------------------------------------
Response.Clear
'=======================================================
'
'
'=======================================================
'Response.End
'-------------------------------------------------------
Response.End
'=======================================================
'
'
'=======================================================
'Response.Flush
'-------------------------------------------------------
Response.Flush
'=======================================================
'
'
'=======================================================
'Response.Write variant
'-------------------------------------------------------
Response.Write variant & x
'=======================================================
'
'
'=======================================================
'Response.Redirect URL
'-------------------------------------------------------
Response.Redirect URL & x
'=======================================================
'
'

X= request("this_works")
x = request(x(sin(4)) & request("this_also_works"))

'on    error resume          next
on    error resume          next
'err.clear
err.clear
'err.raise 6666,,"Exceptions are good.",,Some_value
err.raise 6666,,"Exceptions are good.",,Some_value
'err.raise 7777
err.raise 7777


%>