Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

luiz_csilva

Tres List/Menu

Por , em ASP Clássico

Recommended Posts

luiz_csilva    0

luiz_csilva
Postado

Bom galera,

venho aqui para pedir a ajuda de vcs pois estou tendo problema com o list/menu, o que acontece é que quando é selecionado o 1ª list menu, não acontece nada no segundo e no terceiro. o que eu estou fazendo de errado?????????

 

segue abaixo meu código.....

 

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Administrador</title>
</head>

<body>
<div align="center">Olá,
  <% response.Write session("nome_comp")%>
. 
</div>
<p align="center">Seja bem vindo </p>
<p align="center">Selecione Abaixo Seu Loteamento, Quadra e Lote </p>
<form id="form1" name="form1" method="post" action="extrato_lote.asp">
  <div align="center">
<%
comprador = session("usr_log_ok")
set DB = Server.CreateObject("ADODB.Connection")
DB.open= "DBQ=C:\Inetpub\wwwroot\independencia\clientes\dados\Polaris.mdb;Driver={Microsoft Access Driver (*.mdb)}"
SQL = "Select * from LOTE where COMPRADOR = '"&comprador&"' "
set rs = DB.Execute(SQL)

%>
 
<select name="LOTEAMENTO" size="1" id="LOTEAMENTO">   
<option selected="selected">LOTEAMENTO</option>
<% while not rs.eof%>
<option value="<%=rs("LOTEAMENTO")%>">	   
				<%=rs("LOTEAMENTO")%> </option>
				<% rs.movenext
				wend
				%>	  
	</select>
<select name="QUADRA" size="1" id="QUADRA" >
<option selected="selected">QUADRA</option>
<% while not rs.eof%>
<option value="<%=rs("QUADRA")%>">	   
		   	 <%=rs("LOTEAMENTO")%>			 </option>	  
			<% 
			rs.movenext
			wend
			%>	
	</select>		
<select name="LOTE" id="LOTE">
<option selected="selected">LOTE</option>
<% while not rs.eof%>
<option value="<%=rs("LOTE")%>">	   
				 <%=rs("QUADRA")%> </option>	  
	   			<% 
				rs.movenext
				wend
				%>
</select>
		 
<%
rs.close
set conexao = nothing
%>
  </div>
  <label>
  <div align="center">
	<input name="Extrato" type="submit" id="Extrato" value="Ver Extrato" />
  </div>
  </label>
</form>
<p align="center">
</body>
</html>

Se puderem me ajudar eu ficarei muito grato...... pois estou quebrando a cabeça já faz um bom tempo....

Compartilhar este post

Link para o post
Compartilhar em outros sites

Ted k'    126

Ted k'
Postado

você não está fazendo nada de errado, simplesmente o código está certo e tbm você está com 3 recordsets iguais tem que ser diferente, você não colocou uma ação para popular os outros combos, você faz isso usando query que fica dando refresh na tela ou usando ajax,

Compartilhar este post

Link para o post
Compartilhar em outros sites

luiz_csilva    0

luiz_csilva
Postado

você não está fazendo nada de errado, simplesmente o código está certo e tbm você está com 3 recordsets iguais tem que ser diferente, você não colocou uma ação para popular os outros combos, você faz isso usando query que fica dando refresh na tela ou usando ajax,

Caro Ted K, e como eu faria essa query dando refresh para popular as outras tres combos??????

na minha instrução SQL eu colocaria assim:

 

SQL = Select * from lote where COMPRADOR = '"&comprador&"'

set rs = DB.Execute (SQL)

Set rs1 = DB.Excute (SQL)

Set rs2 = DB.execute (SQL)

 

seria +/- isso que eu teria que fazer???? e nas list box eu mencionar cada rs individualmente????

 

 

Grato pela ajuda...

 

Luiz

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito