<% GalleryTotal = LoadGalleryList() If GalleryTotal > 0 Then Gallery = JustDigits(Request.QueryString("Gallery"), "1") GalleryIndex = CInt(Gallery) If GalleryIndex > GalleryTotal Then GalleryIndex = 1 If GalleryList(GalleryIndex - 1, 3) = "True" Then GalleryName = GalleryList(GalleryIndex - 1, 0) Gallery = GalleryList(GalleryIndex - 1, 1) If CInt(GalleryList(GalleryIndex - 1, 2)) > 0 Then ImageTotal = LoadImageList(Gallery) Else ImageTotal = 0 End If Else ImageTotal = 0 End If End If If PageName = "" Then PageName = "galleries.asp" If Session("Authorised") = "Authorised" Then ScrollThumbnails = "scroll" Else ScrollThumbnails = "hidden" End If %> decorative paint finishes marbling graining trompe l'oeil UK Lancashire
<%= ShowForm %>