AJAX / asp não funciona

[Ale Gouveia 0]

Oi galera q sempre salva minha patria.. hehehe

Então.. estou fazendo uma agencia...

http://shopsul.tempsite.ws/agencia/default.asp?lang=pt_BR

e preciso fazer um ajax q filtre a marca e o modelo.. usei um que estava na net de estado e cidade.. fiz identicooooo... mas não aparece os modelos...

olha o modelo seleciona cidade:

 

<%
response.Charset="ISO-8859-1"
codigo_categoria = request.querystring("codigo_categoria")
%>

[b]<%=codigo_categoria%>[/b]
<!--#INCLUDE FILE="funcoes/funcoes.asp" -->
<select name="cidades">
<% if codigo_categoria = "" then %>
	<option value="">Selecione um modelo</option>
<% else

 	[b]Call abre_conexao(conexao)
sql_cidade = "select * from Subcategorias WHERE codigo_categoria = "&codigo_categoria&" ORDER BY nome_categoria"
set tab = conexao.execute(sql_cidade)[/b]

	 while not tab.eof %>
%>
		
		<option value="<%=tab("codigo_subcategoria") %>"><%=tab("nome_subcategoria") %></option>

<% tab.movenext
					 wend
	 Call fecha_conexao
	set tab = nothing
			End If
				%>
</select>

Eu acredito q esta parte em negrito que está errada... pq chega certinho o codigo q eu estou assando pq estou escrevendo ele em cima no outro negrito... sou nova em asp.. comoposso solucionar isto?

Desde já agradeço

 

Ale

[hargon 64]

Tópico movido Artigos, Tutoriais e Matérias (ASP) http://forum.imasters.com.br/public/style_emoticons/default/seta.gif ASP

[Ted k' 126]

aqui apareceu, usei o FireFox

[Ale Gouveia 0]

aqui apareceu, usei o FireFox

Agora deu certo.. o que agora não ta funcionando é mandar esses dados sabe? pra filtrar...

[Ale Gouveia 0]

aqui apareceu, usei o FireFox

Agora deu certo.. o que agora não ta funcionando é mandar esses dados sabe? pra filtrar...

 

Até hoje não consegui resolver esse "pepinoooo" qdo dou post a categoria(marca).. q no caso seria cidades não é mandado no form... como posso resolver isso?

 

<form name="busca" method="post" action="produtos.asp" onSubmit="return valida_busca()">
						<input type="hidden" name="lang" value=<%=request("lang")%>>
					   <td width="100%" align="center">
							<table border="0" cellspacing="0" cellpadding="0">
								<tr>
									<td width="10%">Marca:</td>
									<td width="30%">
											<select name="estados" onChange="MandaID(this.value)">
											<option value="">Selecione</option>
											<% while not tab.eof %>
											<option value="<%= tab("codigo_categoria") %>"><%= tab("nome_categoria") %></option>
											<% tab.movenext
												 wend
											%>
											</select>
									</td>
								</tr>
								<tr>
									<td>Modelo:</td>

<td><div id="exibe_cidade"><select><option value="">Selecione uma Marca</option></select></div></td>

</tr>
								<tr>  
						<td colspan="2">
							<table width="100%" border="0" cellspacing="0" cellpadding="0">
								<tr> 
								<%
								
								 Dim Valor(25)
	
								   Valor(1)="0000"   
									Valor(2)="4000"   
									Valor(3)="6000"
									Valor(4)="8000" 	
									Valor(5)="10000"
									Valor(6)="12000" 	
									Valor(7)="14000"
									Valor(8)="15000" 	
									Valor(9)="16000"
									Valor(10)="17000" 	
									Valor(11)="18000"
									
									%>
									<td style="padding-top:2px;padding-bottom:2px;padding-left:10px;padding-right:10px" class="MNlatesquerda">
									Preço de:  
									<SELECT NAME="preco1" class="FORMbox">
									<OPTION SELECTED VALUE="0000">Todos</OPTION>
									<% 
									opcao = request("preco1")
										For I=1 to UBound(Valor)
											If opcao = Valor(i) Then	%>
												<OPTION SELECTED VALUE="<%= Valor(i) %>"><%= Valor(i) %></OPTION>		
											<% Else %>
												<OPTION VALUE="<%= Valor(i) %>"><%= Valor(i) %></OPTION>		
											<% End If
										Next 
									%>
										</SELECT>
									à  
									<SELECT NAME="preco2" class="FORMbox">
									<OPTION SELECTED VALUE="1000000">Todos</OPTION>
									<% 
										opcao = request("preco2")
										For I=1 to UBound(Valor)
											If opcao = Valor(i) Then	%>
												<OPTION SELECTED VALUE="<%= Valor(i) %>"><%= Valor(i) %></OPTION>		
											<% Else %>
												<OPTION VALUE="<%= Valor(i) %>"><%= Valor(i) %></OPTION>		
											<% End If
										Next 
									%>
										</SELECT>
									</td>
								</tr>
								<tr>
									<td height="15" colspan="2"></td>
								</tr>
								<tr>
									<td align="center">
									<input name="Submit" type="submit" class="LCNlatesquerda" value="Buscar">
									
									
				</form>

Esse em negrito não chega de modo algum qdo dou o post....

 

olhem o meu seleciona cidade (que na verdade é subcategoria marca)

 

<select name="cidades">
<% if codigo_categoria = "" then %>
	<option value="">Selecione um modelo</option>
<% else
	Call abre_conexao(conexao)
	   
   Set RS_SubAtividades = Server.CreateObject("ADODB.Recordset")
	RS_SubAtividades.CursorLocation = 3
	RS_SubAtividades.CursorType = 0
	RS_SubAtividades.LockType = 1
	RS_SubAtividades.Open "SELECT * FROM Subcategorias WHERE codigo_categoria = "&codigo_categoria&" ORDER BY nome_subcategoria", Conexao
	
	While Not RS_SubAtividades.EOF
%>

		<option value="<%=RS_SubAtividades("codigo_subcategoria")%>">
		<%=RS_SubAtividades("codigo_subcategoria")%> - <%=RS_SubAtividades("nome_subcategoria")%>
		</option>

<% RS_SubAtividades.MoveNext
					Wend 
%>	
	<option value="">Nenhuma</option>
<%
	Call fecha_conexao
	set RS_SubAtividades = nothing

	end if
%>
</select>

o nome dele é cidades... num tinha que chegar lá o <%=request("cidades")%> como chega o estados?

[xanburzum 169]

esta gerando algum erro ?

[Ale Gouveia 0]

esta gerando algum erro ?

Não pq a query funciona sem essa variavel tb... mas mandei escrever ela.. não chega... chegA vazia