problema com combo dinamico

[bolomaster]

Olá pessoal bom dia a todos estou com um pqno problema e gostaria da ajuda de voces

<script language="javascript">
    function listdados( valor ) {
  
        http.open("GET", "campoprodutor.asp?id=" + valor, true);
  
         http.onreadystatechange = handleHttpResponse;
  
          http.send(null);
  
    }
       
    function handleHttpResponse(){
   
      campo_select = document.forms[0].campo;
  
      if (http.readyState == 4) {
  
      campo_select.options.length = 0;

      results = http.responseText.split(",");
  
      for( i = 0; i < results.length; i++ )
  
      {
  
      string = results[i].split( "|" );
  
      campo_select.options[i] = new Option( string[0], string[1] );
  
    }
  
      }
        }
        
  
  function listdados2( valor2 )
  
      {
  
      http2.open("GET", "veiculotransportadora.asp?id2=" + valor2, true);
  
     http2.onreadystatechange = handleHttpResponse2;
  
      http2.send(null);
  
      }
       
      function handleHttpResponse2()
         {
   
      campo_select2 = document.forms[0].veiculo;
  
      if (http2.readyState == 4) {
  
      campo_select2.options.length = 0;

      results2 = http2.responseText.split(",");
  
      for( y = 0; y < results2.length; y++ )
  
      {
  
      string2 = results2[y].split( "|" );
  
      campo_select2.options[y] = new Option( string2[0], string2[1] );
  
    }
  
      }
        }
        
  
  
  
      function getHTTPObject() {
  
      var req;
  
       
  
      try {
  
     if (window.XMLHttpRequest) {
  
      req = new XMLHttpRequest();
  
      
  
      if (req.readyState == null) {
  
     req.readyState = 1;
  
      req.addEventListener("load", function () {
  
     req.readyState = 4;
  
       
  
      if (typeof req.onReadyStateChange == "function")
  
      req.onReadyStateChange();
  
      }, false);
  
      }
  
       
  
      return req;
  
      }
  
       
  
      if (window.ActiveXObject) {
  
      var prefixes = ["MSXML2", "Microsoft", "MSXML", "MSXML3"];
  
       
  
     for (var i = 0; i < prefixes.length; i++) {
      try {
        req = new ActiveXObject(prefixes[i] + ".XmlHttp");
  
      return req;
        } catch (ex) {};
  
       
  
    }
  
      }
        } catch (ex) {}
  
       
  
      alert("XmlHttp Objects not supported by client browser");

      }

    var http = getHTTPObject();

    // Logo após fazer a verificação, é chamada a função e passada
      // o valor à variável global http.

      </script>        
      

<table width="100%" border="0" cellspacing="0" cellpadding="1">
  <tr>
    <td><table width="100%" border="0" cellspacing="0" cellpadding="1">
      <tr>
        <td><table width="100%" border="1" cellpadding="2" cellspacing="0" bordercolor="#273F27">
         <tr>
            <td bgcolor="#000033"><div align="center" class="style1">ASSISTENTE PARA ADICIONAR NOVO AGENDAMENTO / ETAPA 1 (NOVO)</div></td>
            </tr>
          
          <tr>
            <td height="242">
            
            <form name="form1" method="post" action="etapa1agendamento.asp">
              <table width="95%" border="0" align="center" cellpadding="1" cellspacing="1">
                <tr>
                  <td class="style2"><div align="right">PRODUTOR:</div></td>
                  
                  <td><label>
                  <%
                      sqlpro = "select codigoprodutor, nomerazaoprodutor from tb_produtores order by nomerazaoprodutor ASC"
                    set rspro = db.execute(sqlpro)
                    
                  %>
                  <select name="produtor" id="produtor" onchange="listdados( this.value )"> 

                  <option></option>
                    <%
                    do while not rspro.eof
                    %>
                    <option value="<%=rspro.fields("codigoprodutor")%>"><%=rspro.fields("nomerazaoprodutor")%></option>
                    <%rspro.movenext
                    loop%>
                    </select>
                  </label></td>
                </tr>
                <tr>
                  <td class="style2"><div align="right">CAMPO:</div></td>
                  <td><label>
                  <select name="campo">
                  </select>
                  </label></td>
                </tr>
                <tr>
                  <td class="style2"><div align="right">TRANSPORTADORA:</div></td>
                  <td>
                  <label>
                    <%
                    sqltran = "select codigotransportadora, nomerazaotransportadora from tb_transportadoras order by nomerazaotransportadora ASC"
                    set rstran = db.execute(sqltran)
                    
                    %>
                    <select name="transportadora" id="transportadora"  onchange="listdados2( this.value )">
                    <option></option>
                    <% do while not rstran.eof %>
                    <option value="<%=rstran.fields("codigotransportadora")%>"><%=rstran.fields("nomerazaotransportadora")%></option>
                    <%rstran.movenext
                    loop%>
                    </select>
                  </label></td>
                </tr>
                <tr>
                  <td class="style2"><div align="right">VEICULO:</div></td>
                  <td>
                  <label>
                  <select name="veiculo" >
                  </select>
                  </label></td>
                </tr>
                <tr>
                  <td width="43%" class="style2"><div align="right">FABRICA:</div></td>
                  <td width="57%"><label>
                  <%
                      sqlfab = "select codigofabrica, nomerazaofabrica from tb_fabricas order by nomerazaoFabrica ASC"
                    set rsfab = db.execute(sqlfab)
                    
                  %>
                    <select name="fabrica" id="fabrica">
                    <option></option>
                    <%do while not rsfab.eof%>
                    <option value="<%=rsfab.fields("codigofabrica")%>"><%=rsfab.fields("nomerazaofabrica")%></option>
                    <%rsfab.movenext
                    loop%>
                    </select>
                  </label></td>
                </tr>
                <tr>
                  <td><label>
                      <div align="center" class="style1">
                        <div align="center"><a href="tela.asp?item=novoagendamento"><img src="imagens/limpar.gif" alt="LIMPAR SELECAO" width="22" height="15" border="0" /><br />
                          <span class="style6">CANCELAR</span></a></div>
                      </div>
                      <div align="right">
                        </label>
                        <label>
                        </label>
                      </div></td>
                  <td><div align="center" class="style1">
                    <label>
                    <input type="image" name="imageField" id="imageField" src="imagens/avancar2.gif" />
                    </label>
                  </div></td>
                </tr>
                <tr>
                  <td>&nbsp;</td>
                  <td><div align="right"><a href="tela.asp?item=agendamentos"><img src="imagens/voltar.gif" alt="retornar" width="22" height="16" border="0" /> RETORNAR </a></div></td>
                </tr>
              </table>
                  </form>            </td>
            </tr>
        
        </table></td>
      </tr>
    </table></td>
  </tr>
</table>

Este codigo acima representa um pagina se selecao de dados dai tenho dois combos dinamicos,

so que apenas o compo campo carrega os dados o combo veiculo não carrega já verifiquei no banco e está tudo ok, o problema está relacionado com o meu javascript será que voces poderiam me ajudar?

Abraços a todos do Forum

[Willian Gustavo Veiga]

Algum erro? Testou em quais navegadores? Em quais versões?

Veja o console de erros do Firefox.

Poste mais detalhes. Um abraço.