Existe outro modo de você resolver este problema, a cada opção escolhida você passará índices, exemplo a tabela abaixo:
Índice Setor
0 Itens de escritório
1 Itens de informática
2 Itens financeiros
3 Itens de estoque
Ai você cria um array com os e-mails relativos para cada setor, assim:
<%
Email_reponsavel = Array("secretaria@empresa.com.br","ti@empresa.com.br","financeiro@empresa.com.br","estoque@empresa.com.br")
%>
Dai você só precisará chamar o array e passar o índice do setor escolhido, assim:
<%
IndiceSetor = cInt(Request("setor"))
componente_email.to = Email_reponsavel(IndiceSetor)
%>
Lembrando que na variável IndiceSetor virá os índices dos setores, conforme a tabela de índices.
Espero ter ajudado.