Check for a Spider and Redirect
9/19/2004 9:26:29 PM
Code snip will check for a spider bot or crawler and redirect the bot to another content page.
Dim Spidercheck Spidercheck = Request.ServerVariables("HTTP_USER_AGENT") If (Instr(LCase(Spidercheck), "bot") <> 0) OR (Instr(LCase(Spidercheck), "crawler") <> 0) Then Response.Redirect "/main/Default.aspx" Else 'user redirect to another page. End If
|