<%@LANGUAGE="VBSCRIPT"%>
<%
Dim offres__MMColParam
offres__MMColParam = "95"
If (Request("MM_EmptyValue") <> "") Then
offres__MMColParam = Request("MM_EmptyValue")
End If
%>
<%
Dim offres
Dim offres_cmd
Dim offres_numRows
Set offres_cmd = Server.CreateObject ("ADODB.Command")
offres_cmd.ActiveConnection = MM_bdsammoffreshotel_STRING
offres_cmd.CommandText = "SELECT * FROM offres WHERE numero = ?"
offres_cmd.Prepared = true
offres_cmd.Parameters.Append offres_cmd.CreateParameter("param1", 5, 1, -1, offres__MMColParam) ' adDouble
Set offres = offres_cmd.Execute
offres_numRows = 0
%>
<%
Dim detail_offre__MMColParam
detail_offre__MMColParam = "95"
If (Request("MM_EmptyValue") <> "") Then
detail_offre__MMColParam = Request("MM_EmptyValue")
End If
%>
<%
Dim detail_offre
Dim detail_offre_cmd
Dim detail_offre_numRows
Set detail_offre_cmd = Server.CreateObject ("ADODB.Command")
detail_offre_cmd.ActiveConnection = MM_bdsammoffreshotel_STRING
detail_offre_cmd.CommandText = "SELECT * FROM offre_01 WHERE numero = ?"
detail_offre_cmd.Prepared = true
detail_offre_cmd.Parameters.Append detail_offre_cmd.CreateParameter("param1", 200, 1, 50, detail_offre__MMColParam) ' adVarChar
Set detail_offre = detail_offre_cmd.Execute
detail_offre_numRows = 0
%>
L'hôtel de la place à Lisieux propose des offres spéciales pour votre séjour en Normandie, proche de Deauville, Trouville et Honfleur
