<%@ LANGUAGE = "VBScript" %>
<!-- #include file="common.asp" -->
<% 
    Session("ClickGalleryUsername") = ""
    Session("ClickGalleryUserID") = ""
    Session("ClickGalleryGuest") = ""
    Session("publicUser") = ""
strSQL = "SELECT public_gallery_user_id FROM cg_public_gallery"
set dbRS = dbConn.execute(strSQL)

PUBLIC_GALLERY_USER_ID = dbRS(0)

if PUBLIC_GALLERY_USER_ID = 0 then

response.redirect("default.asp")

else

         strSQL = "SELECT user_name FROM cg_users" _
            & " WHERE user_id = " & PUBLIC_GALLERY_USER_ID & ""
         set dbRS = dbConn.Execute(strSQL)
Session("ClickGalleryGuest") = "yes"
Session("publicUser") = "yes"
Session("ClickGalleryUsername") = dbRS("user_name")
Session("ClickGalleryUserID") = PUBLIC_GALLERY_USER_ID

load_settings(PUBLIC_GALLERY_USER_ID)

Response.Redirect("gallery.asp?currentpage=1")
end if

call CloseDB %>