[Resolvido] envio de formulário/email

[Teresacris 0]

Olá, estou com problema de envio de formulários por email.....troquei de servidor e não consigo configurar corretamente já solicitei suporte e informaram ser erro de programação. Alguém pode me ajudar. Obrigada antecipadament.

 

Erro de tempo de execução do Microsoft VBScript erro '800a01be'

 

O objeto não dá suporte para argumentos nomeados: 'msg.Logging'

 

/pasta/sendfale.asp, line 17

<%
Nome = request("nome")
Email  = request("email")
mensagem = request("mensagem")

set msg = Server.CreateOBject("ADODB.Connection") ----> ESSE É O DADO DO ATUAL SERVIDOR QUE ESTÁ TB NO ARQUIVO DE CONEXÃO

msg.Logging = true  '(LINHA 17 ESSE É O ERRO INFORMADO....)

msg.silent = true

msg.From = "Email"

'msg.FromName = EmailSolicitacoes

msg.AddRecipient "info@site.com"

'msg.AddRecipient "recipientelle@herDomain.com"

' Assunto da mensagem

msg.Subject = "Formulário de Contato"


msg.Body = "Nome:"&nome&vbcrlf _

  &"Email:"&email&vbcrlf _

  &"Mensagem:"&mensagem&vbcrlf



if not msg.Send("webmail.site.com") then

Response.write "<pre>Erro ao enviar o email. Erro: "& msg.log & "</pre>"

else

Response.redirect "index.asp?link=24&msg=2"

end if

Set msg = Nothing
%>

[dark0 0]

não está faltando códigos aí ?

 

Em geral, você recolhe as variaveis, cria a instância do objeto -componente- na memória, e depois executa, utilizando os comandos do componente de envio de e-mail que está utilizando..

 

Vejo você criar uma conexão com banco de dados.. mas não vejo você chamar o componente de envio de e-mail..

 

Sabe qual pretende utilizar, ou melhor, qual componente seu servidor disponibiliza?

[Teresacris 0]

Sinceramente não ......estou perdida...

[dark0 0]

pegaste este código pronto de algum lugar ?

 

Qual componente de envio de e-mails está utilizando ?

[Teresacris 0]

Não, mas não fui eu que desenvolvi, pois ainda estou aprendendo programação....esse formulário foi ajustado para um servidor e eu passei para outro....agora o provedor enviou essas dicas para compor minha página, mas eu não estou conseguindo solucionar sozinha,

<%
set mail = server.createobject("smtpsvg.mailer")
mail.remotehost = "smtp-web.servidor.net"
mail.fromname = "Script de envio de emails ASP"
mail.fromaddress = "info@site.com" 'Este email deve ser válido e existir como conta de email para o domínio
mail.addrecipient "Nome","info@site.com"
mail.subject = "Assunto do email"
mail.bodytext = "Este é um email teste"
'Enviando o email
mail.sendmail
%>

por esse espaço posso solicitar um freela de um de vcs pq tenho urgência em solucionar esse problema????

[dark0 0]

Bom...

 

A sequência, seria mais ou menos assim:

 

1- Trazer dados do formulario, e armazenar numa variavel.

2- Iniciar o processo de envio de e-mail.. nesse caso.. recomendo usar o exemplo que seu servidor lhe deu

3- alterar os dados do codigo que seu servidor lhe deu, com as informações de seu dominio

4- finalizar o envio do e-mail, e mostrar uma confirmação na tela

 

Veja como ficaria..

<%
' resgata dados do formulario..
Nome = request("nome")
Email = request("email")
mensagem = request("mensagem")

' cria o objeto com o componente no servidor..
set msg = server.createobject("smtpsvg.mailer")

' determina o seu servidor smtp (é este mesmo?)
msg.remotehost = "smtp-web.servidor.net"

' Nome do remetente.. no caso, seu nome, ou de sua empresa..
msg.fromname = "Script de envio de emails ASP"

' Abaixo é o remetente.. possivelmente seu e-mail..(e-mail que a pessoa que receber irá utilizar pra responder a você)
msg.fromaddress = "info@site.com" 'Este email deve ser válido e existir como conta de email para o domínio

' destinatário.. a variavel que irá utilizar e o nome.. vindos do formulario..
mail.addrecipient Nome & "," & Email

' Assunto da mensagem
mail.subject = "Formulário de Contato"

' corpo da mensagem.. a variavel que traz os dados do formulario..
mail.bodytext = mensagem

' Enviando o email
mail.sendmail


Response.redirect "index.asp?link=24&msg=2"

Set msg = Nothing
%>

Estou sem programar asp a uns 3 anos ou mais.. portanto pode haver erros no código, pois não o testei... mas veja como funciona, e em caso de erro, poste pra nós..

E se funcionar, poste tambem para sabermos se funcionou..

 

Abração

 

dark0

[Teresacris 0]

Muitíssimo obrigada....vou fazer e dou o retorno sim....como recebo muita ajuda de todos do Forum gostaria de me colocar à disposição para textos e traduções e versões (Inglês e Espanhol (sou forte nisso), conteúdos em geral pelo Fórum claro.....

[dark0 0]

=)

 

quanto a contribuir com o fórum, talvez, seja interessante algum mod comunicar a administração, quem sabe, você não pode se tornar colaboradora :P

Meu tempo aqui passou.. contribui um pouco com esta comunidade a muitos anos atras.. mas depois me afastei da área de programação ;)

 

Abraços

 

dark0

[Teresacris 0]

Pessoal, obrigada pela ajuda.....fiz umas alterações nas respostas que me deram e meu fale conosco em asp está funcionando assim:.....até a pp...

 

<%
Nome  = request("nome")
Email  = request("email")
Mensagem = request("mensagem")

set mail = server.createobject("dado fornecido por seu servidor")

mail.remotehost = "dado fornecido por seu servidor"

mail.fromname =  Email

mail.fromaddress = "info@seusite.com"

mail.addrecipient "Olá" ,"info@seusite.com"

mail.Subject = "Contato - Nome do seu site"

mail.bodytext =  Nome & " ----> " & Mensagem

if not mail.sendmail then
Response.write "<pre>Erro ao enviar o email. </pre>"
''Erro: "& mail.log & " 
else
Response.redirect "pagina de erro que você estabelece"
end if

Set mail = Nothing

%>

[xanburzum 169]

parabens, resolvido