boolean = IsFrameReady()
Example Usage:
ASP Source Code:<% dim a a = IsFrameReady if a then ' browser supports frames elseif not a then ' browser doesn't support frames elseif IsNull( a ) then ' browser's frame support is unknown end if %>
<%
Private Function IsFrameReady()
dim bc
Set bc = Server.CreateObject("MSWC.BrowserType")
IsFrameReady = bc.frames
if Lcase( IsFrameReady ) = "unknown" then _
IsFrameReady = Null
Set bc = Nothing
End Function
%>