ayuda con SELECT en asp

[kyu24]

gracias lo he probado y no me fuciona me da error en la linea 81 el "<% End if %>"
pongo el codigo para ver donde esta el error, marco en azul lo que me da error. Gracias

Código:

<!--#include file="bd_combo_box.asp"-->

<title>Buscador</title>

<!--#include file="funciones_ajax_combo_box.asp"-->
 <% call cerrar_bd()
   


   
   
 if request.Form = "" then ' Si es primera vez que entra a la forma.%>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0"  >
<form action="resultado.asp" method="post" name="pelu1">
     <tr>
      <td align="center" valign="middle"  ><div class="TextoEtiquetaForm<%=session("tipo_pagina")%>">
           <div><strong>Comunidad Aut&oacute;noma</strong></div>
       </div></td></tr><tr>
       <td align="center" valign="middle" class="forma" id="fila_3"><div>
         <select name="comunidad" id="select_3"  class="forma"  tabindex="5"  onChange="cargaContenido(4,'pec','H')">
           <option selected value ="" >Comunidad Aut&oacute;noma</option>
           <%	
	      ' Muestra la lista de paises en la B/D
	      call abrir_bd()
	      sql = "select * from datos where comunidad order by comunidad asc" 
	      set rs = cnn.execute(sql)
	      if err.number <> 0 then
             response.redirect "mensaje_soporte.asp?UrlRedireccion="&request.ServerVariables("SCRIPT_NAME")&"?"&request.ServerVariables("QUERY_STRING")&"&error="&Server.Urlencode(dictLanguage.Item(session("idioma")&"_mensaje_soporte_02")&Err.number)	  
          end if
          do while rs.eof = false %>
           <option <% if rs("comunidad") = session("comunidad") then%> selected <% End if%> value="<%=rs("comunidad")%>"> <%=rs("comunidad")%> </option>
           <% rs.movenext 
	      loop
		  rs.close %>
         </select>
       </div></td>
     </tr>
     <tr>
       
      <td align="center" valign="middle" class="etiqueta"><div class="TextoEtiquetaForm<%=session("tipo_pagina")%>">
           <div><strong>Provincia </strong></div>
       </div></td>
    </tr><tr>
       <td align="center" valign="middle" class="forma" id="fila_4"><div>
         <select name="select_4" size="1" class="forma" id="select_4"  tabindex="6" >
           <option value="">Provincia</option>
           <% if session("comunidad") <> "" and session("comunidad") <> 0  then %>
           <option selected value="<%= session("provincia") %>"><%= session("provincia") %></option>
           <% End if %>
         </select>
       </div></td>
     </tr>
     <tr>
       
      <td align="center" valign="middle"><div class="TextoEtiquetaForm<%=session("tipo_pagina")%>">
           <div><strong>Ciudad</strong></div>
       </div></td>
    </tr>
     <tr>
       <td align="center" valign="middle" class="forma" id="fila_5"><div>
         <select name="select_5" size="1" class="forma" id="select_5"  tabindex="7" >
           <option value="">Seleccione la Ciudad</option>
           <% if session("provincia") <> "" and session("provincia") <> 0 then %>
              <option selected value="<%= session("localidad") %>"><%= session("localidad") %></option>
           <% End if %>
           </select>
    

       </div></td>
       
    </tr>
     <tr>
      <td align="center" valign="middle" class="etiqueta"><div class="TextoEtiquetaForm<%=session("tipo_pagina")%>">
           <div><strong>Peluquer&iacute;a </strong></div>
       </div></td></tr>
<tr>       <td align="center" valign="middle" class="forma" id="fila_6"><div>
<select name="select_6" size="1" class="forma" id="select_6"  tabindex="7" >
           <option value="">Peluqueria</option>
           <% if session("localidad") <> "" and session("localidad") <> 0 then %>
              <option selected value="<%= session("nombre") %>"><%= session("nombre") %></option>
          		   <% End if %>
                   </select>
           </div></td></tr>
           <tr> <td align="center" valign="middle"> <input name="Mostrar" type="submit" value="Mostrar" />
           </td></tr></form></table>