olá galera estou utilizando o codigo abaixo para processar um formulario feito em flash... e ele da pau nos caracteres com acentuações... o que fazer ? o engraçado que eu utilizei ele para fazer um outro formulario mais simples e não da pau...
Codigo ASP
<%
Dim iMail, Nome, Email, Cidade, Bairro, Endereco, Estado
Pergunta
Guest Bortoloci Alexandre
olá galera estou utilizando o codigo abaixo para processar um formulario feito em flash... e ele da pau nos caracteres com acentuações... o que fazer ? o engraçado que eu utilizei ele para fazer um outro formulario mais simples e não da pau...
Codigo ASP
<%
Dim iMail, Nome, Email, Cidade, Bairro, Endereco, Estado
Nome = Request.form("nome")
Email = Request.form("email")
Cidade = Request.form("cidade")
Endereco = Request.form("endereco")
Bairro = Request.form("bairro")
Estado = Request.form("estado")
Cep = Request.form("cep")
meu_email = "suporte@vzan.com.br"
corpo = "Nome:" & Nome & "<BR>"
corpo = corpo & "Endereco:" & Endereco & "<BR>"
corpo = corpo & "Bairro:" & Bairro & "<BR>"
corpo = corpo & "Cidade:" & Cidade & "<BR>"
corpo = corpo & "Estado:" & Estado & "<BR>"
corpo = corpo & "Cep:" & Cep & "<BR>"
corpo = corpo & "E-mail:" & Email & "<BR>"
Set iMail = CreateObject("CDONTS.NewMail")
iMail.From = email
iMail.To = meu_email
iMail.Subject = Assunto
iMail.MailFormat = 0
iMail.BodyFormat = 0
iMail.Body = corpo
iMail.Send
Response.write("Alerta="+Server.URLEncode("Enviado c/ Sucesso!"))
Set objMail = nothing
%>
Codigo Flash...
ystem.useCodepage = true
Selection.setFocus('nome')
nome2.tabIndex = 0
endereco2.tabIndex = 1
bairro2.tabIndex = 2
cep2.tabIndex = 3
cidade2.tabIndex = 4
estado2.tabIndex = 5
email2.tabIndex = 6
function Apagar() {
nome = ''
endereco = ''
bairro = ''
cep = ''
cidade = ''
estado = ''
email = ''
alerta = ''
Selection.setFocus('_root.nome');
}
function EnviaForm() {
if (nome eq '') {
alerta = 'Preencha o campo nome!'
Selection.setFocus('nome');
} else if (email eq '' || email.indexOf('@', 0) eq -1 || email.indexOf('.', 0) eq -1) {
alerta = 'Insira um e-mail valido!'
Selection.setFocus('email');
} else if (endereco eq '') {
alerta = 'Preencha o campo!'
Selection.setFocus('endereco');
} else {
loadVariablesNum('cadastro.asp', 0, 'POST')
alerta = 'Enviando dados...'
}
}
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.