[Resolvido] Escolher E-mail

Olá pessoal tenho esse formulário de contato

form.htm

<table width="774" background="form-fundo.gif">
 <form name="nomedoform" action="envio.asp" method="post" >
	<!--DWLayoutTable-->
	<tr>
 <th height="21" colspan="3">Formulário de contato</th>
 <td width="390"></td>
	</tr>
	<tr>
 <td width="68" height="26"><label>Contato:</label></td>
 <td colspan="2"> <select name="destino" class="style1" id="select">
 <option>Escolha aqui seu contato</option>
 <option value="davi@bombaspaulo.com.br">Gerência Geral - Davi</option>
 <option value="gerson.bueno@bombaspaulo.com.br">Vendas - Gerson</option>
 <option value="edm.soares@bombaspaulo.com.br">Vendas - Edmilson</option>
 <option value="sidnei@bombaspaulo.com.br">Vendas - Sidnei</option>
 <option value="marcos.mendes@bombaspaulo.com.br">Assistência Técnica
 - Marcos / Victor</option>
 <option value="financeiro@bombaspaulo.com.br">Financeiro</option>
 </select> </td>
 <td></td>
	</tr>
	<tr>
 <td height="24" valign="top">Empresa:</td>
 <td colspan="2" valign="top"><input name="empresa" type="text" id="empresa" size="33"></td>
 <td></td>
	</tr>
	<tr>
 <td height="24" valign="top"><label>Nome</label></td>
 <td colspan="2" valign="top"><input name="nome" type="text" size="33"
maxlength="1000"></td>
 <td></td>
	</tr>
	<tr>
 <td height="24" valign="top">Telefone:</td>
 <td colspan="2" valign="top"><input name="telefone" type="text" id="telefone" size="33"></td>
 <td></td>
	</tr>
	<tr>
 <td height="24" valign="top"><label>E-mail:</label></td>
 <td colspan="2" valign="top"><input name="email" type="text" id="email" size="33"
maxlength="1000"></td>
 <td></td>
	</tr>
	<tr>
 <td height="26" valign="top">Assunto:</td>
 <td colspan="2" valign="top"><input name="assunto" size="33" type="text" id="assunto"></td>
 <td></td>
	</tr>
	<tr>
 <td height="136" valign="top"><label>Mensagem:</label> </td>
 <td colspan="2" valign="top"><textarea name="mensagem" cols="25"

rows="7" id="mensagem" >

</textarea> </td>
 <td></td>
	</tr>
	<tr>
 <td height="26"></td>
 <td width="49" valign="top"><input name="submit" type="submit"

value="Enviar"

class="botao"> </td>
 <td width="239"></td>
 <td></td>
	</tr>
	<tr>
 <td height="15"></td>
 <td></td>
 <td></td>
 <td></td>
	</tr>
 </form>
</table>

e essa codificaçao em ASP

enviado.asp

<%
'cria o objeto para o envio de e-mail
Set objCDOSYSMail = Server.CreateObject("CDO.Message")
'cria o objeto para configuração do SMTP
Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration")
'SMTP, onde na opticalhost o formato é mail.seudominio.com
objCDOSYSCon.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail3.porta81.com.br"
'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
'e-mail do remetente
objCDOSYSMail.From = request.Form("email")
'e-mail do destinatário
objCDOSYSMail.To = "marcos.mendes@bombaspaulo.com.br"
'assunto da mensagem
objCDOSYSMail.Subject = "Contato pelo Site"
'conteúdo da mensagem
strBody = "Dados" & vbCrLf & vbCrLf & _
"Empresa: "& Request("empresa") & vbCrLf & _
"Nome: "& Request("nome") & vbCrLf & _
"Telefone: "& Request("telefone") & vbCrLf & _
"E-mail: "& Request("email") & vbCrLf & _
"Mensagem: "& Request("mensagem")
strBody = strBody & "."
objCDOSYSMail.TextBody = strBody
'para envio da mensagem no formato html altere o TextBody para HtmlBody
'objCDOSYSMail.HtmlBody = strBody
'envia o e-mail
objCDOSYSMail.Send
'destrói os objetos
Set objCDOSYSMail = Nothing
Set objCDOSYSCon = Nothing
response.write ("Email Enviado com Sucesso")
%>

Gostaria de que conforme fosse escolhido o e-mail na dropdwn, a mensagem fosse enviada para o destinatário correto. Como faço?