<%@LANGUAGE="VBSCRIPT"%> <% Session.LCID=2057 %> <% Dim rsContent Dim rsContent_numRows Set rsContent = Server.CreateObject("ADODB.Recordset") rsContent.ActiveConnection = MM_connCore_STRING rsContent.Source = "SELECT * FROM tblPages WHERE fldArea = " & Request.Querystring("fldArea") rsContent.CursorType = 0 rsContent.CursorLocation = 2 rsContent.LockType = 1 rsContent.Open() rsContent_numRows = 0 Dim PageId PageID = "page" %> <%= (rsSiteInfo.Fields.Item("fldTitle").value) %> | <%=(rsContent.Fields.Item("fldHeading").Value)%> "> "> ">
Saito Sensei
Takemusu Iwama Aikido

<%=(rsSiteInfo.Fields.Item("fldSiteName").Value)%>

<%=(rsContent.Fields.Item("fldContent").Value)%>
<% rsContent.Close() Set rsContent = Nothing %>