| |
|
||||
|
|
|||||
|
|
|||||
|
<% acao = request.form("acao") %>
<% If acao = "Enviar" Then %>
<%
'
'
'***************************************
' Enviar mensagem por email
'***************************************
' Recebe dados do formulario
diahoje = day(now)
meshoje = month(now)
anohoje = year(now)
' Dados pessoais
nome = request.form("nome")
dia = Request.Form("dia")
mes = Request.Form("mes")
ano = Request.Form("ano")
cidade = request.form("cidade")
bairro = request.form("bairro")
email1 = request.form("email1")
email2 = request.form("email2")
telefone = request.form("telefone")
celular = request.form("celular")
skype = request.form("skype")
perfil = request.form("orkut")
site = request.form("site")
' Escolha do cargo
trabalho = request.form("trabalho")
' Informações estágio
faculdade = request.form("faculdade")
nome_curso = request.form("nome_curso")
periodo = request.form("periodo")
mes_formatura = Request.Form("mes_formatura")
ano_formatura = Request.Form("ano_formatura")
turno = request.form("turno")
' Informações profissional
formacao = request.form("formacao")
status_formacao = request.form("status_formacao")
acad = request.form("dados_acad")
' Experiencia pessoal com internet
ano_internet = Request.Form("ano_internet")
web_pessoal = Request.Form("web_pessoal")
' Expericencia profissional
url1 = request.form("url_prof1")
prof1 = request.form("profissional1")
url2 = request.form("url_prof2")
prof2 = request.form("profissional2")
url3 = request.form("url_prof3")
prof3 = request.form("profissional3")
empresas = request.form("empresas")
' Informações adicionais
informatica = request.form("informatica")
trabalharemcasa = request.form("trabalharemcasa")
bandalarga = request.form("bandalarga")
' Idiomas
fala_ingles = request.form("fala_ingles")
fala_espanhol = request.form("fala_espanhol")
fala_frances = request.form("fala_frances")
fala_outro = request.form("fala_outro")
escreve_ingles = request.form("escreve_ingles")
escreve_espanhol = request.form("escreve_espanhol")
escreve_frances = request.form("escreve_frances")
escreve_outro = request.form("escreve_outro")
outro_idioma = request.form("outro_idioma")
' Perspectivas
perspectivas = request.form("perspectivas")
' Trata campos relativo a idioma
if len(fala_ingles)<1 then
fala_ingles = "não"
end if
if len(fala_espanhol)<1 then
fala_espanhol = "não"
end if
if len(fala_frances)<1 then
fala_frances = "não"
end if
if len(escreve_frances)<1 then
escreve_frances = "não"
end if
if len(escreve_ingles)<1 then
escreve_ingles = "não"
end if
if len(escreve_espanhol)<1 then
escreve_espanhol = "não"
end if
if len(escreve_frances)<1 then
escreve_frances = "não"
end if
if len(escreve_outro)<1 then
escreve_outro = "não"
end if
if len(fala_outro)<1 then
fala_outro = "não"
end if
if len(outro_idioma)<1 then
outro_idioma = "Outro idioma"
end if
' Calculo de idade
idade = anohoje - ano
if ((meshoje - mes) < 0) then
idade = idade - 1
else
if ((meshoje - mes) = 0) then
if ((diahoje - dia) < 0) then
idade = idade - 1
end if
end if
end if
' Monta mensagem
mensagem = "Dados pessoais do candidato" & chr("13")
mensagem = mensagem & "---------------------------" & chr("13")
mensagem = mensagem & "Nome: "&nome&"" & chr("13")
mensagem = mensagem & "Email principal: "&email1&"" & chr("13")
mensagem = mensagem & "Idade: "&idade&"" & chr("13")
mensagem = mensagem & "Usa internet desde: "&ano_internet&"" & chr("13")
mensagem = mensagem & "Data nascimento: "&dia&"/"&mes&"/"&ano&"" & chr("13")
mensagem = mensagem & "Cidade: "&cidade&"" & chr("13")
mensagem = mensagem & "Bairro: "&bairro&"" & chr("13")
mensagem = mensagem & "Telefone: "&telefone&"" & chr("13")
mensagem = mensagem & "Celular: "&celular&"" & chr("13")
mensagem = mensagem & "Email alternativo: "&email2&"" & chr("13")
mensagem = mensagem & "Skype: "&skype&"" & chr("13")
mensagem = mensagem & "Perfil em rede social: "&perfil&"" & chr("13")
mensagem = mensagem & "Site pessoal: "&site&"" & chr("13") & chr("13")
mensagem = mensagem & "---------------------------" & chr("13")
mensagem = mensagem & "Cargo pretendido: "&trabalho&"" & chr("13")
mensagem = mensagem & "---------------------------" & chr("13")
mensagem = mensagem & "Trabalha em casa: "&trabalharemcasa&"" & chr("13")
mensagem = mensagem & "Banda larga: "&bandalarga&"" & chr("13") & chr("13")
mensagem = mensagem & "-----Estagiário-----" & chr("13")
mensagem = mensagem & "Instituição de ensino: "&faculdade&"" & chr("13")
mensagem = mensagem & "Curso e habilitação: "&nome_curso&"" & chr("13")
mensagem = mensagem & "Período em que está: "&periodo&"" & chr("13")
mensagem = mensagem & "Horário: "&turno&"" & chr("13")
mensagem = mensagem & "Formatura prevista para: "&mes_formatura&"/"&ano_formatura&"" & chr("13") & chr("13")
mensagem = mensagem & "-----Profissional-----" & chr("13")
mensagem = mensagem & "Formação: "&formacao&" "&status_formacao&"" & chr("13")
mensagem = mensagem & "Informações acadêmicas:" & chr("13")
mensagem = mensagem & ""&acad&"" & chr("13") & chr("13")
mensagem = mensagem & "-----Experiência pessoal com web2.0-----" & chr("13")
mensagem = mensagem & ""&web_pessoal&"" & chr("13") & chr("13")
mensagem = mensagem & "-----Experiência profissional-----" & chr("13")
mensagem = mensagem & "1) "&url1&"" & chr("13")
mensagem = mensagem & ""&prof1&"" & chr("13") & chr("13")
mensagem = mensagem & "2) "&url2&"" & chr("13")
mensagem = mensagem & ""&prof2&"" & chr("13") & chr("13")
mensagem = mensagem & "3) "&url3&"" & chr("13")
mensagem = mensagem & ""&prof3&"" & chr("13") & chr("13")
mensagem = mensagem & "-----Outras experiências profissionais-----" & chr("13")
mensagem = mensagem & ""&empresas&"" & chr("13") & chr("13")
mensagem = mensagem & "--------Programas--------" & chr("13")
mensagem = mensagem & ""&informatica&"" & chr("13") & chr("13")
mensagem = mensagem & "-----Idiomas (fala/escreve)-----" & chr("13")
mensagem = mensagem & "Inglês: "&fala_ingles&" / "&escreve_ingles&"" & chr("13")
mensagem = mensagem & "Espanhol: "&fala_espanhol&" / "&escreve_espanhol&"" & chr("13")
mensagem = mensagem & "Frances: "&fala_frances&" / "&escreve_frances&"" & chr("13")
mensagem = mensagem & ""&outro_idioma&": "&fala_outro&" / "&escreve_outro&"" & chr("13") & chr("13")
mensagem = mensagem & "-----Perspectivas para 3 anos-----" & chr("13")
mensagem = mensagem & ""&perspectivas&"" & chr("13")
mensagem = mensagem & "---------------------------" & chr("13")
' Verifica se campos obrigatorios foram preenchidos
if len(nome)<1 or len(email1)<1 or len(informatica)<1 or len(web_pessoal)<1 or len(trabalharemcasa)<1 or len(bandalarga)<1 or dia=0 or mes=0 or ano=0 or trabalho="Escolha..." then
response.Redirect("curriculo_nao_preenchido.html")
'response.write (" Campos obrigatórios não foram preenchidos!") 'response.write (" Clique para recuperar os dados e preencher o que faltou. ") else Set Mailer = Server.CreateObject("SMTPsvg.Mailer") Mailer.FromName = nome Mailer.FromAddress = email1 Mailer.RemoteHost = "smtp2.locaweb.com.br" Mailer.AddRecipient "RH Pontonet", "curriculo@pontonet.com.br" Mailer.Subject = "Candidato para "&trabalho&"" Mailer.BodyText = mensagem if Mailer.SendMail then response.Redirect("curriculo_enviado.html") 'Response.Write " Obrigado pelo envio, seu currículo será analisado." else response.Redirect("curriculo_erro_envio.html") 'Response.Write "Problemas. O erro foi:" & Mailer.Response end if end if %> <% else end if %> Caro profissional ou estudante, sempre estamos interessados em conhecer novos talentos para nossa equipe. Preencha o formulário abaixo e não deixe de detalhar sua experiência, se possível, apresentando links e referências. A maioria das oportunidades na Pontonet inclui o teletrabalho, que permite às pessoas selecionadas trabalharem no ambiente de nossas empresas-clientes ou em suas próprias residências. Antes de prosseguir, pare e reflita sobre as características mínimas que exigimos para ter sucesso em suas atividades de teletrabalho: | |||||