<% CALL abre_conexao consult_TextLocaliza_sql = "SELECT texto_completo,status_uso FROM "&var_BackBD_Client&"geral_textos WHERE websetor = 'localizacao'" SET consult_TextLocaliza_tab = Conexao.EXECUTE(consult_TextLocaliza_sql) var_TextLocaliza_texto_completo = consult_TextLocaliza_tab("texto_completo") var_TextLocaliza_status_uso = consult_TextLocaliza_tab("status_uso") consult_TextLocaliza_tab.CLOSE SET consult_TextLocaliza_tab = NOTHING IF var_TextLocaliza_status_uso = "ativo" THEN IF var_TextLocaliza_texto_completo <> "" THEN var_TextLocaliza_texto_completo_fim = replace(var_TextLocaliza_texto_completo,chr(13),"
") var_TextLocaliza_texto_completo_fim = replace(var_TextLocaliza_texto_completo_fim,"

",""&chr(149)&" ") ELSE var_TextLocaliza_texto_completo_fim = "" END IF END IF consult_EmpInfo_sql = "SELECT nome_fantasia,logradouro,numero,complemento,bairro,cidade,estado_sigla,pref_tel1,telefone1,pref_tel2,telefone2,pref_fax,fax,tipo_mapa,imagem_pequeno,moldura_img_pq,imagem_grande,moldura_img_gr FROM "&var_BackBD_Client&"empresa WHERE registro = 1" SET consult_EmpInfo_tab = Conexao.EXECUTE(consult_EmpInfo_sql) var_EmpInfo_nome_fantasia = consult_EmpInfo_tab("nome_fantasia") var_EmpInfo_logradouro = consult_EmpInfo_tab("logradouro") var_EmpInfo_numero = consult_EmpInfo_tab("numero") var_EmpInfo_complemento = consult_EmpInfo_tab("complemento") var_EmpInfo_bairro = consult_EmpInfo_tab("bairro") var_EmpInfo_cidade = consult_EmpInfo_tab("cidade") var_EmpInfo_estado_sigla = consult_EmpInfo_tab("estado_sigla") var_EmpInfo_pref_tel1 = consult_EmpInfo_tab("pref_tel1") var_EmpInfo_telefone1 = consult_EmpInfo_tab("telefone1") var_EmpInfo_pref_tel2 = consult_EmpInfo_tab("pref_tel2") var_EmpInfo_telefone2 = consult_EmpInfo_tab("telefone2") var_EmpInfo_pref_fax = consult_EmpInfo_tab("pref_fax") var_EmpInfo_fax = consult_EmpInfo_tab("fax") var_EmpInfo_tipo_mapa = consult_EmpInfo_tab("tipo_mapa") var_EmpInfo_imagem_pequeno = consult_EmpInfo_tab("imagem_pequeno") var_EmpInfo_moldura_img_pq = consult_EmpInfo_tab("moldura_img_pq") var_EmpInfo_imagem_grande = consult_EmpInfo_tab("imagem_grande") var_EmpInfo_moldura_img_gr = consult_EmpInfo_tab("moldura_img_gr") consult_EmpInfo_tab.CLOSE SET consult_EmpInfo_tab = NOTHING %>

<% IF var_TextLocaliza_texto_completo_fim <> "" THEN %> <%=var_TextLocaliza_texto_completo_fim%> <% END IF var_EmpInfo_endereco_write = "" IF var_EmpInfo_complemento <> "" THEN var_EmpInfo_endereco_write = var_EmpInfo_logradouro & ", " & var_EmpInfo_numero & " - " & var_EmpInfo_complemento & " " & var_EmpInfo_bairro & " - " & var_EmpInfo_cidade & " - " & var_EmpInfo_estado_sigla ELSE var_EmpInfo_endereco_write = var_EmpInfo_logradouro & ", " & var_EmpInfo_numero & " " & var_EmpInfo_bairro & " - " & var_EmpInfo_cidade & " - " & var_EmpInfo_estado_sigla END IF IF var_EmpInfo_telefone1 <> "" THEN var_EmpInfo_telefone1_write = "Fone 1: (" & var_EmpInfo_pref_tel1 & ") " & var_EmpInfo_telefone1 & " " ELSE var_EmpInfo_telefone1_write = "" END IF IF var_EmpInfo_telefone2 <> "" THEN var_EmpInfo_telefone2_write = "Fone 2: (" & var_EmpInfo_pref_tel2 & ") " & var_EmpInfo_telefone2 & " " ELSE var_EmpInfo_telefone2_write = "" END IF IF var_EmpInfo_fax <> "" THEN var_EmpInfo_fax_write = "Fax: (" & var_EmpInfo_pref_fax & ") " & var_EmpInfo_fax & " " ELSE var_EmpInfo_fax_write = "" END IF IF var_EmpInfo_imagem_pequeno <> "" THEN var_ImgPath_pq = var_ImgPathHTTPWebPasta_Localizacao & var_EmpInfo_imagem_pequeno ELSE var_ImgPath_pq = var_ImgPathHTTPWebPasta_ND & "img_nd_mapa_pq.jpg" END IF IF var_EmpInfo_imagem_grande <> "" THEN var_ImgPath_gr = var_ImgPathHTTPWebPasta_Localizacao & var_EmpInfo_imagem_grande ELSE var_ImgPath_gr = var_ImgPathHTTPWebPasta_ND & "img_nd_mapa_gr.jpg" END IF IF var_EmpInfo_moldura_img_pq = "sim" THEN var_ImgBorder_table = " CLASS=bd_gray" ELSE var_ImgBorder_table = "" END IF %> <% IF var_EmpInfo_tipo_mapa = "google" THEN %> <% ELSE %> <% END IF %> <% IF var_EmpInfo_imagem_grande <> "" THEN %> > <% ELSE %> > <% END IF %> Endereço: <%=var_EmpInfo_endereco_write%> Telefone(s): <%=var_EmpInfo_telefone1_write%><%=var_EmpInfo_telefone2_write%><%=var_EmpInfo_fax_write%>

<% CALL abre_conexao %>