Listing B
<script language="VBScript">
browserUserAgent = UCase(Request.ServerVariables("HTTP_USER_AGENT"))
If (InStr(browserUserAgent, "LYNX") > 0) Then
Response.Redirect("text_only_webpage.asp")
Else
Response.Redirect("standard_webpage.asp")
End If
</script>