Error E_FAIL
Publicado por ismael (49 intervenciones) el 17/10/2007 19:50:38
terminando de aclarar la pregunta que hice referente a este error, aqui esta el link de mi pregunta anterior
http://www.lawebdelprogramador.com/news/mostrar_new.php?id=93&texto=Visual+Basic&n1=465931&n2=1&n3=1&n4=1&n5=0&n6=0&n7=0&n8=0&n9=0&n0=0
ese es el problema no lo lleva al ultimo, no existe un ultimo registro, cuando si existen registro, el codigo original (o sea el optimo) asume que no hay registros cuando hay por lo minimo 100000 registros, se me ocurrio hacer el otro codigo para ver que pasaba y me zampo el error del E_FAIL, ahora tambien lo hice así
Set myset = New ADODB.Recordset
sql = "SELECT * FROM examen;"
myset.Open sql, db, adOpenDynamic, adLockOptimistic
With myset
.MoveNext
.Close
End With
Set myset = Nothing
y como en el registro 30000 me lanza el error del E_FAIL
Borro los registros que son muy viejos!? esa podria ser una solucion !?
http://www.lawebdelprogramador.com/news/mostrar_new.php?id=93&texto=Visual+Basic&n1=465931&n2=1&n3=1&n4=1&n5=0&n6=0&n7=0&n8=0&n9=0&n0=0
ese es el problema no lo lleva al ultimo, no existe un ultimo registro, cuando si existen registro, el codigo original (o sea el optimo) asume que no hay registros cuando hay por lo minimo 100000 registros, se me ocurrio hacer el otro codigo para ver que pasaba y me zampo el error del E_FAIL, ahora tambien lo hice así
Set myset = New ADODB.Recordset
sql = "SELECT * FROM examen;"
myset.Open sql, db, adOpenDynamic, adLockOptimistic
With myset
.MoveNext
.Close
End With
Set myset = Nothing
y como en el registro 30000 me lanza el error del E_FAIL
Borro los registros que son muy viejos!? esa podria ser una solucion !?
Valora esta pregunta
0