alguien sabe sobre este error??

[vlah]

Tipo de error:
Microsoft JET Database Engine (0x80040E21)
El campo es demasiado pequeño para aceptar la cantidad de datos que intenta agregar. Intente insertar o pegar menos datos.
/Insertar_Cala2.asp, line 122


Tipo de explorador:
Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0; .NET CLR 1.0.3705)

Página:
POST 1553 bytes to /Insertar_Cala2.asp

Datos de POST:
p1=7&p2=9&final=8&extra=&titulo=&p1=5&p2=6&final=8 &extra=&titulo=&p1=&p2=&final=&extra=&titulo=&p1=& p2=&final=&extra=&titulo=&p1=&p2=&final=&extra=&ti tulo=&p1=&p2=&final=&extra=&titulo=&p1=&p2=&final= . . .


Atemp9="SELECT * FROM tblAlumMateria WHERE tblAlumMateria.IdAlumno='"&id&"'AND tblAlumMateria.Semestre="&cint(I)
Atemp9="SELECT * FROM tblAlumMateria WHERE tblAlumMateria.IdAlumno='"&id&"'AND tblAlumMateria.IdMateria='"&contx&"'AND tblAlumMateria.Semestre="&cint(I)
Atabla9.open Atemp9,Aconexion,2,3,1
while not Atabla9.eof
atabla9("parcial1")=request.form("p1") AQUI MARCA EL ERROR
atabla9("parcial2")=request.form("p2")
atabla9("final")=request.form("final")
atabla9("ExtraOrd")=request.form("extra")
Atabla9("TituloInsuf")=request.form("titulo")
atabla9.Update
Atabla9.movenext
wend
Atabla9.close
next

CREO QUE ES PORQUE ASIGNO TODA LA CADENA A ESE CAMPO, PERO COMO PUEDO SEPARARLO..
ALGUIEN AYUDEME PORFA..

GRACIAS DE ANTEMANO

PERDON TENGO DOS CONSULTAS ARRIBA SOLO ES UNA DE ELLAS..SOLO QUE EH ESTADO HACIENDO VARIAS PRUEBAS PERO SIN RESOLVER EL PROBLEM..

[maestro]

Tienes que cambiar el tipo de dato en la base de datos, probablemente ese campo sea de tipo texto y como maximo amiten 255, aunque por defecto en ACCESS el numero es 50 caracteres, si necesitas mas cambialo por un campo de tipo memo.
No tienes que tocar el codigo solo la base de datos.

[vlah]

pues que crees que no, me pone toda la cadena completa y lo que pretendo es dividir esa cadena, y no ponera completa..ojala y alguien pueda hecharme la mano..

gracias

[maestro]

Si quieres poner solo parte de la cadena:
<%
texto=request.from("texto")
rs("tucampo")=mid(texto,1,50)
' con esto metera en el campo solo los caracteres del 1 al 50
%>