Formulário pra emails diferentes
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?
Discussão (5)
Carregando comentários...