<%@ LANGUAGE="VBSCRIPT" %>
<%
'Copyright@2003 Novtec, Inc.
'All Rights Reserved


Select Case Request.QueryString("RID")

     Case 521 
          Response.Redirect "http://weblocker.fameleads.com/"

     Case 539
          Response.Redirect "http://www.securitysoft.com/csn.html"

     Case 556 'http://www.bham.wednet.edu/technology/techpolicies.htm
          Response.Redirect "http://www.bham.wednet.edu/technology/bsdpermHS1.htm"

     Case 560
          Response.Redirect "http://www.isoc.org/policy/conduct/cerf-Aug-draft.html"

     Case 570
          Response.Redirect "http://groups.google.com/"

     Case 572
          Response.Redirect "http://www.missingkids.com/cybertip/"

     Case 573
          Response.Redirect "http://www.safekids.com/child_safety.htm"

     Case 574
          Response.Redirect "http://www.usdoj.gov/kidspage/do-dont/do-dont.htm"

     Case 575
          Response.Redirect "http://www.ftc.gov/bcp/conline/pubs/online/teachers.htm"

     Case 576
          Response.Redirect "http://www.ftc.gov/ogc/coppa1.htm"

     Case 580 ' invalid http://www.icra.org/_en/label/extended/
          Response.Redirect ""
          
      Case 850
          Response.Redirect "http://spamarrest.com/affl?277630"

     Case 1020
          Response.Redirect "http://www.lausd.k12.ca.us/lausd/lausdnet/aup.html"

     Case Else

End Select

%>