| Pregunta: | 17405 - ERROR DE AUTOMATIZACIóN |
| Autor: | Javier Ogasawara |
| Hice esta pequeña rutina para poder ir cargando los forms seleccionándolo de un combobox (CmbForm).
Compile el programa y lo instalé en varias máquinas. En algunas me funcionó perfectamente, pero en otras cuando ejecuta “Set xForm = Forms.Add(CmbForm.Text)” sale el mensaje que está abajo. Lo curioso es que en la máquina que lo ejecuté, si lo corro desde el VisualBasic el programa corre perfectamente, pero si corro el ejecutable me aparece el mensaje y se cierra el programa. Mi pregunta es : A qué se debe el problema y cómo puedo solucionarlo? --------------------------------------------------------------------------------------------------- Dim xForm As Form lblExiste = False For Each xForm In Forms If xForm.Name = LsvTran.SelectedItem.Key Then xForm.Show lblExiste = True Exit For End If Next xForm If Not lblExiste Then Set xForm = Forms.Add(CmbForm.Text) xForm.Caption = LblDescripcion.Caption xForm.Show End If --------------------------------------------------------------------------------------------------- El mensaje que aparece es el siguiente: Error \\\'-2147417848(80010108) Error de Automatización | |
| Respuesta: | Jose Lara |
| A mi me sucedio lo mismo con algo parecido:
Lo solucione asi: Cada cierto numero(pueder ser 10,20,30,40,etc.) de iteracion debes parar (Tienes que probar cual te funciona, es decir, donde no te da el error) y nuevamente vuelves a llamar a la rutina. No se porque pasa, pero parece, que llega un momento donde la automatizacion se satura y EXPLOTA. Buena suerte, cualquier cosa escribeme | |