Visual Basic - Dao y Access

Life is soft - evento anual de software empresarial
 
Vista:

Dao y Access

Publicado por Tk421 (1 intervención) el 05/03/2002 06:11:27
Hola,

Estoy intentando escribir 162 registros en una BBDD de access usando ado. Pero, cuando me llega al registro numero 16, Error: "-2147217887 Multiple-step operation generated errores. Check status value"

Si intento grabar menos de 16 datos, fantaastico, pero si intento grabar mas, se va todo a la kk

Os dejo el bucle que uso para guardarlo

cont = 0
res = 1
Call Panel(1, "Guardando nuevos datos...")
Do While cont < contMAX
Call Panel(2, "Nuevo dato numero: " & cont)'Envia msg a la barra
'de estado
Adodc1.Refresh
Adodc1.Recordset.AddNew

Text1(0).Text = Nuevo(cont).empresa
Text1(1).Text = Nuevo(cont).nombre
Text1(2).Text = Nuevo(cont).apellido
Text1(3).Text = Nuevo(cont).departamento
Text1(4).Text = Nuevo(cont).email
Text1(5).Text = Nuevo(cont).telefono
Text1(6).Text = Nuevo(cont).fax
Text1(7).Text = Nuevo(cont).direccion
Text1(8).Text = Nuevo(cont).cp
Text1(9).Text = Nuevo(cont).provincia
Text1(10).Text = Nuevo(cont).nick
Text1(11).Text = Nuevo(cont).fecha
Text1(12).Text = Nuevo(cont).comentario


'Adodc1.Recordset.Update '\_He stado haciendo
Adodc1.Recordset.UpdateBatch adAffectCurrent '/ pruebas ...
Adodc1.Recordset.Requery
Adodc1.Recordset.MoveLast
DoEvents

cont = cont + 1
Loop

Gracias gente!!!!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder