IsCookieReady Function:

The IsCookieReady function determines if the client browser is capable of using cookies. Returns True if the browser supports Cookies or False if it does not.

Syntax:
boolean = IsCookieReady()
Example Usage: 
<%
dim a
a = IsCookieReady
if a then
	 ' browser supports cookies
else
	 ' browser doesn't support cookies
end if
%>
ASP Source Code: 
<%
Private Function IsCookieReady()
	dim bc
	Set bc = Server.CreateObject("MSWC.BrowserType")
	IsCookieReady = bc.cookies
	if Lcase( IsCookieReady ) = "unknown" then
		Response.Cookies("tst") = "IHAVECOOKIES"
		If UCASE( Request.Cookies("tst") ) = _
		    "IHAVECOOKIES" then
			IsCookieReady = True
		Else
			IsCookieReady = False
		End If
	end if
	Set bc = Nothing
End Function
%>