Formulário

[Guest herbertfaria]

Galera!

Existe alguma forma de se criar em um formulário uma relação de e-mails, para a pessoa possa escolher para qual e-mail ela deseja enviar a mensagem do formulário?

Valeu!

Brigaduuu

Herbert

[Deividy]

você teria que fazer isso dinamicamente, usando linguegem tipo asp, php entre outras...

[Guest herbertfaria]

Não há como fazer em html ou dhtml?

Abraços

Herbert

[Deividy]

Bom eu não conheço uma forma assim em html, talvez até possoa ter mais eu desconheço!

desculpe

[Guest herbertfaria]

De qualquer forma

Valeu pela força

Vou dar uma procurada na net

Brigadu

Herbert

[Sperto_Rox]

em html é impossível .. ou seja so se for pelo outlook .. ai se o usuario q for enviar o e-mail não tiver e-mails configurado no outrlook nem vai funcionar ... mas tente pelo php q é facim ...

[Cliford]

você pode utilizar o formmail da SB

[taz]

Tem um componente para asp bem conhecido chamado cdonts.dll, procure por isso na net que vai achar varios exemplos de script para utilizar com este componente e como instalar ele na maquina.

é meio chatinho mas vale a pena.

e respondendo as perguntas acima, não tem como enviar um e-mail decente utilizando-se apenas de scripts do lado cliente como java script etc.

tem como fazer umas gambiarras orriveis do tipo mandar para um e-mail utilizando-se do software de e-mail instalado na maquina, mas se não tiver nada configurado nem funciona e da erros nojentos para o usuário.

CDONTS, vai la e perde um pouco do seu tempo com esse que vale a pena.

[Guest SAPPORO]

Claro que tem galera...cria um MENU POPUP e coloca todos os e-mails que você quiser...aí a pessoa seleciona o e-mail que desejar e envia a mensagem!!

[Deividy]

Claro que tem galera...cria um MENU POPUP e coloca todos os e-mails que você quiser...aí a pessoa seleciona o e-mail que desejar e envia a mensagem!!

concordo amigo

só que alem de selecionar ele tambem quer enviar!

isso não é tão simples assim

[Camila Conti]

Não sei se isto te ajuda, mas dá uma estudada...

Assim você cria um componente ...

Public Function SendMail(ByVal pstrMailTo As String, _

ByVal pstrMailSender As String, _

ByVal pstrServerName As String, _

ByVal pstrAccountName As String, _

ByVal pstrProxyServer As String, _

ByVal pstrProxyPass As String, _

Optional ByVal pstrMailCC As String, _

Optional ByVal pstrMailBCC As String, _

Optional ByVal pstrMailSubject As String, _

Optional ByVal pstrMailBody As String) As Boolean

On Error GoTo Err_SendMail

Dim objCDOMail As Object

Dim objCDOConfig As Object

' Cria os Objetos CDO

Set objCDOMail = CreateObject("CDO.Message")

Set objCDOConfig = CreateObject("CDO.Configuration")

' Atribui as propriedades de Recipient

With objCDOConfig.Fields

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

.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = pstrServerName

.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 0

.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1

.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = pstrAccountName

.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = ""

.Item("http://schemas.microsoft.com/cdo/configuration/urlproxyserver") = pstrProxyServer

.Item("http://schemas.microsoft.com/cdo/configuration/urlproxybypass") = pstrProxyPass

.Item("http://schemas.microsoft.com/cdo/configuration/urlgetlatestversion") = True

' Atualiza o objCDOConfig

.Update

End With

' Atribui as Informações do Email

With objCDOMail

' Informa qual a Configuração do Recipient

Set .Configuration = objCDOConfig

' Informações de Envio e Body

.To = pstrMailTo

.Cc = pstrMailCC

.Bcc = pstrMailBCC

.From = pstrMailSender

.Subject = pstrMailSubject

.TextBody = pstrMailBody

' Envia os Emails

.Send

End With

' Informa que o Email foi enviado com sucesso

SendMail = True

' Limpa a Memória

Set objCDOMail = Nothing

Set objCDOConfig = Nothing

Exit Function

Err_SendMail:

' Retorna o Erro

Err.Raise Err.Number, Err.Source, Err.Description

' Informa que o Email foi enviado com sucesso

SendMail = False

' Limpa a Memória

Set objCDOMail = Nothing

Set objCDOConfig = Nothing

End Function

[Deividy]

isso tambem não adiantaria porque é um componente que trabalha junto com o asp

e pelo que eu entendi ele funciona assim em XPpro nesse caso oservidor onde for colocar o site teria que ser XP

acho que isso tambem não resolver o caso