Bonjour
je n'arrive pas à faire une copie d'un fichier pour le mettre dans le dossier que l'utilisateur a sélectionner, après plusieurs essais rien ne fais.
Je suis sous Win 7 64bits.
voici mon code :
mais cela ne fais rien, j'ai essayé ceci :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 'copie du fichier nécessaire au fonctionnement du plugins TWAIN. ( scanner ) Dim source As String = "./DLL/" 'dossier source ou ce trouve le fichier a copier Dim destination As String = FolderBrowserDialog1.ShowDialog() = DialogResult.OK 'dossier choisi par l'utilisateur If Windows.Forms.DialogResult.OK = Windows.Forms.DialogResult.Cancel Then My.Computer.FileSystem.CopyDirectory(source, FolderBrowserDialog1.SelectedPath, True) End If
et cela me donne une erreur " Exception de HRESULT : 0x800A0005 (CTL_E_ILLEGALFUNCTIONCALL)"
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Dim oFSO = CreateObject("Scripting.FileSystemObject") oFSO.CopyFile("./DLL/", "c:/01/", True)
Merci pour l'aide,
Cordialement
Partager