Este fórum é para dúvidas onde a base da questão é a linguagem ASP.
Moderador: web
 por Fagner de Leon Offline » Ter Ago 10, 2010 4:12 pm
|
Boa tarde,
estou tendo problemas no recebimento dos e-mail, por exemplo...
são paulo chega = so paulo
alguém sabe como resolver este problema ?
segue abaixo alguns códigos que estão no meu arquivo.
- Código: Selecionar todos
<html xmlns="http://www.w3.org/1999/xhtml" lang="pt-br" xml:lang="pt-br">
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
desde já, obrigado.
Fagner de Leon
MEMBRO
Mensagens: 30
Registrado em: Ter Jun 08, 2010 12:34 pm
|
por web Offline » Ter Ago 10, 2010 4:17 pm
Esse charset não aceita os caracteres acentuados da língua portuguesa, tem que usar esse: ISO-8859-1
Gostou do que encontrou? Divulgue, indique, participe, agradeça pelas respostas.
Faço scripts personalizados ou reparos em scripts. Orçamento MSN codigosnaweb1 [@] gmail [.] com
web
ADMIN
Mensagens: 12425
Registrado em: Sáb Jan 20, 2007 6:08 pm
Localização: RJ / RJ / Brasil
|
por Fagner de Leon Offline » Ter Ago 10, 2010 4:46 pm
eu tenho uma página, contatos.. e o formulario de envio dela, puxa a página enviar_contatos...
- Código: Selecionar todos
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="pt-br" xml:lang="pt-br">
<%
Dim Conexao
Set Conexao = Server.CreateObject("ADODB.Connection")
Conexao.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source =" & Server.MapPath("dados\dados_site.mdb")
Set contatos=Conexao.Execute("SELECT * FROM contatos")
%>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1" />
<title>Imprimax</title>
</head>
<body>
<%
oc_nome = Request.Form("oc_nome")
oc_empresa = Request.Form("oc_empresa")
oc_email = Request.Form("oc_email")
oc_telefone = Request.Form("oc_telefone")
oc_cidade = Request.Form("oc_cidade")
oc_estado = Request.Form("oc_estado")
oc_mensagem = Request.Form("oc_mensagem")
email_principal = Request.Form("oc_email_principal")
assunto = Request.Form("oc_nome_contato")
br = "<br>"
Set Mail = Server.CreateObject("CDO.Message")
Set Con = Server.CreateObject ("CDO.Configuration")
Con.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"
Con.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport")= 25
Con.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
Con.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30
Con.Fields.update
Set Mail.Configuration = Con
Mail.From = Cstr(oc_email)
Mail.To = "web@horuss.com.br;" & Cstr(email_principal)
Mail.subject = assunto
Mail.HtmlBody = "<html xmlns='http://www.w3.org/1999/xhtml' lang='pt-br' xml:lang='pt-br'><head><meta http-equiv='Content-Type' content='text/html; charset=ISO-8859-1' /></head><body><center><table width='0' border='0' cellspacing='0' cellpadding='0'><tr><td></td></tr><tr><td><table width='550' height='202' border='0' cellpadding='0' cellspacing='0'><tr><td width='555'><table width='555' height='150' border='0' cellpadding='0' cellspacing='0'><tr><td width='80' height='19'><p style='color:#00F; font-family:Arial, Helvetica, sans-serif; font-size:14px'>Setor:</p></td><td width='475' height='19'><p style='font-family:Arial, Helvetica, sans-serif; font-size:14px; color:#000000;'>" & assunto & "</p></td></tr><tr><td><p style='color:#00F; font-family:Arial, Helvetica, sans-serif; font-size:14px'>Nome:</p></td><td height='19'><p style='font-family:Arial, Helvetica, sans-serif; font-size:14px; color:#000000;'>" & oc_nome & "</p></td></tr><tr><td height='19'><p style='color:#00F; font-family:Arial, Helvetica, sans-serif; font-size:14px'>Empresa:</p></td><td><p style='font-family:Arial, Helvetica, sans-serif; font-size:14px; color:#000000;'>" & oc_empresa & "</p></td></tr><tr><td height='19'><p style='color:#00F; font-family:Arial, Helvetica, sans-serif; font-size:14px'>E-mail:</p></td><td><p style='font-family:Arial, Helvetica, sans-serif; font-size:14px; color:#000000;'>" & oc_email & "</p></td></tr><tr><td height='19'><p style='color:#00F; font-family:Arial, Helvetica, sans-serif; font-size:14px'>Telefone:</p></td><td><p style='font-family:Arial, Helvetica, sans-serif; font-size:14px; color:#000000;'>" & oc_telefone & "</p></td></tr><tr><td height='19'><p style='color:#00F; font-family:Arial, Helvetica, sans-serif; font-size:14px'>Cidade:</p></td><td><p style='font-family:Arial, Helvetica, sans-serif; font-size:14px; color:#000000;'>" & oc_cidade & "</p></td></tr><tr><td height='19'><p style='color:#00F; font-family:Arial, Helvetica, sans-serif; font-size:14px'>Estado:</p></td><td><p style='font-family:Arial, Helvetica, sans-serif; font-size:14px; color:#000000;'>" & oc_estado & "</p></td></tr><tr><td height='55'><p style='color:#00F; font-family:Arial, Helvetica, sans-serif; font-size:14px'>Mensagem:</p></td><td><p style='font-family:Arial, Helvetica, sans-serif; font-size:14px; color:#000000;'>" & replace(oc_mensagem,vbcrlf,"<br>") & "</p></td></tr></table></td></tr></table></td></tr><tr><td></td></tr></table></center></body></html>"
Mail.Send
Set Mail = Nothing
Set Con = Nothing
session("sim")="sim"
Response.Redirect("contatos.asp")
%>
</body>
</html>
Fagner de Leon
MEMBRO
Mensagens: 30
Registrado em: Ter Jun 08, 2010 12:34 pm
|
por web Offline » Ter Ago 10, 2010 4:50 pm
Isso ai é em Asp 
Você está fazendo alguma consulta a um banco de dados? Se sim, verifica como os valores estão lá.
MOVIDO de PHP para Asp
Gostou do que encontrou? Divulgue, indique, participe, agradeça pelas respostas.
Faço scripts personalizados ou reparos em scripts. Orçamento MSN codigosnaweb1 [@] gmail [.] com
web
ADMIN
Mensagens: 12425
Registrado em: Sáb Jan 20, 2007 6:08 pm
Localização: RJ / RJ / Brasil
|
por Fagner de Leon Offline » Ter Ago 10, 2010 4:54 pm
Utilizo somente para a opção estado...
Fagner de Leon
MEMBRO
Mensagens: 30
Registrado em: Ter Jun 08, 2010 12:34 pm
|
por web Offline » Ter Ago 10, 2010 4:57 pm
Acho que você vai ter que definir o charset via Asp
Veja se é assim
<%Response.charset="ISO-8859-1"%>
Gostou do que encontrou? Divulgue, indique, participe, agradeça pelas respostas.
Faço scripts personalizados ou reparos em scripts. Orçamento MSN codigosnaweb1 [@] gmail [.] com
web
ADMIN
Mensagens: 12425
Registrado em: Sáb Jan 20, 2007 6:08 pm
Localização: RJ / RJ / Brasil
|
por Fagner de Leon Offline » Ter Ago 17, 2010 4:55 pm
Kleber obrigado pela atenção...
consegui resolver utilizando suas dicas.
mas uma vez obrigado.
Fagner de Leon
MEMBRO
Mensagens: 30
Registrado em: Ter Jun 08, 2010 12:34 pm
|
Voltar para Asp
Quem está online
Usuários navegando neste fórum: Nenhum usuário registrado e 1 visitante
|
|
|
