<%Set rs = conn.Execute("SELECT * FROM portImages WHERE portImages.imgPub = 1 ORDER BY portImages.imgTitle;") if request("imgNum") = "" then imgSelect = 1 Else imgSelect = CInt(request("imgNum")) End If imgCount = 0 While NOT rs.EOF imgCount = imgCount + 1 rs.MoveNext Wend rs.MoveFirst %> <% If request("imgDisp") = "" then display = "" response.write "" response.write rs("imgTitle") response.write "" story = rs("imgDesc") Else Set rsGet = conn.Execute("SELECT * FROM portImages WHERE portImages.imgId=" & request("imgDisp") & ";") display = "" response.write "" response.write rsGet("imgTitle") response.write "" story = rsGet("imgDesc") %> <% End If %> <% If story <> "" then%> <% End If %> <%= display %> PORTRAIT DETAILS: <%= story %> <% buildLoop = 0 While NOT rs.EOF buildLoop = buildLoop + 1 response.write "" response.write "" rs.MoveNext Wend %> <%Set rs = conn.Execute("SELECT * FROM qtMovies WHERE qtMovies.imgPub = 1 ORDER BY qtMovies.imgTitle;") While NOT rs.EOF response.write "" rs.MoveNext Wend rs.MoveFirst %> Click on any of the “Now Showing” names to reveal a unique cartoon. " If imgSelect = buildLoop then response.write "" End If response.write " " response.write "" response.write rs("imgTitle") response.write " " response.write "" response.write "" response.write rs("imgTitle") & "" response.write " www.kingmini.com www.kevinpope.com © <%= year(now) %> SkullBoy Worldwide, Inc. All rights reserved.      Website by Antidote X