
	Locadora \| Imóveis \| e-mail

Consórcios de Automóveis Agenciamento | Procura de Consórcio

Confira abaixo nossas opções em consórcios contemplados de veículos, caminhões, onibus e motos:

<% const aduseclient = 3 SQLtemp = "select * from consorcios where finalidade like 'Automóvel' Order by codigo" pagina = request("qualpagina") if pagina = "" then pagina = 1 end if tamanhopagina = request("pagesize") if tamanhopagina = "" then tamanhopagina = 20 end if SQL = request("SQLquery") if SQL = "" then SQL = SQLtemp end if set rstemp = Server.CreateObject("ADODB.Recordset") rstemp.cursorlocation = aduseclient rstemp.open SQL,"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\domains\barcelloslocadora.com.br\db\database.mdb;Persist Security Info=False",1 if not rstemp.eof then contador = rstemp.recordcount rstemp.movefirst rstemp.PageSize = tamanhopagina maximopagina = cint(rstemp.PageCount) maximoregistros = cint(rstemp.PageSize) rstemp.AbsolutePage = pagina registros = 0 response.write "" response.write "" response.write "" Do Until rstemp.eof OR registros >= maximoregistros response.write "" response.write "" response.write "" response.write "" response.write "" response.write "" response.write "" response.write "" rstemp.movenext registros = registros + 1 Loop rstemp.close set rstemp=nothing %>

Cód.	Administradora	Crédito	Entrada	Parcelas	Observação
" response.write "" response.write "Pagina " & pagina & " de " & maximopagina & "
" response.write " " & rstemp(1) & "" response.write "	" response.write "" & rstemp(2) & "" response.write "	" response.write "" & rstemp(4) & "" response.write "	" response.write "" & rstemp(7) & "" response.write "	" response.write "" & rstemp(8) & "" response.write "	" response.write "" & rstemp(10) & "" response.write "
Página: <% pad = "0" scriptname = request.servervariables("script_name") for counter = 1 to maximopagina if counter >= 10 then pad = "" End if ref ="" & pad & counter & " -" response.write ref & " " next %>

Total de Consórcios: <%=contador%>

<% else %>

Não foi encontrado nenhum consórcio com essas especificações.