Esta certo esse formulário em ASP.?

[Oguiga 0]

Opa Dark,

beleza?

Consegui algumas evoluções.

Agora já consigo enviar o formulário e ele escrever os campos.

Ainda to com DUAS dificualdades.

1ª Os campos vem um na frente do outro, como faço para que chege no e-mail um abaixo do outro.

 

2ª Imagine essa situação, a seguinte expressão.......... longa = Request.QueryString("longa")............. e a outra expressão relacionada a ela ........ objCDOSYSMail.HtmlBody = "Categoria Longa: " & longa ...................certo??

 

Quando o e-mail chega na caixa de entrada, vem escrito por exemplo Categoria Longa: porém o que foi escrito no campo "longa" no formulário não está puxado. entende??

To usando como base a form q você passou, estou tendo um progresso bem melhor com ele.

 

Da uma olha em como está o código no momento:

 

 

<%

Response.Charset="ISO-8859-1"

 

longa = Request.QueryString("longa")

curta = Request.QueryString("curta")

 

'## Configuração do cabeçalho da mensagem

sDestinatario = "inscricao@coisadecinema.com.br"

sRemetente = "inscricao@coisadecinema.com.br" 'o endereço de e-mail deve ser uma conta do próprio domínio e válida.

sResponder = "inscricao@coisadecinema.com.br"

sAssunto = "Formulário Inscrição"

 

'## configurações do componente CDOSYS

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

 

'Cria o objeto para configuração do SMTP

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

 

'SMTP

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"

 

'Porta do SMTP

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport")= 25

 

'Porta do CDO

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2

 

'Timeout

objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30

objCDOSYSCon.Fields.update

 

'Atualiza a configuração do CDOSYS para o envio do e-mail

Set objCDOSYSMail.Configuration = objCDOSYSCon

 

' #### CONFIGURAÇÕES DO CABEÇALHO DA MENSAGEM ####

'configura o remetente

objCDOSYSMail.From = sRemetente

 

'configura o destinatário

objCDOSYSMail.To = sDestinatario

 

'configura o reply-to

objCDOSYSMail.ReplyTo = sResponder

 

'configura o assunto

objCDOSYSMail.Subject = sAssunto

 

''configura o conteúdo da mensagem

objCDOSYSMail.HtmlBody = "Categoria Longa: " & longa

objCDOSYSMail.HtmlBody = objCDOSYSMail.TextBody & "Categoria Curta: " & curta

 

'### FIM DAS CONFIGURAÇÕES DO CABEÇALHO ###

 

 

'para envio da mensagem no formato html altere o TextBody para HtmlBody

'objCDOSYSMail.HtmlBody = v_corpo

'objCDOSYSMail.fields.update

 

' ### ENVIA O E-MAIL ###

objCDOSYSMail.Send

 

' ### DESTRÓI OS OBJETOS ###

Set objCDOSYSMail = Nothing

Set objCDOSYSCon = Nothing

response.write "Mensagem acentuada enviada para: "&sDestinatario&"..."

 

%>

 

 

OBS.:

 

 

Consegui fazer ele chamar o campo lá do FLASH, apenas tirei o Request.QueryString e coloquei apenas Request

 

 

Mas ainda n consigo fazer eles virem um em baixo do outro

[DSerma 19]

Para ir um "em baixo" do outro.. basta colocar o comando html "<br>" depois de cada variavel...

 

Ex:

 

objCDOSYSMail.HtmlBody = "Categoria Longa: " & longa & "<br>"
objCDOSYSMail.HtmlBody = objCDOSYSMail.TextBody & "Categoria Curta: " & curta

 

Abraços.

[Oguiga 0]

eu tentei fazer isso

 

mas qnd é colocado o "br" ele não é enviado!!!

 

Estranho né?

[DSerma 19]

Cara... tipo.. mei oimpossivel ele nao enviar o e-mail apenas adicionando o <br>...

 

Como você fez ???

 

tenta isso aki entao:

 

objCDOSYSMail.HtmlBody = "Categoria Longa: " & longa & CHR(13)
objCDOSYSMail.HtmlBody = objCDOSYSMail.TextBody & "Categoria Curta: " & curta

Abraços...

[Oguiga 0]

é cara, sei lá q por´ra é essa, todo mundo só sai em linha.

 

 

Mas putz, já to bem feliz com minha evolução!!

 

Rs

 

 

Mais uma coisa Dark, tem como eu especificar o tamanho da fonte das informações do formulário enviadas no e-mail?

 

 

 

Valeu

[leonardonobre 0]

Oi Oguiga, boa noite.

É só você colocar a tah de font antes do conteúdo.

 

Exemplo:

Mensagem = "<font color=red size=2 face='verdana,helvetica,arial'> Nome do campo " & MinhaVariavel & "</font>"

Qualquer coisa posta ae!

 

Abraços,

Léo