<% 'Abrir la base de datos y hacer el SQL SQL="SELECT * FROM zonas WHERE idzona='"&Request.QueryString("zona")&"'" Set Rs= oConn.Execute(SQL) Do While Not Rs.EOF %>

Selecionar la zona le gustaria navegar

<% Rs.MoveNext Loop %>