<%@LANGUAGE="VBSCRIPT"%> [an error occurred while processing this directive] <% Dim homedata__MMColParam homedata__MMColParam = "1" If (Request("MM_EmptyValue") <> "") Then homedata__MMColParam = Request("MM_EmptyValue") End If %> <% Dim homedata Dim homedata_cmd Dim homedata_numRows Set homedata_cmd = Server.CreateObject ("ADODB.Command") homedata_cmd.ActiveConnection = MM_landermason_STRING homedata_cmd.CommandText = "SELECT * FROM homepage WHERE ID = ?" homedata_cmd.Prepared = true homedata_cmd.Parameters.Append homedata_cmd.CreateParameter("param1", 5, 1, -1, homedata__MMColParam) ' adDouble Set homedata = homedata_cmd.Execute homedata_numRows = 0 %> Landermason - Home Page

<%=(homedata.Fields.Item("homepagetext").Value)%>

 

 

 

" class="photoimage" />

Facebook            Twitter

Landermason Tree of Souls

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