2 replies to this topic

[Serra_Design]

olá estou desesperado!!!!...preciso fazer um curriculo e o mesmo ser enviado para um email.....sendo que ja tentei de todas as formas usando comonentes e tudo....o lance é que o cliente quer que a pessoa digite o curriculo direto do site e de la ir pro email dele....eu fiz um em asp mas fica dando erro e eu nao sei pq me ajudem por favor..


segue o ASP enviaemail.asp
***********************************************************************************************

[codebox]<%
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName = request("nome")
Mailer.FromAddress = request("email")
Mailer.RemoteHost = "smtp.locaweb.com.br"
Mailer.AddRecipient "Curriculo" , "lord_glower@hotmail.com"
Mailer.Subject = "Curriculo"
Mailer.BodyText = "---------------------Dados Pessoais--------------------- " & vbcrlf
Mailer.BodyText = "Nome...........: " & request.form("nome") & vbcrlf
Mailer.BodyText = "E-mail.........: " & request.form("email") & vbcrlf
Mailer.BodyText = "Endereço.......: " & request.form("endereco") & vbcrlf
Mailer.BodyText = "Bairro.........: " & request.form("Bairro") & vbcrlf
Mailer.BodyText = "CEP............: " & request.form("CEP") & vbcrlf
Mailer.BodyText = "Cidade.........: " & request.form("Cidade") & vbcrlf
Mailer.BodyText = "Estado.........: " & request.form("Estado") & vbcrlf
Mailer.BodyText = "País...........: " & request.form("Pais") & vbcrlf
Mailer.BodyText = "DDD............: " & request.form("DDD") & vbcrlf
Mailer.BodyText = "Telefone:......: " & request.form("Telefone") & vbcrlf
Mailer.BodyText = "DDD Comercial..: " & request.form("DDDComercial") & vbcrlf
Mailer.BodyText = "Telefone Comercial..: " & request.form("TelefoneComercial") & vbcrlf
Mailer.BodyText = "DDD Celular....: " & request.form("DDDCelular") & vbcrlf
Mailer.BodyText = "Telefone celular...: " & request.form("TelefoneCelular") & vbcrlf
Mailer.BodyText = "Dia do Nascimento:..: " & request.form("dia") & vbcrlf
Mailer.BodyText = "Mês de Nascimento...: " & request.form("mes") & vbcrlf
Mailer.BodyText = "Ano de Nascimento...: " & request.form("ano") & vbcrlf
Mailer.BodyText = "Sexo........: " & request.form("Sexo") & vbcrlf
Mailer.BodyText = "Empregado?...: " & request.form("Empregado") & vbcrlf
Mailer.BodyText = "Possui Cusrso de Vigilante?...: " & request.form("vigilante") & vbcrlf
Mailer.BodyText = "Mês de Nascimento...: " & request.form("mes") & vbcrlf
Mailer.BodyText = "---------------------Experiência Profissional---------------------" & vbcrlf
Mailer.BodyText = "Nome da Empresa.......: " & request.form("Empresa1") & vbcrlf
Mailer.BodyText = "Periodo de Entrada:...: " & request.form("PeriodoEntrada1") & vbcrlf
Mailer.BodyText = "Periodo de Saída:...: " & request.form("PeriodoSaida1") & vbcrlf
Mailer.BodyText = "Cargo:...: " & request.form("Cargo1") & vbcrlf
Mailer.BodyText = "Ramo de Atividade:...: " & request.form("RamoAtividade1") & vbcrlf
Mailer.BodyText = "-------------------------------------------------------- " & vbcrlf
Mailer.BodyText = "O que sou e o que pretendo: " & request.form("OqueSou") & vbcrlf
Mailer.BodyText = "Escolaridade:...: " & request.form("Escolaridade") & vbcrlf
Mailer.BodyText = "Curso:...: " & request.form("Curso") & vbcrlf
Mailer.BodyText = "Instituicao:...: " & request.form("Instituicao") & vbcrlf
Mailer.BodyText = "Ano de Término:...: " & request.form("AnoTermino") & vbcrlf
Mailer.BodyText = "conhecimentos em Informática:...: " & request.form("ConhecimentoInformatica") & vbcrlf
Mailer.BodyText = "Idioma 1:...: " & request.form("Idioma1") & vbcrlf
Mailer.BodyText = "Idioma 2:...: " & request.form("Idioma2") & vbcrlf
Mailer.BodyText = "Idioma 3:...: " & request.form("Idioma3") & vbcrlf



if Mailer.SendMail then
Response.redirect "http://www.mglopes.c...ocurriculo.asp"
else
Response.Write mailer.response
end if
%>



*********************************************************************************
[/codebox]

mas fica dizendo qndo eu clico em enviar que o software abortou....pq isso esta acontecendo...aiaiai eu preciso de ajuda!!!!!!!!!

[Newbay]

Eu tenho sites na locaweb tb, e todos sempre pus no smtp esse endereço
Mailer.RemoteHost = "smtp2.locaweb.com.br"

tenta colocar ve se vai... senao vc pode tentar tb com localhost.

Creio que vc tenha que em todas variaveis colocar
Mailer.BodyText + = .......
Senão a sua variavel Mailer.BodyText , só vai ter a última linha atribuida a ela.

Ve ai se vai.

Edição feita por: Newbay, 24/10/2007, 09:57.

[Serra_Design]

olá...olha o lance do smtp2 deu certíssimo ! funcionou tranquilo....mas os sinais de "+" não foram necessários....todos os dados foram enviados da maneira como previ!.....
obrigado!