<%@LANGUAGE="VBSCRIPT"%> <% Dim pageviews__MMColParam pageviews__MMColParam = "1" If (Request.QueryString("ID") <> "") Then pageviews__MMColParam = Request.QueryString("ID") End If %> <% Dim pageviews Dim pageviews_numRows Set pageviews = Server.CreateObject("ADODB.Recordset") pageviews.ActiveConnection = MM_dbconnection_STRING pageviews.Source = "SELECT * FROM thepages WHERE ID = " + Replace(pageviews__MMColParam, "'", "''") + "" pageviews.CursorType = 0 pageviews.CursorLocation = 2 pageviews.LockType = 1 pageviews.Open() pageviews_numRows = 0 %> Walpole Street
                   
         
                   

<%=(pageviews.Fields.Item("leftcolumn").Value)%>

<%=(pageviews.Fields.Item("pagetitle").Value)%>

<%=(pageviews.Fields.Item("pagecontent").Value)%>

 

<% pageviews.Close() Set pageviews = Nothing %>