
|

|

<% CALL abre_conexao
consult_TextFale_sql = "SELECT texto_completo,status_uso FROM "&var_BackBD_Client&"geral_textos WHERE websetor = 'fale_conosco'"
SET consult_TextFale_tab = Conexao.EXECUTE(consult_TextFale_sql)
var_TextFale_texto_completo = consult_TextFale_tab("texto_completo")
var_TextFale_status_uso = consult_TextFale_tab("status_uso")
consult_TextFale_tab.CLOSE
SET consult_TextFale_tab = NOTHING
IF var_TextFale_status_uso = "ativo" THEN
IF var_TextFale_texto_completo <> "" THEN
var_TextFale_texto_completo_fim = replace(var_TextFale_texto_completo,chr(13)," ")
var_TextFale_texto_completo_fim = replace(var_TextFale_texto_completo_fim,"",""&chr(149)&" ")
ELSE
var_TextFale_texto_completo_fim = ""
END IF
END IF
IF var_TextFale_texto_completo_fim <> "" THEN %>
<%=var_TextFale_texto_completo_fim%>
|

<% END IF %>
[ os campos com : são de preenchimento obrigatório ]
|





Mensagem :
|
 |
|


|

|

|

|