<% Dim strLink(100) strLink(0)="http://www.nuprl.org/" strLink(1)="http://www.nuprl.org/PRLSeminar/" strLink(2)="http://www.nuprl.org/PRLSeminar/intro.html" strLink(4)="http://www.nuprl.org/PRLSeminar/Authors/authors.html" If IsNumeric(Request.QueryString("linknum")) Then If CInt(Request.QueryString("linknum")) > 100 Then Else Response.Redirect strLink(CInt(Request.QueryString("linknum"))) End If Else End If %>>