ASP - Pasar parametros desde un combo

lleno un combo desde una BD y luego de seleccionar la opcion(este combo tiene departamentos) tiene que irse a otra pagina, y estoy pasando los parametros con la instruccion :

<a href="shop.asp?depto="&departamento1&">Enviar</a></font><b>

El select tiene el nombre departamento1, pero no me toma en la linea de href, COMO TOMO EL VALOR DEL SELECT PARA PASARLO A OTRA PAGINA POR EL HREF, les envio el codigo:

sub pers_departamento
'CONSULTA PARA OBTENER LOS DATOS
set rs = CreateObject("ADODB.Recordset")
%>
<table border="0" cellpadding="3" width="100%" height="206">
<tr>
<td width="100%" height="130">
<p align="center"><embed width="656" height="128" src="encabezado.swf"></p>
</td>
</tr>
<tr>
<td valign="top" width="75%" height="25">
<p align="center">
<b><font face="Arial" size="2">Departamento : </font></b>
<select size="1" id=departamento name="departamento1">
<option selected>Selecciona un departamento</option>
<%departamento_Sql = "Select distinct dep_cod,dep_nom from departamento"
rs.Open departamento_Sql, oConn
do while not rs.eof
%>
<option value="<%=rs("dep_cod")%>"><%=rs("dep_nom")%></option>
<% rs.movenext
loop
set rs=nothing
oConn.Close
set oCo

Si vas a hacer esto: shop.asp?depto="&departamento1&".... mejor mira qué es lo que envías, pues la concatenación no está muy bien estructurada.

mejor utiliza un javascript, donde envías el dato del "combo" como parámetro de esta forma:

Desde el cliente...
function buscar(dato)
{
var x = dato.value;
document.location = "shop.asp?depto=" + x;
}

Ahora bien, puedes meter un botón submit y desde un request puedes tomar el dato y hacer un response.redirec a la página que necesitas, esta opción sería un script de servidor.