ERROR: Pocos parámetros. Se esperaba 1

[omegafunky]

Hola amigos tengo un problema con esta pagina y no hay modo que de con el error, me pueden hechar una mano, saludos

para empezar me marca lo siguiente cuando ingreso algo
HTTP 500.100. Error interno del servidor: error de ASP
Servicios de Internet Information Server


Información técnica (para personal de soporte técnico)
Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][Controlador ODBC Microsoft Access] Pocos parámetros. Se esperaba 1.
/it/p8.asp, línea 17

Tipo de explorador:
Mozilla/5.0 (Windows; U; Windows NT 5.1; es-ES; rv:1.8.1.13) Gecko/20080311 Firefox/2.0.0.13
Página:
POST 39 bytes to /it/p8.aspDatos de POST:
nombre=aa&id_cat_espec=7&boton=Ingresar
Hora:
Martes, 15 de Abril de 2008, 12:45:00 p.m.

Código PHP:

  <%

if request.Form("boton") <> "" then

    Dim conn,db
    Set conn = Server.CreateObject("ADODB.Connection") 
    Set db = Server.CreateObject("ADODB.Recordset") 
    conn.Open "Driver={Microsoft Access Driver (*.mdb)}; " & "Dbq=" & Server.MapPath("base.mdb")
     
        SQL_INS = "INSERT INTO cat_area_cono (nombre, id_cat_espec) VALUES ("&request("nombre")&","&request("id_cat_espec")&")"
        conn.Execute(SQL_INS) ---------------línea 17
    
    
end if
%>
.....
  <!--INICIO INGRESAR TEMA--> 
                <%
                dim rs2, j, rs3
                Set conn = Server.CreateObject("ADODB.Connection")
                conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="& server.mappath("base.mdb")
                
                SQL = "SELECT id_cat_espec, nombre FROM cat_especialidades ORDER BY nombre"
                Set rs2 = conn.Execute(SQL)
                j = 0
                While Not rs2.EOF
                j = j + 1
                %>            
  
  
  <tr>
    <td class="texto_1">
    
    <table width="730" border="0" align="center" cellpadding="0" cellspacing="0" class="borde_sky">
    <form action="" method="post" name="formulario">

        <tr>
          <td colspan="3" align="center" class="titulo_sky"><%=rs2("nombre")%></td>
        </tr>
        <tr class="slim">
          <td>&nbsp;</td>
          <td colspan="2" align="center">&nbsp;</td>
        </tr>
        <tr>
          <td width="10">&nbsp;</td>
          <td colspan="2" align="center"><input name="nombre" type="text" class="texto_1" id="nombre" size="120" />
              <input name="id_cat_espec" type="hidden" id="id_cat_espec" value="<%=rs2("id_cat_espec")%>" />              
              <input name="boton" type="submit" class="texto_2" id="boton" value="Ingresar" /></td>
          </tr>
        
        
        <%
        SQL2 = "SELECT nombre, id_area_cono FROM cat_area_cono WHERE id_cat_espec = "&rs2("id_cat_espec")
        set rs3  = conn.Execute(SQL2)
        While Not rs3.EOF
        %>
        
        <tr class="slim">
          <td>&nbsp;</td>
          <td width="676">&nbsp;</td>
          <td align="center">&nbsp;</td>
        </tr>
        <tr>
          <td>&nbsp;</td>
          <td><%=rs3("nombre")%></td>
          <td width="42" align="center">
          <a href="cat_area_cono_del.asp?id_area_cono=<%=rs3("id_area_cono")%>" title="Eliminar">
          <img src="http://www.forosdelweb.com/images/delete.gif" width="14" height="14" border="0" />
          </a>
          </td>
        </tr>
        <%
        rs3.MoveNext
        Wend
        rs3.Close
        %>
        
        <tr class="slim">
          <td>&nbsp;</td>
          <td>&nbsp;</td>
          <td width="42" align="center">&nbsp;</td>
        </tr>
    </form>
    </table>    </td>
  </tr>
  <tr>
    <td>&nbsp;</td>
  </tr>
  
  
            <%
                rs2.MoveNext
                Wend
                rs2.Close
            %>

 <!--FIN INGRESAR TEMA-->