Gracias Ramondi por las respuestas.
El formulario por la que ingreso los datos en forma individual es el siguiente:
-----------------------
<form name="RegistroNuevo" method="Post" action="RegisInser02.asp" onSubmit="return val3()">
<table width="100%" height="321" border="1" cellpadding="0" cellspacing="0">
<tr>
<td height="19" colspan="2">
<p align="center"><strong><font face="Tahoma" size="2">TENGA MUCHO CUIDADO AL HACER LOS CAMBIOS, PUEDE ALTERAR LA BASE DE DATOS.<br>
Siga las INSTRUCCIONES al "pie de la letra"</font></strong> </td>
</tr>
<tr bgcolor="#3399FF">
<td width="37%" bgcolor="#3399FF"><div align="right"><strong>Colegiatura<span class="letrasblancas"> (*)</span> </strong></div></td>
<td width="63%"><input name="CQFP" type="text" id="CQFP" size="5" maxlength="5">
<strong>Debe ingresar CINCO dígitos </strong></td>
</tr>
<tr bgcolor="#3399FF">
<td height="25"><div align="right"><strong>Apellido Paterno<span class="letrasblancas"> (*)</span></strong></div></td>
<td height="25"><input name="ApPaterno" type="text" id="ApPaterno">
En MAYÚSCULA </td>
</tr>
<tr bgcolor="#3399FF">
<td height="25"><div align="right"><strong>Apellido Materno<span class="letrasblancas"> (*)</span></strong></div></td>
<td height="25"><input name="ApMaterno" type="text" id="ApMaterno2">
En MAYÚSCULA </td>
</tr>
<tr bgcolor="#3399FF">
<td height="25"><div align="right"><strong>Nombre (s )<span class="letrasblancas">(*)</span></strong></div></td>
<td height="25"><input name="Nombre" type="text" id="Nombre">
En MAYÚSCULA </td>
</tr>
<tr bgcolor="#3399FF">
<td height="25"><div align="right"><strong>Documento de Indentidad <span class="letrasblancas">(*)</span></strong></div></td>
<td height="25"><input name="DNI" type="text" id="DNI2">
Puede ser DIN, Carnét de extranjería, etc </td>
</tr>
<tr bgcolor="#3399FF">
<td height="25"><div align="right"><strong>Departamento <span class="letrasblancas">(*)</span></strong></div></td>
<td height="25"> <select name="DPTO" id="select">
<option selected>Seleccione el Departamento</option>
<option>ANCASH</option>
<option>APURIMAC</option>
<option>AREQUIPA</option>
<option>AYACUCHO</option>
<option>CAJAMARCA</option>
<option>CALLAO - PROVINCIA</option>
<option>CUSCO</option>
<option>HUANCAVELICA</option>
<option>HUÁNUCO</option>
<option>ICA</option>
<option>JUNÍN</option>
<option>LA LIBERTAD</option>
<option>LAMBAYEQUE</option>
<option>LIMA</option>
<option>LORETO</option>
<option>MADRE DE DIOS</option>
<option>MOQUEGUA</option>
<option>PASCO</option>
<option>PIURA</option>
<option>PUNO</option>
<option>SAN MARTÍN</option>
<option>TACNA</option>
<option>TUMBES</option>
<option>UCAYALI</option>
</select> </td>
</tr>
<tr bgcolor="#3399FF">
<td height="25"><div align="right"><strong>Vencimiento de la recarnetización <span class="letrasblancas">(*)</span> </strong></div></td>
<td height="25"><input name="RecarnetVence" type="text" id="RecarnetVence2" size="10" maxlength="10">
Usar el formato: <strong>dd/mm/aaaa</strong> (a veces <strong><strong>dd/mm/aa</strong></strong>)</td>
</tr>
<tr bgcolor="#3399FF">
<td height="25"><div align="right"><strong>Fecha de HABILITACIÓN <span class="letrasblancas">(*)</span> </strong></div></td>
<td height="25"><input name="HabilDesde" type="text" id="HabilDesde" size="10" maxlength="10">
Usar el formato: <strong>dd/mm/aaaa</strong> (a veces <strong><strong>dd/mm/aa</strong></strong>)</td>
</tr>
<tr bgcolor="#3399FF">
<td height="25"><div align="right"><strong>E-mail</strong></div></td>
<td height="25"><input name="Email" type="text" id="Email">
En MINÚSCULA</td>
</tr>
<tr bgcolor="#3399FF">
<td height="25"><div align="right">
<p><strong>Comentarios</strong><br>
</p>
</div></td>
<td height="25"><textarea name="Comentario" cols="50" id="Comentario"></textarea></td>
</tr>
<tr bgcolor="#3399FF">
<td height="25"><span class="letrasblancas"><strong>(*)</strong></span><strong> Campos obligatorios para llenar. </strong></td>
<td height="25"> </td>
</tr>
</table>
<p>
<INPUT name="SUBMIT" TYPE="SUBMIT" value="Ingresar">
<input type="reset" value="Restablecer" name="B2">
</p>
</form>
-----------------------
El código de la página ASP es el siguiente:
-----------------------
<%
Dim Conexion,Tabla
Set Conexion = Server.CreateObject("ADODB.Connection")
Set Tabla = Server.CreateObject("ADODB.Recordset")
Conexion.Open "Driver={Microsoft Access Driver (*.mdb)}; " & "Dbq=" & Server.MapPath("../../db/bdcqfp.mdb")
Dim Temp
Temp="Select * From cqfp Where UCase(CQFP)='" & UCase(Request("CQFP")) & "' And UCase(ApPaterno)='" & UCase(Request("ApPaterno")) & "' And UCase(ApMaterno)='" & UCase(Request("ApMaterno")) & "' And UCase(Nombre)='" & UCase(Request("Nombre")) & "' And UCase(DNI)='" & UCase(Request("DNI")) & "' And UCase(DPTO)='" & UCase(Request("DPTO")) & "' And UCase(RecarnetVence)='" & UCase(Request("RecarnetVence")) & "' And UCase(HabilDesde)='" & UCase(Request("HabilDesde")) & "' And UCase(Email)='" & UCase(Request("Email")) &"' And UCase(Comentario)='" & UCase(Request("Comentario")) &"'"
Tabla.Open Temp,Conexion,2,3,1
If Tabla.BOF And Tabla.EOF Then
Tabla.AddNew
Tabla("CQFP") = Request("CQFP")
Tabla("ApPaterno") = Request("ApPaterno")
Tabla("ApMaterno") = Request("ApMaterno")
Tabla("Nombre") = Request("Nombre")
Tabla("DNI") = Request("DNI")
Tabla("DPTO") = Request("DPTO")
Tabla("RecarnetVence") = Request("RecarnetVence")
Tabla("HabilDesde") = Request("HabilDesde")
Tabla("Email") = Request("Email")
Tabla("Comentario") = Request("Comentario")
Tabla.Update
%>
<body>
<table border="0" cellpadding="0" cellspacing="0" width="640" style="border : 1px solid rgb(0,0,0)">
<tr>
<td bgcolor="#FFFBF0" style="padding-top: 4; padding-bottom: 4; padding-left: 4; padding-right: 4">
<center>
<p>
<table border="0" cellpadding="0" cellspacing="0" width="100%" height="500" bgcolor="#33FFFF" style="border : 1px solid rgb(0,0,0)">
<tr>
<td width="100%" valign="TOP">
<table border="0" cellpadding="3" cellspacing="0" width="100%" bgcolor="silver">
<tr>
<td width="100%" style="border-bottom: 1px solid rgb(128,0,0)"><b><font color="#990000" face="Arial, Helvetica">COLEGIO
QUÍMICO FARMACÉUTICO DEL PERÚ (CQFP)</font></b></td>
</tr>
</table>
<p align="center"><font size="5"><b>Ingreso de datos completado</b></font> </p>
<%
Else
Response.Write "El registro ya existe"
End If
Tabla.Close
Conexion.Close
%>
---------------------------------
Mira, lo que deseo es lo siguiente:
- Ingresar esos datos de 20 en 20 o más.
- Si fuera posible, consolidarlos en un archivo excel o access y agregar a lo que ya existe en mi base de datos.
Estare esperando tu ayuda. Gracias de antemano.