Remote com mais de uma opção

[shumi 0]

Galera beleza?

 

Uma vez o Salgado me ensinou a fazer um remote que você escolhia o 1º dado e o restante aparecia.

Só que to tentando adptar e não vem o restante dos dados.

Caramba 2 remote.asp no mesmo dia e eu travei nos 2. :(

 

Vejam o remote.asp:

 

<%campanha = Request("campanha")set Conexcao = Server.CreateObject("ADODB.Connection")Conexcao.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MaPpath("banco/db_sistema.mdb")SQL = "Select coligada.fantasia,inter_campanha_coligada.campanha,campanha.nun_job From coligada,inter_campanha_coligada,campanha where coligada.codcoligada=inter_campanha_coligada.coligada AND inter_campanha_coligada.campanha='"&campanha&"' GROUP BY coligada.fantasia,inter_campanha_coligada.campanha,campanha.nun_job"set rs = server.CreateObject("ADODB.Recordset")Conexcao.openrs.CursorType = 3rs.Open SQL, Conexcao%>  <script>  loc = new Array(<%=rs.recordcount%>)  for (i=0; i < <%=rs.recordcount%>; i++) {		 loc[i] = new Array(3)				 for (j=0; j < 3; j++) {			 loc[i][j] = "0"		   }   }   <% j = 0	 do while not rs.eof%>		  loc[<%=j%>][0] = "<%=trim(rs("campanha"))%>";		  loc[<%=j%>][1] = "<%=trim(rs("fantasia"))%>";		loc[<%=j%>][2] = "<%=trim(rs("nun_job"))%>";	  <%	  rs.movenext	  j  = j  + 1	 loop   rs.close  set rs = nothing   Conexcao.close   set Conexcao = nothing %>   parent.ListaDados();  </script>

Form

<script language="JavaScript" type="text/JavaScript">	function CarregaDados(){	Combo2 = document.Cadastro.campanha; //ALTERE AQUI PARA SEU FORM E 2º SELECT	var url;	url = 'remote.asp?campanha='+Combo2[Combo2.selectedIndex].value;	myIframe.location = url;	Combo2.focus()	}	function ListaDados(){	local1 = new Array();	var maximo1, i;	local1 = myIframe.loc;document.getElementById("coligada").value = local1[0][1];document.getElementById("nun_job").value = local1[0][2];}</script><!--#include file="includes/topo.asp"--><p align="center"><span class="testo14">Carta Briefing</span></p><br><form name="Cadastro" id="Cadastro" method="post" action="carta_briefing_valida.asp"><p align="center"><table width="744" border="0">		<tr>	<td width="738"><table width="446" height="60" border="0"><tr>	<td width="194"><span class="texto10">Campanha :</span></td>	<td width="150"><div style="DISPLAY: none; POSITION: absolute" align="left">					 <IFRAME src name="myIframe" id="myIframe" width="400" height="100" marginwidth="0" marginheight="0"></IFRAME>				   </div>					<select name="campanha" size="1" id="campanha" onChange="CarregaDados();">					<option value>...</option><%While NOT rs2.EOF%>					<option value="<%=rs2("campanha") %>"><%=rs2("campanha") %></option><%rs2.MoveNextWend%>		  </select>	</td>		</tr>		<tr>	<td width="194"><span class="texto10">Parceira  :</span></td>	<td width="150"><select name="coligada" size="1" id="coligada">					<option value>...</option>		  </select></td>		</tr><tr>	<td width="194"><span class="texto10">Número do Job  :</span></td>	<td width="150"><select name="nun_job" size="1" id="nun_job">					<option value>...</option>		  </select></td>

POdem dar uma mãozinha???

 

Abraços

[shumi 0]

pessoal poderiam me dar uma mão aqui?

[shumi 0]

Como assim ? 2 selects diferentes ?

Eu queria que o users escolhece campanha ai da campanha viria o campo coligada(Até ai beleza.) ai queria que quando eswcolhece a coligada virias as informações da coligada.Que seria o resto do form.

<form name="Cadastro" id="Cadastro" method="post" action="carta_briefing_valida.asp"><p align="center"><table width="744" border="0">		<tr>	<td width="738"><table width="446" height="60" border="0"><tr>	<td width="194"><span class="texto10">Campanha :</span></td>	<td width="150"><div style="DISPLAY: none; POSITION: absolute" align="left">					 <IFRAME src name="myIframe" id="myIframe" width="400" height="100" marginwidth="0" marginheight="0"></IFRAME>				   </div>					<select name="campanha" size="1" id="campanha" onChange="carregar();">					<option value>...</option><%While NOT rs2.EOF%>					<option value="<%=rs2("campanha") %>"><%=rs2("campanha") %></option><%rs2.MoveNextWend%>		  </select>	</td>		</tr>		<tr>	<td width="194"><span class="texto10">Parceira  :</span></td>	<td width="150"><select name="coligada" size="1" id="coligada">					<option value>...</option>		  </select></td>		</tr>	<tr><%Response.Write("<td><span class='texto10'>Data de inclussão:</span></td><td><span class='texto10' style='color:#FF0000'>"&Now()&"</span></td><td><span class='texto10' style='color:#FF0000'>"&Session("login")&"</span></td></tr>")%></table><table width="611" border="1">  <tr>	<td width="156"><div align="center"><span class="texto10">Material que está recebendo : </span></div></td>	<td width="439"><textarea name="material_recebendo" cols="80" rows="8" id="material_recebendo"></textarea></td>  </tr>  <tr>	<td><div align="center"><span class="texto10">Produto que está recebendo : </span></div></td>	<td><textarea name="produto_recebendo" cols="80" rows="8" id="produto_recebendo"></textarea></td>  </tr>  <tr>	<td><div align="center"><span class="texto10">Uniforme que está recebendo : </span></div></td>	<td><textarea name="uniforme_recebendo" cols="80" rows="8" id="uniforme_recebendo"></textarea></td>  </tr>  <tr>	<td><div align="center"><span class="texto10">Material para treinamento : </span></div></td>	<td><textarea name="material_treinamento" cols="80" rows="8" id="material_treinamento"></textarea></td>  </tr>  <tr>	<td><div align="center"><span class="texto10">Trabalho da parceria : </span></div></td>	<td><textarea name="trabalho_parceria" cols="80" rows="8" id="trabalho_parceria"></textarea></td>  </tr>  <tr>	<td><div align="center"><span class="texto10">Trabalho da supervisão : </span></div></td>	<td><textarea name="trabalho_supervisao" cols="80" rows="8" id="trabalho_supervisao"></textarea></td>  </tr><tr>	<td><div align="center"><span class="texto10">Trabalho da coordenação : </span></div></td>	<td><textarea name="trabalho_coordenacao" cols="80" rows="8" id="trabalho_coordenacao"></textarea></td>  </tr><tr>	<td><div align="center"><span class="texto10">Material que deverá ser comprado pela parceira: </span></div></td>	<td><textarea name="material_comprado_parceira" cols="80" rows="8" id="material_comprado_parceira"></textarea></td>  </tr><tr>	<td><div align="center"><span class="texto10">Seleção e treinamento  : </span></div></td>	<td><textarea name="selecao_treinamento" cols="80" rows="8" id="selecao_treinamento"></textarea></td>  </tr><tr>	<td><div align="center"><span class="texto10">Relatórios  : </span></div></td>	<td><textarea name="relatorios" cols="80" rows="8" id="relatorios"></textarea></td>  </tr><tr>	<td><div align="center"><span class="texto10">Envio de Status   : </span></div></td>	<td><textarea name="envio_status" cols="80" rows="8" id="envio_status"></textarea></td>  </tr></table><table width="744" border="1"><tr>	<td width="144"><div align="center"><span class="texto10">Valor da taxa de parceira  : </span></div></td>	<td width="144"><input name="valor_taxa_parceira" type="text" id="valor" onKeyDown="FormataValor(this.id, 13, event)"></td>	<td width="104"><span class="texto10">Pelo trabalho</span>	  <input name="valor_taxa_parceira_pelo_o_q" type="radio" value="Pelo trabalho"></td>	<td width="104"><span class="texto10">Por dia </span>	  <input name="valor_taxa_parceira_pelo_o_q" type="radio" value="Por dia"></td>	<td width="104"><span class="texto10">Por período </span>	  <input name="valor_taxa_parceira_pelo_o_q" type="radio" value="Por período"></td><td width="104"><span class="texto10">Por mês </span>	  <input name="valor_taxa_parceira_pelo_o_q" type="radio" value="Por mês"></td></tr></table><table width="744" border="1"><tr>	<td width="144"><div align="center"><span class="texto10">Documento para recebimento(taxa de parceira) : </span></div></td><td width="308"><div align="left"><span class="texto10">Sua NF de serviço :  <input name="documento_para_recebimento_taxa_de_parceira" type="radio" value="NF de serviço"></span></div></td><td width="270"><div align="left"><span class="texto10">Reembolso :  <input name="documento_para_recebimento_taxa_de_parceira" type="radio" value="Reembolso"></span></div></td></tr></table><table width="744" border="1"><tr>	<td width="144"><div align="center"><span class="texto10">Valor da taxa de supervisão  : </span></div></td>	<td width="144"><input name="valor_taxa_supervisao" type="text" id="valor2" onKeyDown="FormataValor(this.id, 13, event)"></td>	<td width="104"><span class="texto10">Pelo trabalho</span>	  <input name="valor_taxa_supervisao_pelo_o_q" type="radio" value="Pelo trabalho"></td>	<td width="104"><span class="texto10">Por dia </span>	  <input name="valor_taxa_supervisao_pelo_o_q" type="radio" value="Por dia"></td>	<td width="104"><span class="texto10">Por período </span>	  <input name="valor_taxa_supervisao_pelo_o_q" type="radio" value="Por período"></td><td width="104"><span class="texto10">Por mês </span>	  <input name="valor_taxa_supervisao_pelo_o_q" type="radio" value="Por mês"></td></tr></table><table width="744" border="1"><tr>	<td width="144"><div align="center"><span class="texto10">Documento para recebimento(taxa de supervisão) : </span></div></td><td width="308"><div align="left"><span class="texto10">Sua NF de serviço :  <input name="documento_para_recebimento_taxa_de_supervisao" type="radio" value="NF de serviço"></span></div></td><td width="270"><div align="left"><span class="texto10">Reembolso :  <input name="documento_para_recebimento_taxa_de_supervisao" type="radio" value="Reembolso"></span></div></td></tr></table><table width="744" border="1"><tr>	<td width="144"><div align="center"><span class="texto10">Valor da taxa de coordenação  : </span></div></td>	<td width="144"><input name="valor_taxa_coordenacao" type="text" id="valor3" onKeyDown="FormataValor(this.id, 13, event)"></td>	<td width="104"><span class="texto10">Pelo trabalho</span>	  <input name="valor_taxa_coordenacao_pelo_o_q" type="radio" value="Pelo trabalho"></td>	<td width="104"><span class="texto10">Por dia </span>	  <input name="valor_taxa_coordenacao_pelo_o_q" type="radio" value="Por dia"></td>	<td width="104"><span class="texto10">Por período </span>	  <input name="valor_taxa_coordenacao_pelo_o_q" type="radio" value="Por período"></td><td width="104"><span class="texto10">Por mês </span>	  <input name="valor_taxa_coordenacao_pelo_o_q" type="radio" value="Por mês"></td></tr></table><table width="744" border="1"><tr>	<td width="144"><div align="center"><span class="texto10">Documento para recebimento(taxa de coordenação) : </span></div></td><td width="308"><div align="left"><span class="texto10">Sua NF de serviço :  <input name="documento_para_recebimento_taxa_de_coordenacao" type="radio" value="NF de serviço"></span></div></td><td width="270"><div align="left"><span class="texto10">Reembolso :  <input name="documento_para_recebimento_taxa_de_coordenacao" type="radio" value="Reembolso"></span></div></td></tr></table><table width="744" border="1"><tr>	<td width="144"><div align="center"><span class="texto10">Valor da verba para compra de material: </span></div></td>	<td width="144"><input name="valor_verba_compra_material" type="text" id="valor4" onKeyDown="FormataValor(this.id, 13, event)"></td>	<td width="104"><span class="texto10">Pelo trabalho</span>	  <input name="valor_verba_compra_material_pelo_o_q" type="radio" value="Pelo trabalho"></td>	<td width="104"><span class="texto10">Por dia </span>	  <input name="valor_verba_compra_material_pelo_o_q" type="radio" value="Por dia"></td>	<td width="104"><span class="texto10">Por período </span>	  <input name="valor_verba_compra_material_pelo_o_q" type="radio" value="Por período"></td><td width="104"><span class="texto10">Por mês </span>	  <input name="valor_verba_compra_material_pelo_o_q" type="radio" value="Por mês"></td></tr></table><table width="744" border="1"><tr>	<td width="144"><div align="center"><span class="texto10">Documento para recebimento(compra de material) : </span></div></td><td width="308"><div align="left"><span class="texto10">Sua NF de serviço :  <input name="documento_para_compra_de_material" type="radio" value="NF de serviço"></span></div></td><td width="270"><div align="left"><span class="texto10">Reembolso :  <input name="documento_para_compra_de_material" type="radio" value="Reembolso"></span></div></td></tr><tr>	<td width="144"><div align="center"><span class="texto10">Fotos : </span></div></td><td width="308"><div align="left"><span class="texto10">Sim :</span>	  <input name="fotos" type="radio" value="sim" onClick="java script:sub1_abre('tabela1');"><span class="texto10">Não :</span><input name="fotos" type="radio" value="Não" onClick="java script:sub1_abre('tabela2');"></div></td><td><div id="tabela1" style="display:none;text-align:justify;"><textarea name="mais_informacao" cols="50" rows="5" id="mais_informacao"></textarea></div><div id="tabela2" style="display:none;text-align:justify;"><input name="mais_informacao" type="hidden"></div></td>

Abraços

[shumi 0]

vou usar 2 remotes, pois vou ter que usar essas mesmas funções pra outro form então assim matenho o 1 remote e modifico o 2 pro outro form.!deixa eu tentar aqui e já te falo!

[shumi 0]

Adriano.

Fiz o remote2.asp ficou assim então.

 

<%coligada = Request("coligada")set Conexcao = Server.CreateObject("ADODB.Connection")Conexcao.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MaPpath("banco/db_sistema.mdb")SQL = "Select coligada.fantasia,carta_briefing.material_recebendo,carta_briefing.produto_recebendo,carta_briefing.uniforme_recebendo,carta_briefing.material_treinamento,carta_briefing.trabalho_parceria,carta_briefing.trabalho_supervisao,carta_briefing.trabalho_coordenacao,carta_briefing.material_comprado_parceira,carta_briefing.selecao_treinamento,carta_briefing.relatorios,carta_briefing.envio_status,carta_briefing.valor_taxa_parceira,carta_briefing.valor_taxa_parceira_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_parceira,carta_briefing.valor_taxa_supervisao,carta_briefing.valor_taxa_supervisao_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_supervisao,carta_briefing.valor_taxa_coordenacao,carta_briefing.valor_taxa_coordenacao_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_coordenacao,carta_briefing.valor_verba_compra_material,carta_briefing.valor_verba_compra_material_pelo_o_q,carta_briefing.documento_para_compra_de_material,carta_briefing.fotos,carta_briefing.mais_informacao From coligada,carta_briefing where coligada.fantasia='"&coligada&"' GROUP BY coligada.fantasia,carta_briefing.material_recebendo,carta_briefing.produto_recebendo,carta_briefing.uniforme_recebendo,carta_briefing.material_treinamento,carta_briefing.trabalho_parceria,carta_briefing.trabalho_supervisao,carta_briefing.trabalho_coordenacao,carta_briefing.material_comprado_parceira,carta_briefing.selecao_treinamento,carta_briefing.relatorios,carta_briefing.envio_status,carta_briefing.valor_taxa_parceira,carta_briefing.valor_taxa_parceira_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_parceira,carta_briefing.valor_taxa_supervisao,carta_briefing.valor_taxa_supervisao_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_supervisao,carta_briefing.valor_taxa_coordenacao,carta_briefing.valor_taxa_coordenacao_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_coordenacao,carta_briefing.valor_verba_compra_material,carta_briefing.valor_verba_compra_material_pelo_o_q,carta_briefing.documento_para_compra_de_material,carta_briefing.fotos,carta_briefing.mais_informacao"set rs = server.CreateObject("ADODB.Recordset")Conexcao.openrs.CursorType = 3rs.Open SQL, Conexcao%>  <script>  loc = new Array(<%=rs.recordcount%>)  for (i=0; i < <%=rs.recordcount%>; i++) {		 loc[i] = new Array(25)				 for (j=0; j < 25; j++) {			 loc[i][j] = "0"		   }   }   <% j = 0	 do while not rs.eof%>loc[<%=j%>][0] = "<%=trim(rs("material_recebendo"))%>";loc[<%=j%>][1] = "<%=trim(rs("produto_recebendo"))%>";loc[<%=j%>][2] = "<%=trim(rs("uniforme_recebendo"))%>";loc[<%=j%>][3] = "<%=trim(rs("material_treinamento"))%>";loc[<%=j%>][4] = "<%=trim(rs("trabalho_parceria"))%>";loc[<%=j%>][5] = "<%=trim(rs("trabalho_supervisao"))%>";loc[<%=j%>][6] = "<%=trim(rs("trabalho_coordenacao"))%>";loc[<%=j%>][7] = "<%=trim(rs("material_comprado_parceira"))%>";loc[<%=j%>][8] = "<%=trim(rs("selecao_treinamento"))%>";loc[<%=j%>][9] = "<%=trim(rs("relatorios"))%>";loc[<%=j%>][10] = "<%=trim(rs("envio_status"))%>";loc[<%=j%>][11] = "<%=trim(rs("valor_taxa_parceira"))%>";loc[<%=j%>][12] = "<%=trim(rs("valor_taxa_parceira_pelo_o_q"))%>";loc[<%=j%>][13] = "<%=trim(rs("documento_para_recebimento_taxa_de_parceira"))%>";loc[<%=j%>][14] = "<%=trim(rs("valor_taxa_supervisao"))%>";loc[<%=j%>][15] = "<%=trim(rs("valor_taxa_supervisao_pelo_o_q"))%>";loc[<%=j%>][16] = "<%=trim(rs("documento_para_recebimento_taxa_de_supervisao"))%>";loc[<%=j%>][17] = "<%=trim(rs("valor_taxa_coordenacao"))%>";loc[<%=j%>][18] = "<%=trim(rs("valor_taxa_coordenacao_pelo_o_q"))%>";loc[<%=j%>][19] = "<%=trim(rs("documento_para_recebimento_taxa_de_coordenacao"))%>";loc[<%=j%>][20] = "<%=trim(rs("valor_verba_compra_material"))%>";loc[<%=j%>][21] = "<%=trim(rs("valor_verba_compra_material_pelo_o_q"))%>";loc[<%=j%>][22] = "<%=trim(rs("documento_para_compra_de_material"))%>";loc[<%=j%>][23] = "<%=trim(rs("fotos"))%>";loc[<%=j%>][24] = "<%=trim(rs("mais_informacao"))%>";	  <%	  rs.movenext	  j  = j  + 1	 loop   rs.close  set rs = nothing   Conexcao.close   set Conexcao = nothing %>   parent.inicia();       </script>

como adapto no meu form???

 

veja como está:

<script language="JavaScript" type="text/JavaScript">	function carregar(){	Combo1 = document.Cadastro.campanha; //ALTERE AQUI PARA SEU FORM E 1º SELECT	Combo2 = document.Cadastro.coligada; //ALTERE AQUI PARA SEU FORM E 2º SELECT	var url;	url = 'remote.asp?campanha='+Combo1[Combo1.selectedIndex].value;	Combo2.options.length = 0;addItem(Combo2,"Aguarde...carregando","",false,Combo2.length)	myIframe.location = url;Combo2.focus()}	function inicia(){local1 = new Array();var maximo1, i;local1 = myIframe.loc;maximo1 = local1.length;Combo2.options.length = 0;//addItem(Combo2,false,Combo2.length);	for (i=0;i<maximo1;i++){addItem(Combo2,local1[i][1],local1[i][0],false,Combo2.length);}}function addItem(obj,strText,strValue,blSel,intPos){	 	 var newOpt,i,ArTemp,selIndex;	 	 selIndex = (blSel)?intPos:obj.selectedIndex;	 	 newOpt = new Option(strText,strValue);	 	 Len = obj.options.length+1	 	 if (intPos > Len) return	 	 obj.options.length = Len	 	 if (intPos != Len) {	 		  ArTemp = new Array();	 		  for(i=intPos;i<obj.options.length-1;i++)	 			   ArTemp[i] = Array(obj.options[i].text,obj.options[i].value);	 		  for(i=intPos+1;i<Len;i++)	 			   obj.options[i] = new Option(ArTemp[i-1][0],ArTemp[i-1][1]);	 	 }	 	 obj.options[intPos] = newOpt;	 	 if (selIndex > intPos)	 		  obj.selectedIndex = selIndex+1;	 	 else if (selIndex == intPos)	  		  obj.selectedIndex = intPos;	 }	 </script><!--#include file="includes/topo.asp"--><p align="center"><span class="testo14">Carta Briefing</span></p><br><form name="Cadastro" id="Cadastro" method="post" action="carta_briefing_valida.asp"><p align="center"><table width="744" border="0">		<tr>	<td width="738"><table width="446" height="60" border="0"><tr>	<td width="194"><span class="texto10">Campanha :</span></td>	<td width="150"><div style="DISPLAY: none; POSITION: absolute" align="left">					 <IFRAME src name="myIframe" id="myIframe" width="400" height="100" marginwidth="0" marginheight="0"></IFRAME>				   </div>					<select name="campanha" size="1" id="campanha" onChange="carregar();">					<option value>...</option><%While NOT rs2.EOF%>					<option value="<%=rs2("campanha") %>"><%=rs2("campanha") %></option><%rs2.MoveNextWend%>		  </select>	</td>		</tr>		<tr>	<td width="194"><span class="texto10">Parceira  :</span></td>	<td width="150"><select name="coligada" size="1" id="coligada">					<option value>...</option>		  </select></td>		</tr>	<tr><%Response.Write("<td><span class='texto10'>Data de inclussão:</span></td><td><span class='texto10' style='color:#FF0000'>"&Now()&"</span></td><td><span class='texto10' style='color:#FF0000'>"&Session("login")&"</span></td></tr>")%></table><table width="611" border="1">  <tr>	<td width="156"><div align="center"><span class="texto10">Material que está recebendo : </span></div></td>	<td width="439"><textarea name="material_recebendo" cols="80" rows="8" id="material_recebendo"></textarea></td>  </tr>  <tr>	<td><div align="center"><span class="texto10">Produto que está recebendo : </span></div></td>	<td><textarea name="produto_recebendo" cols="80" rows="8" id="produto_recebendo"></textarea></td>  </tr>  <tr>	<td><div align="center"><span class="texto10">Uniforme que está recebendo : </span></div></td>	<td><textarea name="uniforme_recebendo" cols="80" rows="8" id="uniforme_recebendo"></textarea></td>  </tr>  <tr>	<td><div align="center"><span class="texto10">Material para treinamento : </span></div></td>	<td><textarea name="material_treinamento" cols="80" rows="8" id="material_treinamento"></textarea></td>  </tr>  <tr>	<td><div align="center"><span class="texto10">Trabalho da parceria : </span></div></td>	<td><textarea name="trabalho_parceria" cols="80" rows="8" id="trabalho_parceria"></textarea></td>  </tr>  <tr>	<td><div align="center"><span class="texto10">Trabalho da supervisão : </span></div></td>	<td><textarea name="trabalho_supervisao" cols="80" rows="8" id="trabalho_supervisao"></textarea></td>  </tr><tr>	<td><div align="center"><span class="texto10">Trabalho da coordenação : </span></div></td>	<td><textarea name="trabalho_coordenacao" cols="80" rows="8" id="trabalho_coordenacao"></textarea></td>  </tr><tr>	<td><div align="center"><span class="texto10">Material que deverá ser comprado pela parceira: </span></div></td>	<td><textarea name="material_comprado_parceira" cols="80" rows="8" id="material_comprado_parceira"></textarea></td>  </tr><tr>	<td><div align="center"><span class="texto10">Seleção e treinamento  : </span></div></td>	<td><textarea name="selecao_treinamento" cols="80" rows="8" id="selecao_treinamento"></textarea></td>  </tr><tr>	<td><div align="center"><span class="texto10">Relatórios  : </span></div></td>	<td><textarea name="relatorios" cols="80" rows="8" id="relatorios"></textarea></td>  </tr><tr>	<td><div align="center"><span class="texto10">Envio de Status   : </span></div></td>	<td><textarea name="envio_status" cols="80" rows="8" id="envio_status"></textarea></td>  </tr></table><table width="744" border="1"><tr>	<td width="144"><div align="center"><span class="texto10">Valor da taxa de parceira  : </span></div></td>	<td width="144"><input name="valor_taxa_parceira" type="text" id="valor" onKeyDown="FormataValor(this.id, 13, event)"></td>	<td width="104"><span class="texto10">Pelo trabalho</span>	  <input name="valor_taxa_parceira_pelo_o_q" type="radio" value="Pelo trabalho"></td>	<td width="104"><span class="texto10">Por dia </span>	  <input name="valor_taxa_parceira_pelo_o_q" type="radio" value="Por dia"></td>	<td width="104"><span class="texto10">Por período </span>	  <input name="valor_taxa_parceira_pelo_o_q" type="radio" value="Por período"></td><td width="104"><span class="texto10">Por mês </span>	  <input name="valor_taxa_parceira_pelo_o_q" type="radio" value="Por mês"></td></tr></table><table width="744" border="1"><tr>	<td width="144"><div align="center"><span class="texto10">Documento para recebimento(taxa de parceira) : </span></div></td><td width="308"><div align="left"><span class="texto10">Sua NF de serviço :  <input name="documento_para_recebimento_taxa_de_parceira" type="radio" value="NF de serviço"></span></div></td><td width="270"><div align="left"><span class="texto10">Reembolso :  <input name="documento_para_recebimento_taxa_de_parceira" type="radio" value="Reembolso"></span></div></td></tr></table><table width="744" border="1"><tr>	<td width="144"><div align="center"><span class="texto10">Valor da taxa de supervisão  : </span></div></td>	<td width="144"><input name="valor_taxa_supervisao" type="text" id="valor2" onKeyDown="FormataValor(this.id, 13, event)"></td>	<td width="104"><span class="texto10">Pelo trabalho</span>	  <input name="valor_taxa_supervisao_pelo_o_q" type="radio" value="Pelo trabalho"></td>	<td width="104"><span class="texto10">Por dia </span>	  <input name="valor_taxa_supervisao_pelo_o_q" type="radio" value="Por dia"></td>	<td width="104"><span class="texto10">Por período </span>	  <input name="valor_taxa_supervisao_pelo_o_q" type="radio" value="Por período"></td><td width="104"><span class="texto10">Por mês </span>	  <input name="valor_taxa_supervisao_pelo_o_q" type="radio" value="Por mês"></td></tr></table><table width="744" border="1"><tr>	<td width="144"><div align="center"><span class="texto10">Documento para recebimento(taxa de supervisão) : </span></div></td><td width="308"><div align="left"><span class="texto10">Sua NF de serviço :  <input name="documento_para_recebimento_taxa_de_supervisao" type="radio" value="NF de serviço"></span></div></td><td width="270"><div align="left"><span class="texto10">Reembolso :  <input name="documento_para_recebimento_taxa_de_supervisao" type="radio" value="Reembolso"></span></div></td></tr></table><table width="744" border="1"><tr>	<td width="144"><div align="center"><span class="texto10">Valor da taxa de coordenação  : </span></div></td>	<td width="144"><input name="valor_taxa_coordenacao" type="text" id="valor3" onKeyDown="FormataValor(this.id, 13, event)"></td>	<td width="104"><span class="texto10">Pelo trabalho</span>	  <input name="valor_taxa_coordenacao_pelo_o_q" type="radio" value="Pelo trabalho"></td>	<td width="104"><span class="texto10">Por dia </span>	  <input name="valor_taxa_coordenacao_pelo_o_q" type="radio" value="Por dia"></td>	<td width="104"><span class="texto10">Por período </span>	  <input name="valor_taxa_coordenacao_pelo_o_q" type="radio" value="Por período"></td><td width="104"><span class="texto10">Por mês </span>	  <input name="valor_taxa_coordenacao_pelo_o_q" type="radio" value="Por mês"></td></tr></table><table width="744" border="1"><tr>	<td width="144"><div align="center"><span class="texto10">Documento para recebimento(taxa de coordenação) : </span></div></td><td width="308"><div align="left"><span class="texto10">Sua NF de serviço :  <input name="documento_para_recebimento_taxa_de_coordenacao" type="radio" value="NF de serviço"></span></div></td><td width="270"><div align="left"><span class="texto10">Reembolso :  <input name="documento_para_recebimento_taxa_de_coordenacao" type="radio" value="Reembolso"></span></div></td></tr></table><table width="744" border="1"><tr>	<td width="144"><div align="center"><span class="texto10">Valor da verba para compra de material: </span></div></td>	<td width="144"><input name="valor_verba_compra_material" type="text" id="valor4" onKeyDown="FormataValor(this.id, 13, event)"></td>	<td width="104"><span class="texto10">Pelo trabalho</span>	  <input name="valor_verba_compra_material_pelo_o_q" type="radio" value="Pelo trabalho"></td>	<td width="104"><span class="texto10">Por dia </span>	  <input name="valor_verba_compra_material_pelo_o_q" type="radio" value="Por dia"></td>	<td width="104"><span class="texto10">Por período </span>	  <input name="valor_verba_compra_material_pelo_o_q" type="radio" value="Por período"></td><td width="104"><span class="texto10">Por mês </span>	  <input name="valor_verba_compra_material_pelo_o_q" type="radio" value="Por mês"></td></tr></table><table width="744" border="1"><tr>	<td width="144"><div align="center"><span class="texto10">Documento para recebimento(compra de material) : </span></div></td><td width="308"><div align="left"><span class="texto10">Sua NF de serviço :  <input name="documento_para_compra_de_material" type="radio" value="NF de serviço"></span></div></td><td width="270"><div align="left"><span class="texto10">Reembolso :  <input name="documento_para_compra_de_material" type="radio" value="Reembolso"></span></div></td></tr><tr>	<td width="144"><div align="center"><span class="texto10">Fotos : </span></div></td><td width="308"><div align="left"><span class="texto10">Sim :</span>	  <input name="fotos" type="radio" value="sim" onClick="java script:sub1_abre('tabela1');"><span class="texto10">Não :</span><input name="fotos" type="radio" value="Não" onClick="java script:sub1_abre('tabela2');"></div></td><td><div id="tabela1" style="display:none;text-align:justify;"><textarea name="mais_informacao" cols="50" rows="5" id="mais_informacao"></textarea></div><div id="tabela2" style="display:none;text-align:justify;"><input name="mais_informacao" type="hidden"></div></td></tr></table></p><p align="center">			<input type="submit" name="envia" value="Confirmar">	 		<input type="reset" name="limpa" value="Limpar"></p></form>

Valeu!!!

[shumi 0]

Adriano,

Dá uma olhada...

Fiz assim:

 

<script LANGUAGE="javascript">function carregar(){var url;url = 'remote.asp?campanha='+document.Cadastro.campanha[document.Cadastro.campanha.selectedIndex].value;document.Cadastro.coligada.options.length = 0;addItem(document.Cadastro.coligada,"Aguarde...carregando","",false,document.Cadastro.coligada.length)myIframe.location = url;document.Cadastro.coligada.focus()}function inicia(){local1 = new Array();var maximo1, i, campo1;local1 = myIframe.loc;campo1 = document.Cadastro.coligada;maximo1 = local1.length;document.Cadastro.coligada.options.length = 0;addItem(campo1,'','',false,campo1.length);for (i=0;i<maximo1;i++){  addItem(campo1,local1[i][1],local1[i][0],false,campo1.length);}}function carregar1(){var url;url = 'remote2.asp?coligada='+document.Cadastro.coligada[document.Cadastro.coligada.selectedIndex].value;document.Cadastro.material_recebendo.options.length = 0;addItem(document.Cadastro.material_recebendo,"Aguarde...carregando","",false,document.Cadastro.material_recebendo.length)myIframe.location = url;document.Cadastro.material_recebendo.focus()}function inicia1(){local1 = new Array();var maximo1, i, campo1;local1 = myIframe.loc;campo1 = document.Cadastro.material_recebendo;maximo1 = local1.length;document.Cadastro.material_recebendo.options.length = 0;addItem(campo1,'','',false,campo1.length);for (i=0;i<maximo1;i++){  addItem(campo1,local1[i][1],local1[i][0],false,campo1.length);}}function addItem(obj,strText,strValue,blSel,intPos){ 	 var newOpt,i,ArTemp,selIndex; 	 selIndex = (blSel)?intPos:obj.selectedIndex; 	 newOpt = new Option(strText,strValue); 	 Len = obj.options.length+1 	 if (intPos > Len) return 	 obj.options.length = Len 	 if (intPos != Len) { 		  ArTemp = new Array(); 		  for(i=intPos;i<obj.options.length-1;i++) 			   ArTemp[i] = Array(obj.options[i].text,obj.options[i].value); 		  for(i=intPos+1;i<Len;i++) 			   obj.options[i] = new Option(ArTemp[i-1][0],ArTemp[i-1][1]); 	 } 	 obj.options[intPos] = newOpt; 	 if (selIndex > intPos) 		  obj.selectedIndex = selIndex+1; 	 else if (selIndex == intPos)  		  obj.selectedIndex = intPos; } </script>

Uso:

 

<select name="campanha" size="1" id="campanha" onChange="carregar();">					<option value>...</option><%While NOT rs2.EOF%>					<option value="<%=rs2("campanha") %>"><%=rs2("campanha") %></option><%rs2.MoveNextWend%>		  </select>

e

<select name="coligada" size="1" id="coligada" onChange="carregar1();">					<option value>...</option>		  </select>

 

Deu alguns erros, mas consegui corriguir quase todos, mas tem um aqui que não sei como resolver.

Assim:

 

document.Cadastro.material_recebendo.options é nulo ou não é um objeto.

 

Esse campo é campo do tipo textarea.

 

Ao invez do option tentei várias coisas mas não funfou nenhuma. http://forum.imasters.com.br/public/style_emoticons/default/upset.gif

[shumi 0]

Adriano,

Todo lugar que tava dando erro eu substitui options por value, mas no finalzinho bem aqui.

obj.value[intPos] = newOpt; 	 if (selIndex > intPos) 		  obj.selectedIndex = selIndex+1;

Se eu coloco value, não aparece nada no 2º combo(coligada)!

 

tá assim:

<script LANGUAGE="javascript">function carregar(){var url;url = 'remote.asp?campanha='+document.Cadastro.campanha[document.Cadastro.campanha.selectedIndex].value;document.Cadastro.coligada.options.length = 0;addItem(document.Cadastro.coligada,"Aguarde...carregando","",false,document.Cadastro.coligada.length)myIframe.location = url;document.Cadastro.coligada.focus()}function inicia(){local1 = new Array();var maximo1, i, campo1;local1 = myIframe.loc;campo1 = document.Cadastro.coligada;maximo1 = local1.length;document.Cadastro.coligada.options.length = 0;addItem(campo1,'','',false,campo1.length);for (i=0;i<maximo1;i++){  addItem(campo1,local1[i][1],local1[i][0],false,campo1.length);}}function carregar1(){var url;url = 'remote2.asp?coligada='+document.Cadastro.coligada[document.Cadastro.coligada.selectedIndex].value;document.Cadastro.material_recebendo.value.length = 0;addItem(document.Cadastro.material_recebendo,"Aguarde...carregando","",false,document.Cadastro.material_recebendo.length)myIframe.location = url;document.Cadastro.material_recebendo.focus()}function inicia1(){local1 = new Array();var maximo1, i, campo1;local1 = myIframe.loc;campo1 = document.Cadastro.material_recebendo;maximo1 = local1.length;document.Cadastro.material_recebendo.value.length = 0;addItem(campo1,'','',false,campo1.length);for (i=0;i<maximo1;i++){  addItem(campo1,local1[i][1],local1[i][0],false,campo1.length);}}function addItem(obj,strText,strValue,blSel,intPos){ 	 var newOpt,i,ArTemp,selIndex; 	 selIndex = (blSel)?intPos:obj.selectedIndex; 	 newOpt = new Option(strText,strValue); 	 Len = obj.value.length+1 	 if (intPos > Len) return 	 obj.value.length = Len 	 if (intPos != Len) { 		  ArTemp = new Array(); 		  for(i=intPos;i<obj.value.length-1;i++) 			   ArTemp[i] = Array(obj.value[i].text,obj.value[i].value); 		  for(i=intPos+1;i<Len;i++) 			   obj.options[i] = new Option(ArTemp[i-1][0],ArTemp[i-1][1]); 	 } 	 obj.value[intPos] = newOpt; 	 if (selIndex > intPos) 		  obj.selectedIndex = selIndex+1; 	 else if (selIndex == intPos)  		  obj.selectedIndex = intPos; } </script>

[shumi 0]

cara tem lugar que eu ponho o value e dá a mesma coisa, não aparece "some" as opções das coligadas! http://forum.imasters.com.br/public/style_emoticons/default/cry.gif

[shumi 0]

Adriano,Dá uma mãozinha ai cara.O que pode ser agora?Abraços

[shumi 0]

galera podem me dar uma mão aqui, retomei com essa parte hoje.

 

Alterei até onde consegui ai ficou assim:

 

<script LANGUAGE="javascript">function carregar(){var url;url = 'remote.asp?campanha='+document.Cadastro.campanha[document.Cadastro.campanha.selectedIndex].value;document.Cadastro.coligada.options.length = 0;addItem(document.Cadastro.coligada,"Aguarde...carregando","",false,document.Cadastro.coligada.length)myIframe.location = url;document.Cadastro.coligada.focus()}function inicia(){local1 = new Array();var maximo1, i, campo1;local1 = myIframe.loc;campo1 = document.Cadastro.coligada;maximo1 = local1.length;document.Cadastro.coligada.options.length = 0;addItem(campo1,'','',false,campo1.length);for (i=0;i<maximo1;i++){  addItem(campo1,local1[i][1],local1[i][0],false,campo1.length);}}function carregar1(){var url;url = 'remote2.asp?coligada='+document.Cadastro.coligada[document.Cadastro.coligada.selectedIndex].value;document.Cadastro.material_recebendo.value.length = 0;addItem(document.Cadastro.material_recebendo,"Aguarde...carregando","",false,document.Cadastro.material_recebendo.length)myIframe.location = url;document.Cadastro.material_recebendo.focus()}function inicia1(){local1 = new Array();var maximo1, i, campo1;local1 = myIframe.loc;campo1 = document.Cadastro.material_recebendo;maximo1 = local1.length;document.Cadastro.material_recebendo.value.length = 0;addItem(campo1,'','',false,campo1.length);for (i=0;i<maximo1;i++){  addItem(campo1,local1[i][1],local1[i][0],false,campo1.length);}}function addItem(obj,strText,strValue,blSel,intPos){ 	 var newOpt,i,ArTemp,selIndex; 	 selIndex = (blSel)?intPos:obj.selectedIndex; 	 newOpt = new Option(strText,strValue); 	 Len = obj.value.length+1 	 if (intPos > Len) return 	 obj.value.length = Len 	 if (intPos != Len) { 		  ArTemp = new Array(); 		  for(i=intPos;i<obj.value.length-1;i++) 			   ArTemp[i] = Array(obj.value[i].text,obj.value[i].value); 		  for(i=intPos+1;i<Len;i++) 			   obj.options[i] = new Option(ArTemp[i-1][0],ArTemp[i-1][1]); 	 } 	 obj.options[intPos] = newOpt; 	 if (selIndex > intPos) 		  obj.selectedIndex = selIndex+1; 	 else if (selIndex == intPos)  		  obj.selectedIndex = intPos; } </script>

ai deu o erro objeto esperado

nessa parte aqui ta o erro:

 

obj.options[intPos] = newOpt;

 

ai se eu substituo options por value

Não da erro, mas tb não aparece nada. :wacko:

[shumi 0]

Adriano,No remote "normal" tem 3 funções certo?- carregar- inicia- addIteme se eu fizer 2 carregar, uma pra carregar campanha e coligada e outra pra carregar coligada e o restante dos itens.e uma inicia e uma assItem.Dá certo?To tentando vários jeitos aqui, mas agora nem ta carregando o 2º combo.

[shumi 0]

Cara vou tentar pelo seu, mas você tem que me guiar em algumas coisas.

tipo você troca os nomes de algumas.

Tipo aqui.

 

url = 'remote1.asp?Org='+document.Emendas.txtOrgao[document.Emendas.txtOrgao.selectedIndex].value;document.Emendas.CboOrg.options.length = 0;addItem(document.Emendas.CboOrg,"Aguarde...carregando","",false,document.Emendas.CboOrg.length)myIframe.location = url;document.Emendas.CboOrg.focus()

o meu eu fiz assim:

 

url = 'remote.asp?coligada='+document.Cadastro.coligada[document.Cadastro.coligada.selectedIndex].value;document.Cadastro.coligada.options.length = 0;addItem(document.Cadastro.coligada,"Aguarde...carregando","",false,document.Cadastro.coligada.length)myIframe.location = url;document.Cadastro.coligada.focus()

Tá certo até ai?

[shumi 0]

hummm

Refiz o JS

 

Tipo só pra você entender a situação.

Tenho um menu select que o user escolherá a campanha.

Quando ele escolher a campanha vai aparecer as coligadas da campanha que ele escolheu(Remote)

Quando ele escolher uma coligada, vai aparecer os valores nos campos do tipo texto, nesse caso estou tentando fazer só um campo texto pra testar, que é o campo "material_recebendo"

 

Veja como fiz:

<script LANGUAGE="javascript">function carregar(){var url;url = 'remote.asp?campanha='+document.Cadastro.campanha[document.Cadastro.campanha.selectedIndex].value;document.Cadastro.coligada.options.length = 0;addItem(document.Cadastro.coligada,"Aguarde...carregando","",false,document.Cadastro.coligada.length)myIframe.location = url;document.Cadastro.coligada.focus()}function inicia(){local1 = new Array();var maximo1, i, campo1;local1 = myIframe.loc;campo1 = document.Cadastro.coligada;maximo1 = local1.length;document.Cadastro.coligada.options.length = 0;addItem(campo1,'','',false,campo1.length);for (i=0;i<maximo1;i++){  addItem(campo1,local1[i][1],local1[i][0],false,campo1.length);}}function carrega(){var url;url = 'remote2.asp?coligada='+document.Cadastro.coligada[document.Cadastro.coligada.selectedIndex].value;document.Cadastro.material_recebendo.value.length = 0;addItem(document.Cadastro.material_recebendo,"Aguarde...carregando","",false,document.Cadastro.material_recebendo.length)myIframe.location = url;document.Cadastro.material_recebendo.focus()}function inicia1(){local1 = new Array();var maximo1, i, campo1;local1 = myIframe.loc;campo1 = document.Cadastro.material_recebendo;maximo1 = local1.length;document.Cadastro.material_recebendo.value.length = 0;addItem(campo1,'','',false,campo1.length);for (i=0;i<maximo1;i++){  addItem(campo1,local1[i][1],local1[i][0],false,campo1.length);}}function addItem(obj,strText,strValue,blSel,intPos){	 var newOpt,i,ArTemp,selIndex;	 selIndex = (blSel)?intPos:obj.selectedIndex;	 newOpt = new Option(strText,strValue);	 Len = obj.options.length+1	 if (intPos > Len) return	 obj.options.length = Len	 if (intPos != Len) {		  ArTemp = new Array();		  for(i=intPos;i<obj.options.length-1;i++)			   ArTemp[i] = Array(obj.options[i].text,obj.options[i].value);		  for(i=intPos+1;i<Len;i++)			   obj.options[i] = new Option(ArTemp[i-1][0],ArTemp[i-1][1]);	 }	 obj.options[intPos] = newOpt;	 if (selIndex > intPos)		  obj.selectedIndex = selIndex+1;	 else if (selIndex == intPos)  		  obj.selectedIndex = intPos;}</script>

Ai tá carregando as coligadas certinho, mas não ta inserindo o valor no campo "material_recebendo" e agora não ta dando erro algum!

[shumi 0]

Tem que ir testando! Execute a página remote2.asp?coligada=xxx, onde xxx é o valor que tem para ver o que retorna no código da página!

fiz assim:

 

http://www.newstyle1.com/sis/remote2.asp?coligada=Hiper

pra testar

 

ai retornou no html isso:

 

 

 

<script>

loc = new Array(1)

for (i=0; i < 1; i++) {

loc = new Array(25)

for (j=0; j < 25; j++) {

loc[j] = "0"

}

}

 

loc[0][0] = "Material que está recebendo";

loc[0][1] = "Produto que está recebendo";

loc[0][2] = "Uniforme que está recebendo";

loc[0][3] = "Material para treinamento";

loc[0][4] = "Trabalho da parceria";

loc[0][5] = "Trabalho da supervisão";

loc[0][6] = "Trabalho da coordenação";

loc[0][7] = "Material que deverá ser comprado pela parceira";

loc[0][8] = "Seleção e treinamento";

loc[0][9] = "Relatórios";

loc[0][10] = "Envio de Status";

loc[0][11] = "200";

loc[0][12] = "Pelo trabalho";

loc[0][13] = "NF de serviço";

loc[0][14] = "300";

loc[0][15] = "Por dia";

loc[0][16] = "Reembolso";

loc[0][17] = "400";

loc[0][18] = "Por mês";

loc[0][19] = "NF de serviço";

loc[0][20] = "1000";

loc[0][21] = "Por período";

loc[0][22] = "NF de serviço";

loc[0][23] = "Não";

loc[0][24] = ",";

 

parent.inicia();

 

</script>

[shumi 0]

cara ta gigante meu remote2.asp

veja:

 

<%coligada = Request("coligada")set Conexcao = Server.CreateObject("ADODB.Connection")Conexcao.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MaPpath("banco/db_sistema.mdb")SQL = "Select coligada.fantasia,carta_briefing.material_recebendo,carta_briefing.produto_recebendo,carta_briefing.uniforme_recebendo,carta_briefing.material_treinamento,carta_briefing.trabalho_parceria,carta_briefing.trabalho_supervisao,carta_briefing.trabalho_coordenacao,carta_briefing.material_comprado_parceira,carta_briefing.selecao_treinamento,carta_briefing.relatorios,carta_briefing.envio_status,carta_briefing.valor_taxa_parceira,carta_briefing.valor_taxa_parceira_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_parceira,carta_briefing.valor_taxa_supervisao,carta_briefing.valor_taxa_supervisao_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_supervisao,carta_briefing.valor_taxa_coordenacao,carta_briefing.valor_taxa_coordenacao_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_coordenacao,carta_briefing.valor_verba_compra_material,carta_briefing.valor_verba_compra_material_pelo_o_q,carta_briefing.documento_para_compra_de_material,carta_briefing.fotos,carta_briefing.mais_informacao From coligada,carta_briefing where coligada.fantasia='"&coligada&"' GROUP BY coligada.fantasia,carta_briefing.material_recebendo,carta_briefing.produto_recebendo,carta_briefing.uniforme_recebendo,carta_briefing.material_treinamento,carta_briefing.trabalho_parceria,carta_briefing.trabalho_supervisao,carta_briefing.trabalho_coordenacao,carta_briefing.material_comprado_parceira,carta_briefing.selecao_treinamento,carta_briefing.relatorios,carta_briefing.envio_status,carta_briefing.valor_taxa_parceira,carta_briefing.valor_taxa_parceira_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_parceira,carta_briefing.valor_taxa_supervisao,carta_briefing.valor_taxa_supervisao_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_supervisao,carta_briefing.valor_taxa_coordenacao,carta_briefing.valor_taxa_coordenacao_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_coordenacao,carta_briefing.valor_verba_compra_material,carta_briefing.valor_verba_compra_material_pelo_o_q,carta_briefing.documento_para_compra_de_material,carta_briefing.fotos,carta_briefing.mais_informacao"set rs = server.CreateObject("ADODB.Recordset")Conexcao.openrs.CursorType = 3rs.Open SQL, Conexcao%>  <script>  loc = new Array(<%=rs.recordcount%>)  for (i=0; i < <%=rs.recordcount%>; i++) {		 loc[i] = new Array(25)				 for (j=0; j < 25; j++) {			 loc[i][j] = "0"		   }   }   <% j = 0	 do while not rs.eof%>loc[<%=j%>][0] = "<%=trim(rs("material_recebendo"))%>";loc[<%=j%>][1] = "<%=trim(rs("produto_recebendo"))%>";loc[<%=j%>][2] = "<%=trim(rs("uniforme_recebendo"))%>";loc[<%=j%>][3] = "<%=trim(rs("material_treinamento"))%>";loc[<%=j%>][4] = "<%=trim(rs("trabalho_parceria"))%>";loc[<%=j%>][5] = "<%=trim(rs("trabalho_supervisao"))%>";loc[<%=j%>][6] = "<%=trim(rs("trabalho_coordenacao"))%>";loc[<%=j%>][7] = "<%=trim(rs("material_comprado_parceira"))%>";loc[<%=j%>][8] = "<%=trim(rs("selecao_treinamento"))%>";loc[<%=j%>][9] = "<%=trim(rs("relatorios"))%>";loc[<%=j%>][10] = "<%=trim(rs("envio_status"))%>";loc[<%=j%>][11] = "<%=trim(rs("valor_taxa_parceira"))%>";loc[<%=j%>][12] = "<%=trim(rs("valor_taxa_parceira_pelo_o_q"))%>";loc[<%=j%>][13] = "<%=trim(rs("documento_para_recebimento_taxa_de_parceira"))%>";loc[<%=j%>][14] = "<%=trim(rs("valor_taxa_supervisao"))%>";loc[<%=j%>][15] = "<%=trim(rs("valor_taxa_supervisao_pelo_o_q"))%>";loc[<%=j%>][16] = "<%=trim(rs("documento_para_recebimento_taxa_de_supervisao"))%>";loc[<%=j%>][17] = "<%=trim(rs("valor_taxa_coordenacao"))%>";loc[<%=j%>][18] = "<%=trim(rs("valor_taxa_coordenacao_pelo_o_q"))%>";loc[<%=j%>][19] = "<%=trim(rs("documento_para_recebimento_taxa_de_coordenacao"))%>";loc[<%=j%>][20] = "<%=trim(rs("valor_verba_compra_material"))%>";loc[<%=j%>][21] = "<%=trim(rs("valor_verba_compra_material_pelo_o_q"))%>";loc[<%=j%>][22] = "<%=trim(rs("documento_para_compra_de_material"))%>";loc[<%=j%>][23] = "<%=trim(rs("fotos"))%>";loc[<%=j%>][24] = "<%=trim(rs("mais_informacao"))%>";	  <%	  rs.movenext	  j  = j  + 1	 loop   rs.close  set rs = nothing   Conexcao.close   set Conexcao = nothing %>   parent.inicia();       </script>

[shumi 0]

Adriano vou te mandar uma MP com o login e senha do meu sistema pra você dar uma olhada o que esta acontecendo quase consegui.

[shumi 0]

Grande Adriano.

Dei uma olhada naquele link que você me passou e tentai adaptar veja:

 

Ajax.js

//-----------------------------------------------------------------------------// Define some constants.//-----------------------------------------------------------------------------// Define a list of Microsoft XML HTTP ProgIDs.var XMLHTTPREQUEST_MS_PROGIDS = new Array(	"Msxml2.XMLHTTP.7.0",	"Msxml2.XMLHTTP.6.0",	"Msxml2.XMLHTTP.5.0",	"Msxml2.XMLHTTP.4.0",	"MSXML2.XMLHTTP.3.0",	"MSXML2.XMLHTTP",	"Microsoft.XMLHTTP");// Define ready state constants.var XMLHTTPREQUEST_READY_STATE_UNINITIALIZED = 0;var XMLHTTPREQUEST_READY_STATE_LOADING	   = 1;var XMLHTTPREQUEST_READY_STATE_LOADED		= 2;var XMLHTTPREQUEST_READY_STATE_INTERACTIVE   = 3;var XMLHTTPREQUEST_READY_STATE_COMPLETED	 = 4;//-----------------------------------------------------------------------------// Returns an XMLHttpRequest object.//-----------------------------------------------------------------------------function getXMLHttpRequest(){	var httpRequest = null;	// Create the appropriate HttpRequest object for the browser.	if (window.XMLHttpRequest != null)		httpRequest = new window.XMLHttpRequest();	else if (window.ActiveXObject != null)	{		// Must be IE, find the right ActiveXObject.		var success = false;		for (var i = 0; i < XMLHTTPREQUEST_MS_PROGIDS.length && !success; i++)		{			try			{				httpRequest = new ActiveXObject(XMLHTTPREQUEST_MS_PROGIDS[i]);				success = true;			}			catch (ex)			{}		}	}	// Display an error if we couldn't create one.	if (httpRequest == null)		alert("Error in HttpRequest():\n\nCannot create an XMLHttpRequest object.");	// Return it.	return httpRequest;}//-----------------------------------------------------------------------------// This code uses an XMLHttpRequest object to look up the city and state of the// ZIP code entered by the user. That data is then used to populate the// corresponding form fields.//-----------------------------------------------------------------------------var cityStateLookup = getXMLHttpRequest();function ProcurarCompativel(event){	// Clear the status text.	//setStatusText("");	// Check for a zip code.	var Codigo = document.getElementById("coligada").value;	// Perform an asynchronous request to get the matching city and state.	var url = "pesquisabanco.asp?coligada=" + Codigo;	cityStateLookup.onreadystatechange = cityStateReadyStateChange;	cityStateLookup.open("GET", url, true);	cityStateLookup.send(null);}function cityStateReadyStateChange(){	//var statusText;	// Check the ready state.	switch (cityStateLookup.readyState)	{		case XMLHTTPREQUEST_READY_STATE_UNINITIALIZED:			//statusText = "";			break;		case XMLHTTPREQUEST_READY_STATE_LOADING:			//statusText = "Initialzing ZIP Code lookup...";			break;		case XMLHTTPREQUEST_READY_STATE_LOADED:			//statusText = "Sending data...";			break;		case XMLHTTPREQUEST_READY_STATE_INTERACTIVE:			//statusText = "Downloading data...";			break;		case XMLHTTPREQUEST_READY_STATE_COMPLETED:			// Assume no match was found.			//statusText = "ZIP Code not found."			// Fill in the city and state fields, if available.			try			{				var data = cityStateLookup.responseText.split(",");				if (data.length == 24)				{document.getElementById("material_recebendo").value = data[0];document.getElementById("produto_recebendo").value = data[1];document.getElementById("uniforme_recebendo").value = data[2];document.getElementById("material_treinamento").value = data[3];document.getElementById("trabalho_parceria").value = data[4];document.getElementById("trabalho_supervisao").value = data[5];document.getElementById("trabalho_coordenacao").value = data[6];document.getElementById("material_comprado_parceira").value = data[7];document.getElementById("selecao_treinamento").value = data[8];document.getElementById("relatorios").value = data[9];document.getElementById("envio_status").value = data[10];document.getElementById("valor_taxa_parceira").value = data[11];document.getElementById("valor_taxa_parceira_pelo_o_q").value = data[12];document.getElementById("documento_para_recebimento_taxa_de_parceira").value = data[13];document.getElementById("valor_taxa_supervisao").value = data[14];document.getElementById("valor_taxa_supervisao_pelo_o_q").value = data[15];document.getElementById("documento_para_recebimento_taxa_de_supervisao").value = data[16];document.getElementById("valor_taxa_coordenacao").value = data[17];document.getElementById("valor_taxa_coordenacao_pelo_o_q").value = data[18];document.getElementById("documento_para_recebimento_taxa_de_coordenacao").value = data[19];document.getElementById("valor_verba_compra_material").value = data[20];document.getElementById("valor_verba_compra_material_pelo_o_q").value = data[21];document.getElementById("documento_para_compra_de_material").value = data[22];document.getElementById("fotos").value = data[23];document.getElementById("mais_informacao").value = data[24];//statusText = "ZIP Code found."				}			}			catch (ex)			{}			break;		default:			//statusText = "Unknown error.";			break;	}	// Update the status message.	//setStatusText(statusText);}function setStatusText(text){	// Display the status message.	var el = document.getElementById("statusText");	if (el.firstChild == null)		el.appendChild(document.createTextNode(""));	el.firstChild.nodeValue = text;}

Não dá pra eu postar tudo o imasters não permite.

corta metade

[shumi 0]

Não alterei nada só coloquei os meus dados.

 

vou postar o pesquisabanco.asp

 

<%@ LANGUAGE="VBScript" %><%	'Buffer output.	Response.Buffer = true	'Set response Content-type header.	Response.ContentType = "text/plain"	set Conexcao = Server.CreateObject("ADODB.Connection")Conexcao.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MaPpath("banco/db_sistema.mdb")SQL = "Select coligada.fantasia,carta_briefing.material_recebendo,carta_briefing.produto_recebendo,carta_briefing.uniforme_recebendo,carta_briefing.material_treinamento,carta_briefing.trabalho_parceria,carta_briefing.trabalho_supervisao,carta_briefing.trabalho_coordenacao,carta_briefing.material_comprado_parceira,carta_briefing.selecao_treinamento,carta_briefing.relatorios,carta_briefing.envio_status,carta_briefing.valor_taxa_parceira,carta_briefing.valor_taxa_parceira_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_parceira,carta_briefing.valor_taxa_supervisao,carta_briefing.valor_taxa_supervisao_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_supervisao,carta_briefing.valor_taxa_coordenacao,carta_briefing.valor_taxa_coordenacao_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_coordenacao,carta_briefing.valor_verba_compra_material,carta_briefing.valor_verba_compra_material_pelo_o_q,carta_briefing.documento_para_compra_de_material,carta_briefing.fotos,carta_briefing.mais_informacao From coligada,carta_briefing where coligada.fantasia='"&coligada&"' GROUP BY coligada.fantasia,carta_briefing.material_recebendo,carta_briefing.produto_recebendo,carta_briefing.uniforme_recebendo,carta_briefing.material_treinamento,carta_briefing.trabalho_parceria,carta_briefing.trabalho_supervisao,carta_briefing.trabalho_coordenacao,carta_briefing.material_comprado_parceira,carta_briefing.selecao_treinamento,carta_briefing.relatorios,carta_briefing.envio_status,carta_briefing.valor_taxa_parceira,carta_briefing.valor_taxa_parceira_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_parceira,carta_briefing.valor_taxa_supervisao,carta_briefing.valor_taxa_supervisao_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_supervisao,carta_briefing.valor_taxa_coordenacao,carta_briefing.valor_taxa_coordenacao_pelo_o_q,carta_briefing.documento_para_recebimento_taxa_de_coordenacao,carta_briefing.valor_verba_compra_material,carta_briefing.valor_verba_compra_material_pelo_o_q,carta_briefing.documento_para_compra_de_material,carta_briefing.fotos,carta_briefing.mais_informacao"set rs = server.CreateObject("ADODB.Recordset")	Rs.CursorLocation = 3	Rs.Open auxsql, DB%>

[shumi 0]

fiz o que você falou veja:

 

http://www.newstyle1.com/sis/ajax/form.asp

[shumi 0]

Bom dia Adriano.você deu uma olhada naquele endereço?é assim mesmo que funciona?Abraços