<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim Recordset1__MMColParam Recordset1__MMColParam = "1" If (Request.QueryString("ContentId") <> "") Then Recordset1__MMColParam = Request.QueryString("ContentId") End If %> <% Dim Recordset1 Dim Recordset1_cmd Dim Recordset1_numRows Set Recordset1_cmd = Server.CreateObject ("ADODB.Command") Recordset1_cmd.ActiveConnection = MM_ACCG_STRING Recordset1_cmd.CommandText = "SELECT * FROM Content WHERE ContentID = ?" Recordset1_cmd.Prepared = true Recordset1_cmd.Parameters.Append Recordset1_cmd.CreateParameter("param1", 5, 1, -1, Recordset1__MMColParam) ' adDouble Set Recordset1 = Recordset1_cmd.Execute Recordset1_numRows = 0 %> ACCG Advancing Georgia's Counties

<%=(Recordset1.Fields.Item("Title").Value)%>

<%=(Recordset1.Fields.Item("LongDesc").Value)%>
<% Recordset1.Close() Set Recordset1 = Nothing %>