%
set rs = Server.CreateObject("Adodb.Recordset")
rs.open "select cityid,cityno from city order by cityid",conn
%>
Help
<% chkmenu=0 %>
Help
Under Construction
<% if not session("username")="" then %>
<%
if not session("petitemid")="" then
set rsp =Server.CreateObject("adodb.recordset")
rsp.open "SELECT UserPetTable.userpetName, PetTable.petName, UserPetTable.energylevel, PetTable.smallimg FROM PetTable INNER JOIN UserPetTable ON PetTable.petId = UserPetTable.petId WHERE (((UserPetTable.userPetId)=" & session("petitemid") & "));",conn
if not rsp.eof then
%>