Bonsoir le forum
Sur ce code j'ai une erreur 70 de permission refusée
Sub CopierFichier()
Dim fs
Dim CheminSource As String
Dim CheminDest As String
'Chemins des fichiers à adapter (peu importe le type de fichier)
CheminSource = 'G:\\EPS1\\Suivi Elèves\\Photos\\PHOTO CLASSE2\\4 2\\toto.jpg'
CheminDest = 'G:\\EPS1\\Suivi Elèves\\Photos\\PHOTO CLASSE2\\3 2'
Set fs = CreateObject('Scripting.FileSystemObject')
fs.CopyFile CheminSource, CheminDest
Exit Sub
End Sub
Pourtant le fichier n'est pas protégé en lecture seule?
Merci
Sur ce code j'ai une erreur 70 de permission refusée
Sub CopierFichier()
Dim fs
Dim CheminSource As String
Dim CheminDest As String
'Chemins des fichiers à adapter (peu importe le type de fichier)
CheminSource = 'G:\\EPS1\\Suivi Elèves\\Photos\\PHOTO CLASSE2\\4 2\\toto.jpg'
CheminDest = 'G:\\EPS1\\Suivi Elèves\\Photos\\PHOTO CLASSE2\\3 2'
Set fs = CreateObject('Scripting.FileSystemObject')
fs.CopyFile CheminSource, CheminDest
Exit Sub
End Sub
Pourtant le fichier n'est pas protégé en lecture seule?
Merci