relacion de registros

[hebam]

hola. espero que alguien me pueda ayudar, tengo 2 cuadros de texto, campo1 y campo2, en campo 1 estoy utilizando este codigo:

<select name="campo1">
<option value="NA"> </option>
<option value="METROPOLITANA NORTE">METROPOLITANA NORTE</option>
<option value="METROPOLITANA SUR">METROPOLITANA SUR</option>
<option value="SUR">SUR</option>
<option value="OCCIDENTE">OCCIDENTE</option>
<option value="NORESTE">NORESTE</option>
<option value="NOROESTE">NOROESTE</option>
</select>

y campo2 lo estoy relacionando con una tabla a una base de datos, estoy utilizando este codigo:

<%
Set conexion = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.RecordSet")
conexion.OPEN = "driver={SQL Server};server=localhost; UID=jfconvenios; PWD=jfjalsol; database=shopper"
sql="SELECT nombre FROM distritos"
rs.open sql, conexion, 1
if not rs.eof then
%>
select name="campo2">
<option value="na"></option>
<%Do while not rs.eof%>
<option value="<%=rs.Fields("nombre")%>"><%=rs.Fields("nom bre")%>&nbsp;</option>
<%
rs.MoveNext
loop
%>
</select>
<%else%>
<br><br>
<span class="Estilo2">&nbsp;<%=Date%></span>
<%
End If
rs.close
%>
</td>

entonces el problema que tengo es que si yo selecciono una opcion de
campo1 pueda selecionar ciertos registros de la de la tabla en campo2, no se uqe codigo pueda ir para poder relacionarlo.