Access - FS.MOVEFILE PERMISO DENEGADO

   
Vista:
Imágen de perfil de VICENTE

FS.MOVEFILE PERMISO DENEGADO

Publicado por VICENTE (32 intervenciones) el 19/02/2015 17:15:50
Hola Compañeros, tengo un problema que me está bloqueando todo el día, a ver si alguien me puede echar una mano

Creo una Función para mover archivos de una carpeta a otra y renonbrarlos:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Function MoverPEDIDOCOMPRA01()
    Dim fs As Object
    Dim FileSystemObject As Object
 
'PASAMOS EL ARCHIVO PEDIDOCOMPRA01 A CARPETA BACKUP CAMBIANDO SU NOMBRE
    AA = Application.CurrentProject.Path & "\Input\"
    BB = Dir(AA & "PEDIDOCOMPRA*.TXT")
    CC = AA & BB
    dd = Format(Now(), "YYYYMMDDHHMM")
    FF = AA & "Backup\" & "COMPRA" & dd & ".txt"
 
    If BB = "" Then
        MsgBox "No existen archivos LECTURAS en Carpeta Input"
    Else
        Set fs = CreateObject("Scripting.FileSystemObject")
        fs.movefile AA & BB, FF
    End If
 
End Function

El PROBLEMA, es que cuando ejecuto la función directamente (F8), va a la perfección, pero cuando llamo a la función desde un Form a través de su código, me da el error "PERMISO DENEGADO", en la línea de la función :
fs.movefile AA & BB, FF

Espero que alguien tenga alguna idea y me cuente.

Gracias por anticipado

Saludos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
información
Otras secciones de LWP con contenido de Access
- Código fuente de Access
- Cursos de Access
- Temas de Access
- Chat de Access
información
Códigos de Access
- Combos en cascada
- manejos de formatos
- Contar días

FS.MOVEFILE PERMISO DENEGADO

Publicado por MMan (3 intervenciones) el 19/02/2015 17:25:13
el movefile... (en teoria) internamente hace un copy + delete.... pero si el archivo esta siendo utilizado /abierto no lo va a poder borrar

intenta haciendo primero un copy.. y luego un delete

si el codigo logra copiar.. pero no borrar.. entonces es lo que menciono lineas arriba
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de VICENTE

FS.MOVEFILE PERMISO DENEGADO

Publicado por VICENTE (32 intervenciones) el 19/02/2015 20:45:45
Gracias MMan, voy a intentarlo así.

Se trata de un archivo vinculado a una tabla de mi BD y puede ser que ocurra esto, aunque antes de ejecutar la función que comentaba, hago um DoCmd.Close.

Lo que me extraña es que ejecutando la función directamente me funciona perfecto, aunque tenga abierto el Form y la BD.

Voy a intentar esto que me comentas
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar