:: Guia Freguesia ::

<% @Language="VBSCRIPT"%> <% session.lcid = 1046 Response.buffer = true Response.Clear Response.addHeader "pragma", "no-cache" Response.Expires = 0 Session.Timeout = 5 Dim strSQL, Conexao, rs, varCodCategoria varCodEmpresa = Request.QueryString("varCodEmpresa") set dataconn = server.createobject ("ADODB.connection") set rsEmp = server.createobject ("ADODB.recordset") dataconn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=D:\web\brnt3sp332\databases\lojas.mdb" strEmp = "SELECT * FROM Empresas WHERE COD_Empresa = '" & varCodEmpresa & "' ORDER BY Empresa" rsEmp.open strEmp, dataconn, 1, 3%> :: Guia Freguesia ::

Freguesia do Ó,

Classificados

CHAVEIROS

Vocę está em: Índice > Chaveiros

<% varemail = rsEmp("Email") if ISNull(varemail)then response.write "" end if IF Not ISNull(varemail) then %> <% end if %> <% varsite = rsEmp("Site") if ISNull(varsite)then response.write "" end if IF Not ISNull(varsite) then %> <% end if %> <% vardetalhes = rsEmp("Detalhes") if ISNull(vardetalhes)then response.write "" end if IF Not ISNull(vardetalhes) then %> <% end if %>

CHAVEIRO E FAIXAS INÊS

Av. Min. Petrônio Portela, 158

Tel.: (11) 3998-0074

JUNIOR

R. Enéas Luis C. Barbante, 19

Tel.: (11) 3935-0762

LOBATO

Av. Elíseo Teixeira Leite, 1433

Tel.: (11) 3999-1330

NENÊ

R. Brito Peixoto, 71

Tel.: (11) 3932-7508

NOSSA SENHORA DO Ó

Av. Nossa Senhora do Ó, 1693

Tel.: (11) 3926-7773

ORLANDO

Av. Min. Petronio Portela, 564

Tel.: (11) 3975-7187

RONALDO

Av. Itaberaba, 2191

Tel.: (11) 3924-1276

TELLES

Av. Dep. Emílio Carlos, 1239-A

Tel.: (11) 3936-3174

STILLO’S EXPRESSS

Av. Itaberaba, 560

Tel.: (11) 3932-9539

Voltar

<% rsEmp.Close Set rsEmp = Nothing dataconn.Close Set dataconn = Nothing %>