%@ LANGUAGE = "VBScript" ENABLESESSIONSTATE = True %> <%Option Explicit%> <%Response.Buffer = True%> <% If Request.Cookies("login") = "" Then Response.Write("") End If If session("start") = "" Then Response.Cookies("a") = "ended" Response.Write("") End If Dim bc, bgc, fc, des If Request("bc") = "" Then bc = "#000000" Else bc = "#" & Request("bc") End If If Request("bgc") = "" Then bgc = "#FFFFFF" Else bgc = "#" & Request("bgc") End If If Request("des") = "" Then des = "Description goes here" Else des = Request("des") End If If Request("fc") = "" Then fc = "#000000" Else fc = "#" & Request("fc") End If dim strStyle strStyle = "" %>