FTP y VB
Publicado por Jose Castro (1 intervención) el 28/03/2006 19:47:52
Error -2147417848 (Automation error)
The object invoked has disconnected from its clients. ) in procedure Actualiza of Módulo General
El código que estoy usando es el siguiente:
Dim objScript
On Error GoTo ERR_OpenForEdit
Set objScript = CreateObject("WScript.Shell")
ShellApp = objScript.Run(FileName, 1, True) ‘ En esta linea es donde me da el error
ShellAndWait = True
EXIT_OpenForEdit:
Exit Function
ERR_OpenForEdit:
MsgBox Err.Description
GoTo EXIT_OpenForEdit
Lo curioso es que antes funcionaba perfecto.
Gracias de antemano
The object invoked has disconnected from its clients. ) in procedure Actualiza of Módulo General
El código que estoy usando es el siguiente:
Dim objScript
On Error GoTo ERR_OpenForEdit
Set objScript = CreateObject("WScript.Shell")
ShellApp = objScript.Run(FileName, 1, True) ‘ En esta linea es donde me da el error
ShellAndWait = True
EXIT_OpenForEdit:
Exit Function
ERR_OpenForEdit:
MsgBox Err.Description
GoTo EXIT_OpenForEdit
Lo curioso es que antes funcionaba perfecto.
Gracias de antemano
Valora esta pregunta


0