%@LANGUAGE="VBSCRIPT"%>
<%
set rsCountry = Server.CreateObject("ADODB.Recordset")
rsCountry.ActiveConnection = objConn
rsCountry.Source = "SELECT * FROM Countries ORDER BY country ASC"
rsCountry.CursorType = 0
rsCountry.CursorLocation = 2
rsCountry.LockType = 3
rsCountry.Open
rsCountry_numRows = 0
%>
<%
set rsAct = Server.CreateObject("ADODB.Recordset")
rsAct.ActiveConnection = objConn
rsAct.Source = "SELECT * FROM Activities ORDER BY activity ASC"
rsAct.CursorType = 0
rsAct.CursorLocation = 2
rsAct.LockType = 3
rsAct.Open
rsAct_numRows = 0
%>
realworld travel - adventure holidays from around the world