<%@LANGUAGE="VBScript" CODEPAGE="1252"%> <% Dim lmusados__MMColParam lmusados__MMColParam = "-1" If (Request("MM_EmptyValue") <> "") Then lmusados__MMColParam = Request("MM_EmptyValue") End If %> <% Dim lmusados Dim lmusados_cmd Dim lmusados_numRows Set lmusados_cmd = Server.CreateObject ("ADODB.Command") lmusados_cmd.ActiveConnection = MM_grijos_STRING lmusados_cmd.CommandText = "SELECT * FROM fsall WHERE Hide <> ? ORDER BY Marca ASC" lmusados_cmd.Prepared = true lmusados_cmd.Parameters.Append lmusados_cmd.CreateParameter("param1", 11, 1, -1, lmusados__MMColParam) ' adBoolean Set lmusados = lmusados_cmd.Execute lmusados_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 lmusados_numRows = lmusados_numRows + Repeat1__numRows %> <% menu = 4 page = 1 %> Le Meridien | Usados
Usados

Te ofrecemos las mejores ofertas de usados, brindándote más servicios y facilidades.

En Le Meridien encontrarás la forma más transparente, fácil y segura de comprar tu auto.


<% While ((Repeat1__numRows <> 0) AND (NOT lmusados.EOF)) %> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 lmusados.MoveNext() Wend %>
Marca Modelo Color Año Ubic.
<%=(lmusados.Fields.Item("Marca").Value)%> <%=(lmusados.Fields.Item("Modelo").Value)%> <%=(lmusados.Fields.Item("Color").Value)%> <%=(lmusados.Fields.Item("Anio").Value)%> <%=(lmusados.Fields.Item("Ubic").Value)%>
<% lmusados.Close() Set lmusados = Nothing %>