<%
'-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
' script name	: randomgallery.asp
' author		: Misty Rae Myslinski (misty@applicationx.net)
' copyright		: Application X, 2000-2003
' created date	: 4/11/2003

' description	: Select a random record from a
'				  list of galleries and return the page name.
'				  load the returned page into the appropriate frameset

' history
'	4/11/2003	Initial Revision
'-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+

OPTION EXPLICIT
%>
<!--#Include Virtual="Includes/fundamental_inc.asp"-->
<%
Dim sVal

MakeConn defaultConn
sVal = MakeRs_ReturnRanFld("SELECT URL FROM RandomGallery", "URL")
DestroyConn

Response.Redirect sVal


%>