Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

voyerbr

formulario de e-mail

Recommended Posts

Amigos estou precisando montar um formulario em JS que rode em HTML com:

• nome

• tel com DDD

• data

• pedido

• mensagem

botões enviar e limpar

com confirmação de enviado após envio.

Vocês podem me ajudar, já tentei quase td aki e ainda ñ consegui nada plausivel.

Agradeço a todos pela atenção e força!

Obrigado!!! http://forum.imasters.com.br/public/style_emoticons/default/natal_smile.gif

Compartilhar este post


Link para o post
Compartilhar em outros sites

Você quer um formulário de envio de email?

Para o envio do email você precisará de uma linguagem dinâmica, tal como ASP ou PHP.

mas existe um código que eu posso inserir no html?

Eu to usando o programa HotDog da sauvage para criar este site!

Falando sério já estou desisperado com isso e o pior eu não conheço nada ainda de asp ou php.

Até baixe freeware de PHP e fiquei perdido!

Alguém pode me ajudar nessa?

Obrigado a todos!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Prezado Cassiano

 

Por acaso você saberia onde posso encontrar um Tutorial semelhante em ASP

 

Obrigado

 

De uma procurada no forum do imasters de ASP vou lhe indicar um que é bem intuitivo

http://forum.imasters.com.br/index.php?showtopic=260600

 

ae é só buscar mais um pouco no forum e terá conseguido ;)

Compartilhar este post


Link para o post
Compartilhar em outros sites

Ve se este formulario te serve

 

<%

sch = "http://schemas.microsoft.com/cdo/configuration/"

Set cdoConfig = Server.CreateObject("CDO.Configuration")

 

cdoConfig.Fields.Item(sch & "sendusing") = 2

cdoConfig.Fields.Item(sch & "smtpauthenticate") = 1

cdoConfig.Fields.Item(sch & "smtpserver") = "smtp.seudominio.com.br"

cdoConfig.Fields.Item(sch & "smtpserverport") = 25

cdoConfig.Fields.Item(sch & "smtpconnectiontimeout") = 30

cdoConfig.Fields.Item(sch & "sendusername") = "seuemail@seudominio.com.br"

cdoConfig.Fields.Item(sch & "sendpassword") = "sua senha de email"

cdoConfig.fields.update

Set cdoMessage = Server.CreateObject("CDO.Message")

Set cdoMessage.Configuration = cdoConfig

 

cdoMessage.From = request.Form("responder")

cdoMessage.To = request.Form("destino")

cdoMessage.Subject = "Formulario de Contato"

 

strBody = "<strong><p>DADOS</strong>" & vbCrLf & vbCrLf & _

"<strong><p>NOME: <strong>"& Request("nome") & vbCrLf & _

"<strong>E-MAIL:<strong> "& Request("responder") & vbCrLf & _

"<strong>ASSUNTO:<strong> "& Request("assunto") & vbCrLf & _

 

"<strong> Assunto que iram digitar:<strong><p> "& Request("mensagem")

 

strBody = strBody & "."

cdoMessage.HTMLBody = strBody

 

cdoMessage.Send

 

Set cdoMessage = Nothing

Set cdoConfig = Nothing

 

response.write "O E-MAIL FOI PROCESSADO E ENVIADO,EM BREVE ENTRAREMOS EM CONTATO"

%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.