RE:llenado de combo con una consulta sal
debes hacer la consulta y recorrer el resultado
ejemplo
<%
Set conecc = CreateObject("adodb.connection")
conecc.Open DNS
sql="Select * from comunas"
set com=conecc.execute(sql)%>
<select name="comuna" >
<option value="0">- Seleccione comuna</option>
<% do while not com.eof%>
<option value="<%=com("codigo")%>"><%=com("glosa")%>
</option>
<%com.movenext
loop
com.close
set com=nothing%>
Saludos