<%
SetLocale(1034)
Session.CodePage=65001
%>
Depilación laser Barcelona total laser. Celulitis tratamiento
Des promotions
<%
On Error Resume Next
Set rs = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT * FROM Promociones ORDER BY Titulo"
rs.Open strSQL, cn
If Err Then
Response.Write("Se ha producido un error " & err.description)
Response.End()
End If
if rs.BOF and rs.EOF then
rs.Close
else
arrPromociones = rs.GetRows
rs.Close
k_Id = 0
k_Titulo = 1
k_TituloCatalan = 2
k_Porcentaje = 3
k_TituloIngles = 4
k_TituloFrances = 5
'Mostramos todos los inmuebles paginados.
For i = 0 To Ubound(arrPromociones, 2)
%>
<%=arrPromociones(k_TituloFrances, i)%>
<%=arrPromociones(k_Porcentaje, i)%>% DÉDUIS
<%
Next
end if
Set rs = Nothing
%>
TOTAL LASER se réserve le droit de modifier les conditions de ces promotions sans un avis préalable