<%@LANGUAGE="VBSCRIPT"%> <% set Marques_nou = Server.CreateObject("ADODB.Recordset") Marques_nou.ActiveConnection = MM_Toyota_STRING Marques_nou.Source = "SELECT DISTINCT(Marca) AS Marques FROM Nous WHERE Tipo = ('cotxe');" Marques_nou.CursorType = 0 Marques_nou.CursorLocation = 2 Marques_nou.LockType = 3 Marques_nou.Open() Marques_nou_numRows = 0 %> <% set Motos_nou = Server.CreateObject("ADODB.Recordset") Motos_nou.ActiveConnection = MM_Toyota_STRING Motos_nou.Source = "SELECT DISTINCT(Marca) AS Marques FROM Nous WHERE Tipo = ('moto');" Motos_nou.CursorType = 0 Motos_nou.CursorLocation = 2 Motos_nou.LockType = 3 Motos_nou.Open() Motos_nou_numRows = 0 %> <% set Marques = Server.CreateObject("ADODB.Recordset") Marques.ActiveConnection = MM_Toyota_STRING Marques.Source = "SELECT * FROM Marcas_Ocasio" Marques.CursorType = 0 Marques.CursorLocation = 2 Marques.LockType = 3 Marques.Open() Marques_numRows = 0 %> <% set Marcas_Accesorios = Server.CreateObject("ADODB.Recordset") Marcas_Accesorios.ActiveConnection = MM_Toyota_STRING Marcas_Accesorios.Source = "SELECT * FROM Marques_Accesoris" Marcas_Accesorios.CursorType = 0 Marcas_Accesorios.CursorLocation = 2 Marcas_Accesorios.LockType = 3 Marcas_Accesorios.Open() Marcas_Accesorios_numRows = 0 %> <% set Modelo_Accesorios = Server.CreateObject("ADODB.Recordset") Modelo_Accesorios.ActiveConnection = MM_Toyota_STRING Modelo_Accesorios.Source = "SELECT * FROM Models_Accesoris" Modelo_Accesorios.CursorType = 0 Modelo_Accesorios.CursorLocation = 2 Modelo_Accesorios.LockType = 3 Modelo_Accesorios.Open() Modelo_Accesorios_numRows = 0 %> Productes



Disponemos de una amplia gama de vehículos de las marcas:

Coches
o Turismos
o Todo terrenos
o Industriales		 Motos
o De carretera
o De montaña
o De ciudad

Y una amplia oferta de productos complementarios, neumáticos, cascos, monos ...
Para más información consulten nuestra base de datos de vehículos:

<% if (NOT Marques_nou.EOF) OR (NOT Marques_nou.BOF) then %>
Gasolina
Diesel
<% else %>
En este momento no tenemos productos para mostrar.
<% end if %> <% if (NOT Motos_nou.EOF) OR (NOT Motos_nou.BOF) then %>
<% else %>
En este momento no tenemos productos para mostrar.
<% end if %> <% if (NOT Marques.EOF) OR (NOT Marques.BOF) then %>
<% else %>
En este momento no tenemos productos para mostrar.
<% end if %> <% if (NOT Marcas_Accesorios.EOF) OR (NOT Marcas_Accesorios.BOF) then %>
<% else %>
En este momento no tenemos productos para mostrar.
<% end if %>
<% Marques.Close() %> <% Marcas_Accesorios.Close() %> <% Modelo_Accesorios.Close() %>