<% randomize Num=(int(rnd()*6)+1) Select Case Num case 1 response.redirect("/1") case 2 response.redirect("/2") case 3 response.redirect("/3") case 4 response.redirect("/4") case 5 response.redirect("/5") case 6 response.redirect("/6") case else response.redirect("/7") end select 'response.write num %>