<% Dim conCarioca Dim recPedido Dim varData Dim Varid Dim VarNome Caminho = Request.ServerVariables("SCRIPT_NAME") Caminho = StrReverse(Caminho) Caminho = Mid(Caminho, InStr(1, Caminho, "/")) Caminho = StrReverse(Caminho) VarCaminho = Server.MapPath(Caminho) & "\bd\nobre.mdb" Set conNobre=Server.CreateObject("ADODB.Connection") Set recPedido=Server.CreateObject("ADODB.Recordset") conNobre.Open "DBQ=" & VarCaminho & ";Driver={Microsoft Access Driver (*.mdb)}" sql = "SELECT * FROM cliente" set rs = conNobre.Execute(sql) %> Nova pagina 3
 

Canal digital

Editorial

Já temos novidades!

Agora você pode vizualizar aqui em nossa página inicial nossos lançamentos mais recentes... Basta clicar no item desejado na tabela abaixo.

Nosso catálogo de produtos esta a cada dia mais completo e atualizado.
Essa é apenas uma pequena amostra do nosso empenho para nos manter na vanguarda.

 

Lançamentos!

 

RN

MARCA

N ORIGINAL

8037

MBB

-

8038

MBB

-

8039

MBB

-

33019

VOLVO

20722444

33035

VOLVO

20810091

31865

FORD

6C45-8005-BB

36450

FORD

2C458005GA/GB

30946

FORD

XC458005DA

98HU8005BA

98HU8005HB

30940

FORD

2C458005DA

31854

FORD

2C458005EB/EA

30960

FORD

2C458005 AA

30587

MBB

693.500.00.01

 

 
 

 

 

Recomendamos Microsoft Internet Explorer - Resolução de vídeo em 800x600      -     Copyright 2008 © Todos os direitos reservados