Direktori : /home/redrockmedical/public_html/sleepcenterofnevada.com/
Upload File :
Current File : /home/redrockmedical/public_html/sleepcenterofnevada.com/popPhoto.asp

<html>

<head>
<title><% = request("title") %></title>

<link rel="StyleSheet" href="coolstyle.css" type="text/css">

</head>

<%
	dim photos(11), titles(11)
	photos(0) = "tour4.jpg"
	photos(1) = "tour8.jpg"
	photos(2) = "tour2.jpg"
	photos(3) = "tour6.jpg"
	photos(4) = "tour3.jpg"
	photos(5) = "tour5.jpg"
	photos(6) = "tour9.jpg"
	photos(7) = "tour11.jpg"
	photos(8) = "tour12.jpg"
	photos(9) = "tour13.jpg"
	photos(10) = "tour14.jpg"

	titles(0) = "The Sleep Center of Nevada - Entrance"
	titles(1) = "The Sleep Center of Nevada - Lobby"
	titles(2) = "The Sleep Center of Nevada - Sleeping Area"
	titles(3) = "The Sleep Center of Nevada - TV"
	titles(4) = "The Sleep Center of Nevada - Bathroom"
	titles(5) = "The Sleep Center of Nevada - Control Room"
	titles(6) = "The Sleep Center of Nevada - Examination Room"
	titles(7) = "The Sleep Center of Nevada - New Image"
	titles(8) = "The Sleep Center of Nevada - New Image"
	titles(9) = "The Sleep Center of Nevada - New Image"
	titles(10) = "The Sleep Center of Nevada - New Image"

	function getCurrentPhoto()
		dim i, img
		img = Request("img")
		for i = 0 to ubound(photos)-1
			if lcase(photos(i))=lcase(img) then exit for
		next
		getCurrentPhoto = i
	end function

	function getPreviousPhoto()
		dim i
		i = getCurrentPhoto - 1
		if i<0 then i=ubound(photos)-1
		getPreviousPhoto = i
	end function 

	function getNextPhoto()
		dim i
		i = getCurrentPhoto + 1
		if i>=ubound(photos) then i=0
		getNextPhoto = i
	end function 
%>
<body onload="window.focus()" bgcolor="#000000" link="gold" vlink="gold" topmargin="8" leftmargin="8"
marginwidth="8" marginheight="8">

<center>

<br>
<p align="center">
<a href="popPhoto.asp?title=<% = titles(getPreviousPhoto) %>&img=<% = photos(getPreviousPhoto) %>"><img src="picts/left.gif" align="absmiddle" border="0" alt="click to scroll left"></a>&nbsp;
<a href="#" onClick="window.close(self) ">Close Window</a>&nbsp;
<a href="popPhoto.asp?title=<% = titles(getNextPhoto) %>&img=<% = photos(getNextPhoto) %>"><img src="picts/right.gif" align="absmiddle" border="0" alt="click to scroll right"></a>&nbsp;

</p>

<p align="center">
<img src="picts/<% = request("img") %>"><br></p>

</center>

</body>
</html>