<%@ Language=VBScript %> Houseboats <% Dim ImagetoDisp dim ImageExt dim NextUrl Dim BackUrl Dim ImageStart Dim HomeUrl ImageExt=".jpg" ImageStart=Request.QueryString("imagename") ImagetoDisp=Request.QueryString("imagename") ImagetoDisp="images/"&ImagetoDisp&ImageExt if imageStart >=25 then HomeUrl="potogallery2.htm" else HomeUrl=Request.QueryString("home") end if if ImageStart = 48 then NextUrl=HomeUrl BackUrl="viewphoto.asp?home="&homeurl&"&imagename="&ImageStart-1 elseif ImageStart =1 then NextUrl="viewphoto.asp?home="&homeurl&"&imagename="&ImageStart+1 BackUrl=HomeUrl else NextUrl="viewphoto.asp?home="&homeurl&"&imagename="&ImageStart+1 BackUrl="viewphoto.asp?home="&homeurl&"&imagename="&ImageStart-1 end if %>

 

ALLEPPEY HOUSE BOATS  PHOTO GALLERY

< Back

Back to Photo Gallery Next >