Error en el metodo NameSpace

¿Nuevo en Apache OpenOffice? ¿No sabe cómo comenzar o dónde hacer su pregunta? ¡Este es el lugar!
Reglas del Foro
Los moderadores podrían mover los temas creados aquí a un foro más apropiado.
Si usted publicó aquí y no encuentra el tema, puede buscar sus mensajes haciendo clic en la opción «Buscar sus mensajes» que se encuentra justo debajo de la cabecera de la página, junto al panel de control de usuario y al acceso a sus mensajes privados.
Responder
rollito2005
Mensajes: 1
Registrado: Dom Mar 28, 2021 7:22 am

Error en el metodo NameSpace

Mensaje por rollito2005 »

Buenas noches amigos,
Tengo un codigo para descomprimir archivos:

Dim origen, destinoo As Variant
Set oAplica = CreateObject("Shell.Application")

origen = "C:\Users\grupo\Dropbox\Limpiezas\CTQUI000O.RAR"
Destino = "\\192.168.8.89\fotos1"
oAplica.Namespace(Destino).CopyHere oAplica.Namespace(origen).items

Fucionaba bien, sin embargo me empieza a mostar el error indicado:
Error en el metodo NameSpace de objeto IShellDispatch6, saben como puedo arreglarlo????

De antemano les agradezco su amable asesoria.
Roger
Sistema operativo de 64 bits, procesador basado en x64
Version Office 2102 (compilacion 13801, 2360
RMG
Mensajes: 3879
Registrado: Mar Nov 17, 2009 6:59 am
Ubicación: Valencia - España

Re: Error en el metodo NameSpace

Mensaje por RMG »

Hola,

No he usado el metodo NameSpace, pero puedes probar con el comando de Basic FileCopy.

FileCopy(origen, Destino)

Saludos
OpenOffice 4.1.15 y LibreOffice 6.2.4.2 en W-10, y LibreOffice 4.1.6.2 en Open Suse 13.1(VirtualBox)
Longi
Mensajes: 804
Registrado: Dom Ene 20, 2013 9:05 pm
Ubicación: Ourense, Galicia, España

Re: Error en el metodo NameSpace

Mensaje por Longi »

Buenas!
Yo estoy utilizando lo siguiente:

Código: Seleccionar todo

Dim Shell : Set Shell = CreateObject("Shell.Application")
Shell.NameSpace(Destino).CopyHere Origen
Pero creo que el caso es diferente, yo lo uso para meter un documento (solo uno) en una carpeta comprimida. Supongo que el tuyo es para meter varios elementos (lo cual también incluiría uno solo).
De momento me parece que me funciona bien en Windows 10, LOo 6.04

Un saludo! ;)
Openoffice 4.1.7, en Windows 10
Libreoffice 6.4.2, en Windows 10
Responder