% dim db,rs,sql,name,message session("mcat")=request.querystring("cat") set db=server.createobject("adodb.connection") db.open "chat1" set rs=server.createobject("adodb.recordset") sql="select * from festival;" rs.open sql,db %>
Festivals
Name
Date
<%=rs.fields("fname")%>
<%=rs.fields("fdate")%>
No Festivals Listed