%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim rsPage__MMColParam
rsPage__MMColParam = "7"
If (Request("MM_EmptyValue") <> "") Then
rsPage__MMColParam = Request("MM_EmptyValue")
End If
%>
<%
Dim rsPage
Dim rsPage_cmd
Dim rsPage_numRows
Set rsPage_cmd = Server.CreateObject ("ADODB.Command")
rsPage_cmd.ActiveConnection = MM_conStadsboerderij_STRING
rsPage_cmd.CommandText = "SELECT * FROM pagina WHERE pagina_id = ?"
rsPage_cmd.Prepared = true
rsPage_cmd.Parameters.Append rsPage_cmd.CreateParameter("param1", 5, 1, -1, rsPage__MMColParam) ' adDouble
Set rsPage = rsPage_cmd.Execute
rsPage_numRows = 0
%>
Bed & Breakfast De Stadsboerderij Kampen - De sauna