<%@ Page Language="vb" %>
<%@ Import Namespace="System.Web" %>
<html>
<head>
<title>Determining Browser Capabilities in ASP.NET: Demo</title></head>
<body>
<%
Dim objBrowser As HTTPBrowserCapabilities
objBrowser = Request.Browser
%>
<p align = center><b>Determining Browser Capabilities in ASP.NET: Demo</b></p>
<TABLE>
<% With objBrowser %>
<tr><td><b>Browser type:</b></td><td><%=.Type %></td></tr>
<tr><td><b>Browser version:</b></TD><td> <%=.Version%></td></tr>
<tr><td><b>Major version:</b></TD><td> <%=.MajorVersion%></td></tr>
<tr><td><b>Minor version:</b></TD><td> <%=.MajorVersion%></td></tr>
<tr><td><b>Platform:</b></TD><td> <%=.Platform%></td></tr>
<tr><td><b>This is a Win16 Platform:</b></TD><td> <%=iif(.Win16, "Yes", "No")%></td></tr>
<tr><td><b>This is a Win32 Platform:</b></TD><td> <%=iif(.Win32, "Yes", "No")%></td></tr>
<tr><td><b>Tables Supported:</b></TD><td> <%=iif(.Tables, "Yes", "No")%></td></tr>
<tr><td><b>Frames Supported:</b></TD><td> <%=iif(.Frames, "Yes", "No")%></td></tr>
<tr><td><b>Background Sounds Supported:</b></TD><td> <%=iif(.BackgroundSounds, "Yes", "No")%></td></tr>
<tr><td><b>Cookies Supported:</b></TD><td> <%=iif(.Cookies, "Yes", "No")%></td></tr>
<tr><td><b>Java Script Supported:</b></TD><td> <%=iif(.JavaScript, "Yes", "No")%></td></tr>
<tr><td><b>Java Applets Supported:</b></TD><td> <%=iif(.JavaApplets, "Yes", "No")%></td></tr>
<tr><td><b>VB Script Supported:</b></TD><td> <%=iif(.VBScript, "Yes", "No")%></td></tr>
<tr><td><b>Active X Controls :</b></TD><td> <%=iif(.ActiveXControls, "Yes", "No")%></td></tr>
<tr><td><b>AOL Client:</b></TD><td> <%=iif(.AOL, "Yes", "No")%></td></tr>
<tr><td><b>Browser is a Search-Engine Crawler:</b></TD><td> <%=iif(.Crawler, "Yes", "No")%></td></tr>
<tr><td><b>Browser is a Beta Version:</b></TD><td> <%=iif(.Beta, "Yes", "No")%></td></tr>
<tr><td><b>Channel Definition Format Supported:</b></TD><td> <%=iif(.CDF, "Yes", "No")%></td></tr>
<%End With %>
</table>
</body>
</html>