<%@ Page Language=VB Debug=true %>
<script runat=server>
Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
Dim BCaps As HttpBrowserCapabilities
BCaps = Request.Browser
If BCaps.Browser = "IE" Then
Response.Redirect("http://www.java2java.com")
ElseIf BCaps.Browser = "Netscape" Then
Response.Redirect("http://www.java2java.com")
Else
Response.Redirect("http://www.java2java.com")
End If
End Sub
</SCRIPT>
|