%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<% Dim SEO__MMColParam2 SEO__MMColParam2 = "pt" If (Session("Community_recname") <> "") Then SEO__MMColParam2 = Session("Community_recname") End If %> <% Dim SEO__MMColParam SEO__MMColParam = "/index.asp" If (request.servervariables("URL") <> "") Then SEO__MMColParam = request.servervariables("URL") End If %> <% Dim SEO Dim SEO_cmd Dim SEO_numRows Set SEO_cmd = Server.CreateObject ("ADODB.Command") SEO_cmd.ActiveConnection = MM_ccommunity_db_STRING SEO_cmd.CommandText = "SELECT * FROM SEO_Page_Info WHERE Webpage = ? and community=?" SEO_cmd.Prepared = true SEO_cmd.Parameters.Append SEO_cmd.CreateParameter("param1", 200, 1, 255, SEO__MMColParam) ' adVarChar SEO_cmd.Parameters.Append SEO_cmd.CreateParameter("param2", 200, 1, 255, SEO__MMColParam2) ' adVarChar Set SEO = SEO_cmd.Execute SEO_numRows = 0 %>
|
||||||||||||||||||
|
||||||||||||||||||