Ir para conteúdo
Fórum Script Brasil
  • 0

Dúvida Sobre Cdont´s E Aspmail


dennisreis

Pergunta

Bom Dia, Pessoal!

Fiz um form em asp (CDONT´S), só que o plano da empresa no servidor só da suporte para o ASPMAIL. Liguei no suporte técnico e me falaram que tem que mudar algumas funções. Qual seria essas funções? Segue o Código abaixo.

Desde já agradeço.

Dennis

 <% option explicit

dim varNome,varEmpresa,varEnd,varNum,varComp,varBair,varCEP,varCNPJ,varCid,varUF,varEmail,varTelefone,varDDDFone,varDDDFax,varFax,varMsg
dim objmail

varNome=request.form("txtNome")
varEmpresa=request.form("txtEmpresa")
varCNPJ=request.form("txtCNPJ")
varEnd=request.form("txtEnd")
varNum=request.form("txtNum")
varComp=request.form("txtComp")
varBair=request.form("txtBair")
varCEP=request.form("txtCEP")
varCid=request.form("txtCid")
varUF=request.form("txtUF")
varEmail=request.form("txtEmail")
varDDDFone=request.form("txtDDDFone")
varTelefone=request.form("txtTelefone")
varDDDFax=request.form("txtDDDFax")
varFax=request.form("txtFax")
varMsg=request.form("txtMsg")

set objmail=server.createobject("CDONTS.NewMail")
objmail.from=varEmail
objmail.to="advocacia@cerveiraedornellas.com.br"
objmail.cc="mario@cerveiraedornellas.com.br,marcelo@cerveiraedornellas.com.br,daniel@cerveiraedornellas.com.br"
objmail.bcc="wesley@cerveiraedornellas.com.br"
objmail.subject="MENSAGEM DO SITE"
objmail.body="<html><head><STYLE type=text/css>body{font-family:verdana;font-size: 9pt;color:#800000;}</STYLE></head><body  bgColor=#ffffff background=""http://www.proativaassessoria.com.br/Fundo Contato.jpg"" TEXT=#000000>"& "<p align=center>E-mail enviado do Site da <b>Proativa Assessoria</b></p>" & "<br>" & "E-mail: "  & varEmail & "<br>" & "Nome: " & varNome & "<br>" & "Empresa: " & varEmpresa & "<br>" & "Endereço: " & varEnd & "<br>" & "Número: " & varNum & "<br>" & "Complemento: " & varComp & "<br>" & "Bairro: " & varBair & "<br>" & "CEP: " & varCEP & "<br>" & "Cidade: " & varCid & "<br>" & "UF: " & varUF & "<br>" & "Telefone: " & "(" & varDDDFone & ") " & varTelefone & "<br>" & "FAX: " & "(" &  varDDDFax & ") " & varFax & "<br>" & "Mensagem: " & "<br>" & varMsg & "</body></html>"
objmail.bodyformat=0
objmail.mailformat=0
objmail.importance=2
objmail.send
set objmail=nothing

%>
<html>
<title>Cerveira, Dornellas e Advogados Associados</title>
<script language=JavaScript>
	window.defaultStatus="Dados Enviados";
</script>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
</head>

<body bgcolor=#000000 background="Fundo%20Contato.jpg">
<b></b> 
<center>
  <p>&nbsp;</p>
  <p>&nbsp;</p>
  <p>&nbsp;</p>
  <p><font color="#999999"></p>
  <p><font size="3" face="Verdana, Arial, Helvetica, sans-serif"><b>Os dados foram enviados 
    com sucesso!</b></font></p>
  <p><b><img src="imagens/resposta_contato.jpg" width="757" height="100"></b></p>
  <p><b><font color="#CCCCCC">Obrigado, logo entraremos em contato.</font></b></p>
  <p><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><b> <a href="http://www.cerveiraedornellas.com.br/index.htm" onmouseover="window.status='Home';return true">voltar</a></b></font></p>
  </center>
</body>
</html>l

Link para o comentário
Compartilhar em outros sites

4 respostass a esta questão

Posts Recomendados

  • 0

Ainda bem que seu hospedeiro explica tudo direitinho né? Pode falar o nome da empresa? Brincadeira hein?

Set Mailer = Server.CreateObject("SMTPsvg.Mailer") 
Mailer.FromName = "Remetente" 
Mailer.FromAddress= "remetente@host.com.br" 
Mailer.RemoteHost = "smtp2.locaweb.com.br"
Mailer.AddRecipient "João", "destinatario@host.com"
Mailer.ContentType = "text/html"
Mailer.Subject = "Assunto"
Mailer.BodyText = "Corpo da mensagem"
Mailer.SendMail
Obs.: Tem que descobrir o SMTP para configurar aqui ok: ?
Mailer.RemoteHost = "smtp2.locaweb.com.br"

Link para o comentário
Compartilhar em outros sites

  • 0

Tem um tópico exclusivo para cada um desses componentes.

Veja os tópicos fixos da seção

T+

Link para o comentário
Compartilhar em outros sites

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.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,1k
×
×
  • Criar Novo...