<% acao = Request.QueryString ("acao") if acao = "enviar" then nome = Request.form("nome") email = Request.form("email") empresa = Request.form("empresa") Responsavel_pela_Inscricao = Request.form("Responsavel_pela_Inscricao") Email_do_responsavel = Request.form("Email_do_responsavel") curso_text = Request.form("curso_text") data = Request.form("data") Dados_do_pagamento = Request.form("Dados_do_pagamento") datapagamento = Request.form("datapagamento") transporte = Request.form("transporte") hospedagem_text = Request.form("hospedagem_text") cidade = Request.form("cidade") estado = Request.form("estado") ddd = Request.form("ddd") telefone = Request.form("telefone") cargo = Request.form("cargo") formacao = Request.form("formacao") area = Request.form("area") ramo = Request.form("ramo") telefone_contato = Request.form("telefone_contato") HTML = HTML & "

Nome: " & Nome & chr(13) & chr(10) & chr(10) & chr(10) HTML = HTML & "
Empresa: " & Empresa & chr(13) & chr(10) & chr(10) HTML = HTML & "
eMail: " & email & chr(13) & chr(10) & chr(10) HTML = HTML & "
Responsável: " & Responsavel_pela_Inscricao & chr(13) & chr(10) & chr(10) HTML = HTML & "
E-mail Responsável: " & Email_do_responsavel & chr(13) & chr(10) & chr(10) HTML = HTML & "
Curso: " & curso_text & chr(13) & chr(10) & chr(10) HTML = HTML & "
Data do Curso: " & data & chr(13) & chr(10) & chr(10) HTML = HTML & "
Data Pagamento: " & datapagamento & chr(13) & chr(10) & chr(10) HTML = HTML & "
Transporte: " & transporte & chr(13) & chr(10) & chr(10) HTML = HTML & "
Hospedagem: " & hospedagem_text & chr(13) & chr(10) & chr(10) HTML = HTML & "
Cidade: " & cidade & chr(13) & chr(10) & chr(10) HTML = HTML & "
Estado: " & estado & chr(13) & chr(10) & chr(10) HTML = HTML & "
DDD: " & ddd & chr(13) & chr(10) & chr(10) HTML = HTML & "
Telefone: " & telefone & chr(13) & chr(10) & chr(10) HTML = HTML & "
Cargo: " & cargo & chr(13) & chr(10) & chr(10) HTML = HTML & "
Formação: " & formacao & chr(13) & chr(10) & chr(10) HTML = HTML & "
Área: " & area & chr(13) & chr(10) & chr(10) HTML = HTML & "
Ramo de Atividade da Empresa: " & ramo & chr(13) & chr(10) & chr(10) HTML = HTML & "
Telefone de Contato: " & telefone_contato & chr(13) & chr(10) & chr(10) Dim objCDOSYSMail Dim objCDOSYSCon 'CRIA A INSTÂNCIA COM O OBJETO CDOSYS Set objCDOSYSMail = Server.CreateObject("CDO.Message") 'CRIA A INSTÂNCIA DO OBJETO PARA CONFIGURAÇÃO DO SMTP Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration") 'SERVIDOR DE SMTP, USE smtp.SeuDominio.com OU smtp.hostsys.com.br objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost" 'PORTA PARA COMUNICAÇÃO COM O SERVIÇO DE SMTP objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 'PORTA DO CDO objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 'TEMPO DE TIMEOUT (EM SEGUNDOS) objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30 'ATUALIZA A CONFIGURAÇÃO DO CDOSYS PARA ENVIO DO E-MAIL objCDOSYSCon.Fields.update Set objCDOSYSMail.Configuration = objCDOSYSCon 'NOME DO REMETENTE, E-MAIL DO REMETENTE objCDOSYSMail.From = "Site Projeto Otimiza " 'NOME DO DESINATÁRIO, E-MAIL DO DESINATÁRIO objCDOSYSMail.To = "Site - Projeto Otimiza " 'ASSUNTO DA MENSAGEM objCDOSYSMail.Subject = "[INSCRIÇÕES] FORMULÁRIO ENVIADO PELO SITE" 'CONTEÚDO DA MENSAGEM 'objCDOSYSMail.TextBody = HTML 'PARA ENVIO DA MENSAGEM NO FORMATO HTML, ALTERE O TextBody PARA HtmlBody objCDOSYSMail.HTMLBody = HTML 'ENVIA A MENSAGEM objCDOSYSMail.Send() 'DESTRÓI OS OBJETOS Set objCDOSYSMail = Nothing Set objCDOSYSCon = Nothing Response.write ("

O formulário de inscrição foi enviado com sucesso. Desde já agradecemos o sua inscrição! Obrigado(a).

") End If %>
Projeto Otimiza Conhecimento para a busca de excelência na gestão industrial
Cursos > Inscrições

Para se inscrever em um de nossos cursos efetuar o pagamento no Banco Bradesco (0237), Agência: 0055, CC: 633720-1, enviar o comprovante e preencher o formulário abaixo.
Favor depositar o valor considerando o desconto de 1,5% de IR, retenção na fonte.

A realização do curso esta vinculada ao número mínimo de participantes que varia de curso para curso. A confirmação de sua realização se dará 3 dias uteis antes da data do curso.

Nome
*Completo para o Certificado
E-mail
Cargo
Formação
Área de atuação
Ramo de Atividade
Telefone
Cidade
Estado
Empresa
Responsável pela Inscrição
E-mail do responsável
Telefone
Curso

OT01 - Sistema de Gerenciamento Industrial
OT02 - Manufatura Enxuta no Cenário Brasileiro
OT03 - Gestão Industrial
OT04 - Planejamento, Programação e Controle
OT05 - Planejamento e Programação Avançadas
OT06 - Governança TI x TA
OT07 - Sistema de Qualidade Integrado
OT08 - Liderança nas Fábricas
OT09 - ISA 95 - Integração de Sistemas
OT10 - ISA 88 - Modelos e Terminologias
OT11 - ISA 99 - Segurança Eletrônica
OT12 - Protocolos de Comunicação
OT13 - Redes Industriais
OT14 - Inteligência Artificial
OT15 - Gestão de Projetos

 

Data do curso escolhido /
Dados do pagamento
Data do pagamento /
Necessidade de hospedagem Sim Não
Forma de transporte


PROJETO OTIMIZA – Gestão Industrial - SLL Consultoria e Projetos Ltda.
R. dos Aliados 1017 – 05082 000 - SP – São Paulo - Brasil
eMails: administracao@projetootimiza.com.br
             eventos@projetootimiza.com.br
Skype: projeto.otimiza
Telefone Fixo: 55 (11) 3875 1851
Fax: 55 (11) 3832 0089
Telefone Eventos: (11) 3711 3277


Gustavo Peçanha Lacerda de Lima
gustavo@projetootimiza.com.br