Formulário pra emails diferentes

[godoy89 0]

Gente, to com meu formulário funcionando direitinho.

Tenho um campo assunto com 3 opções diferentes:

 

Opção 1

Opção 2

Opção 3

 

Queria fazer com que, em cada opção, fosse enviada para um e-mail diferente:

 

Opção 1 (envia para o email 1)

Opção 2 (envia para o email 2)

Opção 3 (envia para o email 3)

 

Tenho o seguinte código que não funcionou:

 

'Separando os assuntos por e-mail'
Select Case varAssunto
	Case varAssunto = "Opção 1"
		varEmailDestino = "email_1@xxx.com"
	Case varAssunto = "Opção 2"
		varEmailDestino = "email_2@xxx.com"
	Case else varAssunto = "Opção 3"
		varEmailDestino = "email_3@xxx.com"
End Select

'Enviando o e-mail'
objCDOSYSMail.To = "&varEmailDestino&"

Alguém pode me dar uma mão?

[Ted k' 126]

Use ele assim:

 

'Separando os assuntos por e-mail'
Select Case cstr(varAssunto)
        Case "1"
             varEmailDestino = "email_1@xxx.com"
        Case "2"
             varEmailDestino = "email_2@xxx.com"
        Case "3"
             varEmailDestino = "email_3@xxx.com"
End Select

[godoy89 0]

Use ele assim:

 

'Separando os assuntos por e-mail'
Select Case cstr(varAssunto)
        Case "1"
             varEmailDestino = "email_1@xxx.com"
        Case "2"
             varEmailDestino = "email_2@xxx.com"
        Case "3"
             varEmailDestino = "email_3@xxx.com"
End Select

Onde você deixou "1" "2" e "3" eu coloco o assunto ou deixo assim mesmo?

[Ted k' 126]

tanto faz!!

[godoy89 0]

tanto faz!!

 

E como eu crio a relação entre assunto/email?

 

São 3 assuntos diferentes (o cliente escolhe via OPTION):

Área Pedagógica

Informações

Trabalhe Conosco

 

A primeira opção só pode ser enviada para o e-mail X

A segunda opção só pode ser enviada para o e-mail Y

A terceira opção só pode ser enviada para o e-mail Z

 

Não consigo achar uma relação entre "1" para "Área Pedagógica", por exemplo.

 

Por favor, poderia me explicar melhor?

Vlw

[godoy89 0]

Não funcionou...