Ver Mensaje Individual
  #2 (permalink)  
Antiguo 05/10/2005, 15:18
Avatar de David
David
Moderador
 
Fecha de Ingreso: abril-2005
Ubicación: In this planet
Mensajes: 15.720
Antigüedad: 19 años
Puntos: 839
De acuerdo

Cita:
Iniciado por Mplus
Hola amigos,

Tengo este codigo:

Set fs = CreateObject("Scripting.FileSystemObject")
If fs.FolderExists(App.Path & "\fotos_pujades\" & carpeta) = False Then
fs.CreateFolder (App.Path & "\fotos_pujades\" & carpeta)
End If
fs.CopyFile App.Path & "\fotos\" & foto, App.Path & "\fotos_pujades\" & carpeta
Set fs = Nothing

Tengo control total sobre las dos carpetas, la de origen y la que creo dinamicamente hereda los permisos de la carpeta padre.
Pero me da un error de permiso denegado al intentar copiar
Tal vez si reemplazas el FileSystemObject por los comandos comunes de Visual Basic como Dir, MkDir y FileCopy....
__________________
Por favor, antes de preguntar, revisa la Guía para realizar preguntas.