Inserir dados em uma combobox apartir de um TXT ASP

1Nome do Emissor;Diretor de Relação com Investidores;Número da Emissão;Número da Série;Data de Emissão;Data de Vencimento;Volume da Emissão;Código do Ativo;Código do ISIN;Data de Início de Rentabilidade;Esforço Restrito;Registro na CVM;Data de Registro na CVM;Forma;Classe;Garantia / Espécie;Índice de Remuneração;% da Taxa Flutuante;Juros / spread (Taxa e Prazo);Prêmio (Taxa e Prazo);Participação (Taxa e Prazo);Amortização (Taxa e Prazo);PU;Juros;Valor Nominal;Juros;Repactuação;Prêmio;Resgate Parcial;Resgate Total Antecipado;Amortização;Amortização Extraordinária;Participação;Opção de Venda;Vencimento;Agente Fiduciário;Banco Mandatário;Coordenador Líder;Instituição Depositária;Rating;Qtd. Emitida;Agenda de Eventos;Data

<%
Dim objFSO1
'O objeto FileSystemObject
Set objFSO1 = Server.CreateObject("Scripting.FileSystemObject")

Dim varArquivo
'Abrindo o arquivo de texto
Set varArquivo = objFSO1.OpenTextFile(server.MapPath("caracteristica/caracteristica.txt"), 1)

Dim arrayLinha
Do while not varArquivo.AtEndOfStream

'Separando os dados entre ponto-e-v&iacute;rgula
arrayLinha=split(varArquivo.ReadLine,";",-1,1)

'Verificando se &eacute; da orelha T&iacute;tulos da CETIP
'if arrayLinha(0)= "4" then

Dim Ativo

Ativo = arrayLinha(0)
Codigo = arrayLinha(7)
'response.Write(Ativo)
%>
              Emissor:</p></TD>
            <TD width="13">&nbsp;</TD>
            <TD width="497" valign="middle" class="destaque_1_texto"><select name="emissor" id="emissor" class="destaque_1_texto" style="width: 200px;">
                <option class="destaque_1_texto"><%=arrayLinha(0)%></option>
            </select></TD>
          </TR>
          <TR>
            <TD height="28" align="right">Agente Fiduciário:</TD>
            <TD>&nbsp;</TD>
            <TD valign="middle" class="destaque_1_texto"><select name="select2" id="select2" class="destaque_1_texto" style="width: 200px;">
                <option class="destaque_1_texto"><%=arrayLinha(16)%></option>
            </select></TD>
          </TR>
          <TR>
            <TD height="28" align="right">Tipo de Índice:</TD>
            <TD>&nbsp;</TD>
            <TD valign="middle"><select name="select" id="select" class="destaque_1_texto" style="width: 200px;">
              <option class="destaque_1_texto"><%=arrayLinha(16)%></option>
            </select></TD>
          </TR>
          <TR>
            <TD height="28" align="right" class="destaque_1_texto">Emitidos a partir:</TD>
            <TD>&nbsp;</TD>
            <TD valign="middle"><input name="textfield" type="text" id="textfield" size="2" maxlength="2" class="destaque_1_texto">
                <input name="textfield2" type="text" id="textfield2" size="2" maxlength="2" class="destaque_1_texto">
                <input name="textfield3" type="text" id="textfield3" size="4" maxlength="4" class="destaque_1_texto"></TD>
          </TR>
          <TR>
            <TD height="31" align="right" valign="middle" class="destaque_1_texto">Coordenador L&iacute;der:</TD>
            <TD valign="middle">&nbsp;</TD>
            <TD valign="middle"><select name="select4" id="select4" class="destaque_1_texto" style="width: 200px;">
                <option class="destaque_1_texto"><%=arrayLinha(37)%></option>
            </select></TD>
          </TR>
          <TR>
            <TD align="right" valign="middle" class="destaque_1_texto">Esp&eacute;cie / Garantia</TD>
            <TD valign="middle">&nbsp;</TD>
            <TD height="31" valign="middle"><select name="select5" id="select5" class="destaque_1_texto" style="width: 200px;">
                <option class="destaque_1_texto"><%=arrayLinha(15)%></option>
              </select></TD>
          </TR>
          <TR>
            <TD align="right" valign="middle" class="destaque_1_texto">Código de IF:</TD>
            <TD valign="middle">&nbsp;</TD>
            <TD height="31"  valign="middle"><select name="select3" id="select3" class="destaque_1_texto" style="width: 200px;">
              <option class="destaque_1_texto"><%=arrayLinha(15)%></option>
            </select>
              <%
'end if
'Passa para pr&oacute;xima linha
loop
%>