|
||||||||||||||||||||||||||||||||||||||||
|
<%
if session("picturecount") > maxpictures then
session("picturecount") = 0
end if
session("picturecount") = session("picturecount") + 1
select case session("picturecount") mod 13
case 1
linkpage = "/new1.asp"
case 2
linkpage = "/new2.asp"
case 3
linkpage = "/new3.asp"
case 4
linkpage = "/new4.asp"
case 5
linkpage = "/new5.asp"
case 6
linkpage = "/new6.asp"
case 7
linkpage = "/new7.asp"
case 8
linkpage = "/new8.asp"
case 9
linkpage = "/new9.asp"
case 10
linkpage = "/new-d1.asp"
case 11
linkpage = "/new-d2.asp"
case 12
linkpage = "/new-d3.asp"
end select
response.write cr
response.write ""
response.write " " %><% if session("picturecount") > maxpictures then session("picturecount") = 0 end if session("picturecount") = session("picturecount") + 1 select case session("picturecount") mod 13 case 1 linkpage = "/new1.asp" case 2 linkpage = "/new2.asp" case 3 linkpage = "/new3.asp" case 4 linkpage = "/new4.asp" case 5 linkpage = "/new5.asp" case 6 linkpage = "/new6.asp" case 7 linkpage = "/new7.asp" case 8 linkpage = "/new8.asp" case 9 linkpage = "/new9.asp" case 10 linkpage = "/new-d1.asp" case 11 linkpage = "/new-d2.asp" case 12 linkpage = "/new-d3.asp" end select response.write cr response.write "" response.write " " %><% if session("picturecount") > maxpictures then session("picturecount") = 0 end if session("picturecount") = session("picturecount") + 1 select case session("picturecount") mod 13 case 1 linkpage = "/new1.asp" case 2 linkpage = "/new2.asp" case 3 linkpage = "/new3.asp" case 4 linkpage = "/new4.asp" case 5 linkpage = "/new5.asp" case 6 linkpage = "/new6.asp" case 7 linkpage = "/new7.asp" case 8 linkpage = "/new8.asp" case 9 linkpage = "/new9.asp" case 10 linkpage = "/new-d1.asp" case 11 linkpage = "/new-d2.asp" case 12 linkpage = "/new-d3.asp" end select response.write cr response.write "" response.write " " %><% if session("picturecount") > maxpictures then session("picturecount") = 0 end if session("picturecount") = session("picturecount") + 1 select case session("picturecount") mod 13 case 1 linkpage = "/new1.asp" case 2 linkpage = "/new2.asp" case 3 linkpage = "/new3.asp" case 4 linkpage = "/new4.asp" case 5 linkpage = "/new5.asp" case 6 linkpage = "/new6.asp" case 7 linkpage = "/new7.asp" case 8 linkpage = "/new8.asp" case 9 linkpage = "/new9.asp" case 10 linkpage = "/new-d1.asp" case 11 linkpage = "/new-d2.asp" case 12 linkpage = "/new-d3.asp" end select response.write cr response.write "" response.write " " %><% if session("picturecount") > maxpictures then session("picturecount") = 0 end if session("picturecount") = session("picturecount") + 1 select case session("picturecount") mod 13 case 1 linkpage = "/new1.asp" case 2 linkpage = "/new2.asp" case 3 linkpage = "/new3.asp" case 4 linkpage = "/new4.asp" case 5 linkpage = "/new5.asp" case 6 linkpage = "/new6.asp" case 7 linkpage = "/new7.asp" case 8 linkpage = "/new8.asp" case 9 linkpage = "/new9.asp" case 10 linkpage = "/new-d1.asp" case 11 linkpage = "/new-d2.asp" case 12 linkpage = "/new-d3.asp" end select response.write cr response.write "" response.write " " %><% if session("picturecount") > maxpictures then session("picturecount") = 0 end if session("picturecount") = session("picturecount") + 1 select case session("picturecount") mod 13 case 1 linkpage = "/new1.asp" case 2 linkpage = "/new2.asp" case 3 linkpage = "/new3.asp" case 4 linkpage = "/new4.asp" case 5 linkpage = "/new5.asp" case 6 linkpage = "/new6.asp" case 7 linkpage = "/new7.asp" case 8 linkpage = "/new8.asp" case 9 linkpage = "/new9.asp" case 10 linkpage = "/new-d1.asp" case 11 linkpage = "/new-d2.asp" case 12 linkpage = "/new-d3.asp" end select response.write cr response.write "" response.write " " %><% if session("picturecount") > maxpictures then session("picturecount") = 0 end if session("picturecount") = session("picturecount") + 1 select case session("picturecount") mod 13 case 1 linkpage = "/new1.asp" case 2 linkpage = "/new2.asp" case 3 linkpage = "/new3.asp" case 4 linkpage = "/new4.asp" case 5 linkpage = "/new5.asp" case 6 linkpage = "/new6.asp" case 7 linkpage = "/new7.asp" case 8 linkpage = "/new8.asp" case 9 linkpage = "/new9.asp" case 10 linkpage = "/new-d1.asp" case 11 linkpage = "/new-d2.asp" case 12 linkpage = "/new-d3.asp" end select response.write cr response.write "" response.write " " %><% if session("picturecount") > maxpictures then session("picturecount") = 0 end if session("picturecount") = session("picturecount") + 1 select case session("picturecount") mod 13 case 1 linkpage = "/new1.asp" case 2 linkpage = "/new2.asp" case 3 linkpage = "/new3.asp" case 4 linkpage = "/new4.asp" case 5 linkpage = "/new5.asp" case 6 linkpage = "/new6.asp" case 7 linkpage = "/new7.asp" case 8 linkpage = "/new8.asp" case 9 linkpage = "/new9.asp" case 10 linkpage = "/new-d1.asp" case 11 linkpage = "/new-d2.asp" case 12 linkpage = "/new-d3.asp" end select response.write cr response.write "" response.write " " %><% if session("picturecount") > maxpictures then session("picturecount") = 0 end if session("picturecount") = session("picturecount") + 1 select case session("picturecount") mod 13 case 1 linkpage = "/new1.asp" case 2 linkpage = "/new2.asp" case 3 linkpage = "/new3.asp" case 4 linkpage = "/new4.asp" case 5 linkpage = "/new5.asp" case 6 linkpage = "/new6.asp" case 7 linkpage = "/new7.asp" case 8 linkpage = "/new8.asp" case 9 linkpage = "/new9.asp" case 10 linkpage = "/new-d1.asp" case 11 linkpage = "/new-d2.asp" case 12 linkpage = "/new-d3.asp" end select response.write cr response.write "" response.write " " %><% if session("picturecount") > maxpictures then session("picturecount") = 0 end if session("picturecount") = session("picturecount") + 1 select case session("picturecount") mod 13 case 1 linkpage = "/new1.asp" case 2 linkpage = "/new2.asp" case 3 linkpage = "/new3.asp" case 4 linkpage = "/new4.asp" case 5 linkpage = "/new5.asp" case 6 linkpage = "/new6.asp" case 7 linkpage = "/new7.asp" case 8 linkpage = "/new8.asp" case 9 linkpage = "/new9.asp" case 10 linkpage = "/new-d1.asp" case 11 linkpage = "/new-d2.asp" case 12 linkpage = "/new-d3.asp" end select response.write cr response.write "" response.write " " %><% if session("picturecount") > maxpictures then session("picturecount") = 0 end if session("picturecount") = session("picturecount") + 1 select case session("picturecount") mod 13 case 1 linkpage = "/new1.asp" case 2 linkpage = "/new2.asp" case 3 linkpage = "/new3.asp" case 4 linkpage = "/new4.asp" case 5 linkpage = "/new5.asp" case 6 linkpage = "/new6.asp" case 7 linkpage = "/new7.asp" case 8 linkpage = "/new8.asp" case 9 linkpage = "/new9.asp" case 10 linkpage = "/new-d1.asp" case 11 linkpage = "/new-d2.asp" case 12 linkpage = "/new-d3.asp" end select response.write cr response.write "" response.write " " %><% if session("picturecount") > maxpictures then session("picturecount") = 0 end if session("picturecount") = session("picturecount") + 1 select case session("picturecount") mod 13 case 1 linkpage = "/new1.asp" case 2 linkpage = "/new2.asp" case 3 linkpage = "/new3.asp" case 4 linkpage = "/new4.asp" case 5 linkpage = "/new5.asp" case 6 linkpage = "/new6.asp" case 7 linkpage = "/new7.asp" case 8 linkpage = "/new8.asp" case 9 linkpage = "/new9.asp" case 10 linkpage = "/new-d1.asp" case 11 linkpage = "/new-d2.asp" case 12 linkpage = "/new-d3.asp" end select response.write cr response.write "" response.write " " %><% if session("picturecount") > maxpictures then session("picturecount") = 0 end if session("picturecount") = session("picturecount") + 1 select case session("picturecount") mod 13 case 1 linkpage = "/new1.asp" case 2 linkpage = "/new2.asp" case 3 linkpage = "/new3.asp" case 4 linkpage = "/new4.asp" case 5 linkpage = "/new5.asp" case 6 linkpage = "/new6.asp" case 7 linkpage = "/new7.asp" case 8 linkpage = "/new8.asp" case 9 linkpage = "/new9.asp" case 10 linkpage = "/new-d1.asp" case 11 linkpage = "/new-d2.asp" case 12 linkpage = "/new-d3.asp" end select response.write cr response.write "" response.write " " %><% if session("picturecount") > maxpictures then session("picturecount") = 0 end if session("picturecount") = session("picturecount") + 1 select case session("picturecount") mod 13 case 1 linkpage = "/new1.asp" case 2 linkpage = "/new2.asp" case 3 linkpage = "/new3.asp" case 4 linkpage = "/new4.asp" case 5 linkpage = "/new5.asp" case 6 linkpage = "/new6.asp" case 7 linkpage = "/new7.asp" case 8 linkpage = "/new8.asp" case 9 linkpage = "/new9.asp" case 10 linkpage = "/new-d1.asp" case 11 linkpage = "/new-d2.asp" case 12 linkpage = "/new-d3.asp" end select response.write cr response.write "" response.write " " %> |
|||||||||||||||||||||||||||||||||||||||