<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <style type="text/css"> <!-- .style1 { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 12px; font-weight: bold; } --> </style> </head> <body> <% Dim DB set DB = Server.CreateObject("ADODB.Connection") DB.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("..\db\balada.mdb") DB.mode = adModeRead DB.open Set rso = DB.Execute("SELECT DISTINCT Cidade FROM estabelecimentos WHERE cidade ORDER BY cidade ASC") %> <form name="form1" method="post" action=""> <p><span class="style1">Cidade:</span><br> <select name="cidade"> <%while not rso.eof%> <option><%=Response.Write(rso.fields("cidade"))%></option> <%rso.movenext%> <%wend%> <%rso.Close%> <%set rso = nothing%> </select> <br> <span class="style1">Estabelecimento: </span><br> <select name="select"> <% Set rs = DB.Execute("SELECT estabelecimento FROM estabelecimentos WHERE estabelecimento ORDER BY estabelecimento ASC") %> <%while not rs.eof%> <option><%=Response.Write(rs.fields("estabelecimento"))%></option> <%rs.movenext%> <%wend%> <%rs.Close%> <%set rs = nothing%> <%SET DB = NOTHING%> </select> </body> </html>
O primeiro select seleciona as diferentes cidades, eu queria que o segundo select só mostrasse os estabelecimentos referente a cidade, como faço isso?
Abraços !!!!