Ejecuta comando solo con la pausa...

Hola tengo un problema con una linea de mi aplicación que cuando la ejecuto paso a paso funciona ok, ¿pero cuándo lo corro directamente no funciona porque pude ser?
Te copio partes del código
****** AQUI DEFINO CONECCION
Set Cn = New ADODB.Connection
BaseDatos = "C:\Restomatic\Base\DATA.mdb"
RUTA = "C:\Restomatic\Base\"
Rclclave = "25458"
Cn.CursorLocation = adUseClient
'Cn.Provider = "MSDataShape.1"
Cn.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};" _
& "DBQ= " & BaseDatos & ";" _
& "DefaultDir=" & BaseDatos & ";" & "UID=;PWD=" & Rclclave & ";"
Cn.Open
Set Reg1= New ADODB.Recordset
Reg1.Open "SELECT Ordenes.NCTA, Ordenes.Id_Ciente, Sum(Ordenes.PRECIO_VTA) AS Precio, Sum(Ordenes.IGV) AS IIGV, Sum(Ordenes.SERVICIO) AS IServ, Sum(Ordenes.SELECTIVO) AS ISelect, Sum(Ordenes.CostoDirec) AS ICosDir, Ordenes.PORDESC From Ordenes where Ordenes.ANULADA=false and NUM_PEDIDO=" & NPedido & " GROUP BY Ordenes.NCTA, Ordenes.Id_Ciente, Ordenes.PORDESC", Cn.ConnectionString, adOpenDynamic, adLockPessimistic
If Not Reg1.BOF Then
   Do While Not Reg1.EOF
.....
Es en este if que no entra cuando lo corro directamente,  probe colocando antes del select   Cn.CommandTimeout = 0  pero tampoco funciona.....
Que puede ser por favor-...
Gracias,

1 respuesta

Respuesta
1
yo quitaria el if y colocaria el do while :
Do while Not Reg1.EOF and Not Reg1.BOF
Sigo con el mismo problema alguna otra idea...
¿Estas seguro que el recordset si tiene datos?
Coloca un MOveFirst antes de entrar al do While a ver si es eso.
Te explico, este problema lo tengo en un modulo de facturación donde ingreso exactamente el mismo pedido y si lo ejecuto con pausa (trace) funciona pero si lo ejecuto en forma normal no funciona...
No tengo idea de que te pueda estar generando el error

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Tengo un subformulario en el que en un textbox aparece el campo mes en número y me gustaría se mostrase como texto

Como decía en el enunciado tengo un formulario con un subformulario en el que se muestran los datos de la selección del formulario pero cuando en periodicidad marco mensual aparecen los datos correctamente pero no consigo que se muestre el textBox...
2 respuestas

¿Cómo se quita mensaje de OLE?

A menudo excel se bloquea en todos los libros abiertos, luego al desbloquearse unos 3- 5 minutos después aparece el mensaje: "Microsoft Excel esta esperando que otra aplicación complete una acción OLE." ¿Cómo evitar todo esto y que no vuelva a suceder?
1 respuesta

Como crear una condición en un textbox

Debo crear una condición en esta Macro en el TextBox8 ( se ingresa una fecha) ya que en muchas ocasiones no debo ingresar dicha fecha, y si eso sucede no me permite seguir, como lograr para que esto no suceda Private Sub CommandButton2_Click() Dim...
2 respuestas

Ejecutar macro si en la celda B1 hay datos

Esta es la macro que utilizo siempre, pero tengo la dificultad que a veces me olvido de colocar el numero de curso (Ejp. 1era_1era o 2da_2da ...)en la celda B1, todo este proceso se ejecuta en la hoja Activa "Curso", lo que busco que la macro se...
2 respuestas

¿Qué hay de mal en este macro?

Quiero hacer un macro para hacer un filtro de una base de datos poniendo como condición un periodo de tiempo, teniendo una celda como fecha de inicio y otra celda como fecha de terminación. Te mando imagen de mi libro y código. Muchas gracias Sub...
1 respuesta

Need a good construction contractor for a home renovation project?

Interested in the uk area. Building a home will be a great investment and dream of their life for most of the people. It is really important to choose the best building contractor for this work. Choosing the right, trustworthy professional contractor...
7 respuestas

Saber el último precio de cierre de cada uno de los valores que compone una cartera de acciones y reflejarlos en un textBox.

Estoy construyendo un formulario para que se vuelque los datos de aquellos la situación de una cartera compuesta por acciones. Es un formulario único pero al clikear en un botón comando se abre un formulario continuo. La situación en la que estoy...
1 respuesta

Como puedo borrar registros relacionados desde un formulario

Tengo un formulario en donde tengo varios registros relacionados, deseo borrar cualquiera de esos registros pero me dice que no puedo borrar registros relacionados, quisiera saber si hay alguna opción con la que pueda borrar.
2 respuestas

Poner contraseña a una BD de access.

A ver si podéis ayudarme en la siguiente cuestión. Trato de establecer contraseña para la base de datos y no puedo porque aparece un mensaje diciendo que el cifrado de bloques no es compatible con el bloqueo por filas. ¿Cómo puedo arreglar esto?.
2 respuestas

No puedo registrar más de 30k renglones, sale error de desbordamiento (Error 6)

Tengo el siguiente código, que de un formulario pasa los datos a una tabla. El problema es que después de aprox. 35,000 renglones registrados, al querer seguir registrando me aparece el error de desbordamiento (Error 6). Comparto código, si de favor...
3 respuestas