<%if session("username") = "" then response.Redirect("login.asp") End if session("totalweapon") = 0 set rs = server.CreateObject("ADODB.RECORDSET") rs.open "select * from userpetTable where userid = " & session("userid"),conn if rs.eof then Response.Redirect("pets.asp?p=1") end if rs.close %>

Mucho Weapon Wizard <%if Request.QueryString("notmuchmoney") = 1 then Response.Write(" You dont have sufficient money to buy that business...") end if%> <%if Request.QueryString("e") = 1 then Response.Write(" You have to take all weapons from previous levels.") end if%>          Hand Guns Hand Weapons Heavy Artillary Assault Weapons Explosive Devices