Selects dependientes en Asp

[tavor]

Gracias El Metallick por responder, no se si tu leiste el articulo de los selects dependientes del taller de asp?, si no es asi entonces te aclaro mi problema: tengo una base en access la cual tiene dos tablas pais y provincia, en una pagina asp despliego un combo con los paises y dependiendo del pais que escoja se refresca la pagina y me despliega en otro combo las provincias de ese pais. El código de esa pagina lo probe de el articulo que te comento. Funciona muy bien, el problema radica en que le aumente a mi base nombres de paises y sus respectivas provincias entre ellos paises compuestos por dos palabras como te ponia en el ejemplo: Republica Dominicana. Al escoger ese pais si me despliega las provincias asociadas al mismo pero en el combo de paises me despliega el primero de la lista y no Republica Dominicana es como si no lo encontrara en el combo.
Aqui te envio el codigo de la pagina para que lo veas:

<form name=formulario>
PAÍS: <select name=idPais onChange="location.href('selects_dependientes.asp? idPais=' + formulario.idPais.options[formulario.idPais.selectedIndex].value)">
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("ssdd.mdb"))

SQL_pais="select * from paises order by pais asc"
set RS_pais=createobject("ADODB.Recordset")
RS_pais.open SQL_pais,conn
do while not RS_pais.eof
pais = RS_pais("pais")
idPais = RS_pais("idPais")
p = request.querystring("pais")
if p <> "" then

if p = pais then
response.write "<option value="&idPais&"&pais="&pais&" selected>"&pais&"</option>"
elseif p <> pais then
response.write "<option value="&idPais&"&pais="&pais&">"&pais&"</option>"
end if
else
response.write "<option value="&idPais&"&pais="&pais&">"&pais&"</option>"
end if

RS_pais.movenext
loop
RS_pais.close
%>
</select>
<%
if request.querystring("idPais") <> "" then %>
PROVINCIA: <select name=ubicacion>
<%
SQL_prov="select * from provincias where pais="&request.querystring("idPais")&" order by provincia asc"
set RS_prov=createobject("ADODB.Recordset")
RS_prov.open SQL_prov,conn
do while not RS_prov.eof

pais = request.querystring("pais")
provincia = RS_prov("provincia")
%>
<option value="<%=provincia%>, <%=pais%>"><%=provincia%></option>
<%
RS_prov.movenext
loop
RS_prov.close
%>
</select><% end if %></form>
Gracias Nuevamente