Deplacer un repertoire sur un autre disque

Version imprimable

13/06/2006, 05h16
ludolechinois

Deplacer un repertoire sur un autre disque

Bonjour,
Je voudrai deplacer un dossier (repertoire) complet sur un autre lecteur. J'avais pense utiliser movefile, mais il ne deplace que sur le meme lecteur. Y a t-il une fonction qui ferait ca ou avez vous des idees pour cela. Il faudrait aussi si c'est possible que si le deplacement est partiel de pourvoir le refaire a nouveau. Comme le fait l'explorateur windows lorsque l'on deplace un dossier.
13/06/2006, 09h42
pottiez

La fonction CopyFile pourrait peut etre t'interrésser, je ne connait pas ces propriétés exactes (changement de lecteur,...), mais cherche toujours pour voir si ca te va.
13/06/2006, 09h55
damienlann

si tu travailles sous windows tu peux utiliser la commande dos "xcopy" en parametre dans la fonction system.

Code:

system("xcopy RepertoireSource RepertoireDestination quelques-parametres");

des infos sur xcopy : ici

je l'ai deja utilisé pour deplacer un dossier et ca marche bien mais je n'est pas mon code source pour le moment.
regarde deja si ca t'interrese. je ne sais pas si tu peut changer de lecteur.
à mon avis oui.
13/06/2006, 10h05
damienlann

je viens de verifier (avec l'editeur de commandes "cmd"), a priori ca marche d'un lecteur vers un autre. tu m'as peut etre meme pas besoin des parametres supplementaire.
voila donc si t'es sous windows tu peux utiliser cette methode
14/06/2006, 06h09
ludolechinois

J'aurai voulu plus que cela

Citation:

Envoyé par damienlann

je viens de verifier (avec l'editeur de commandes "cmd"), a priori ca marche d'un lecteur vers un autre. tu m'as peut etre meme pas besoin des parametres supplementaire.
voila donc si t'es sous windows tu peux utiliser cette methode

Merci pour ton aide. J'avais deja pense a cela.Mais une fenetre dos qui s'affiche a chaque copy c'est pas tres jolie. Pour le deplacement effectivement je peux copier puis effacer si cela a fonctionne. Mais y a t-il une fonction api de windows qui fait ce deplacement, comme le fait l'exploreur windows. Si quelqu'un
a des idees, je suis prenneur. En tout cas merci a tout ceux qui on repondu.
14/06/2006, 09h39
damienlann

nan plus d'idée...
A mon avis l'explorer windows utilise la fonction copy (mais je suis pas sur a 100%) sauf qu'elle arrive a ne pas ouvrir la fenetre dos.

Sinon tu peux toujours creer un nouveau dossier ou tu le souhaites et copier l'ensemble de tes fichiers. c'est pas top et pas optimisé je sais...
14/06/2006, 09h45
lanonyme

Bonjour,

Une petite piste peut etre :
http://www.developpez.net/forums/showthread.php?t=14175

lanonyme

Salut,
Au pire, il y la fonction
Code:

1 2 HRESULT CopyFolder(LPCIID lpSrcInterface, LPVOID lpSrcFolder, ULONG cbEntryID, LPENTRYID lpEntryID, LPCIID lpInterface, LPVOID lpDestFolder, LPSTR lpszNewFolderName, ULONG ulUIParam, LPMAPIPROGRESS lpProgress, ULONG ulFlags)
issu des APis....surement pas facile a utiliser le premier coup, il y a apparement dans ces paramètres le moyen d'indiquer que le dossier est a déplacer et non a copier...
ULONG ulFlags : FOLDER_MOVE

Bon courage,
@ + ;)

Deplacement de dossier

Bonjour,
J'avais essaye de faire une fonction pour copy les fichiers, puis effacer les dossiers. La copie marche bien, mais les dossiers ne sont pas supprime. Voici mon source. Il y a forcement une erreur mais je ne la vois pas. Quelqu'un a t-il une idee

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
 
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "UnitTestMoveFolder.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
 
TFormXMoveFolder *FormXMoveFolder;
bool QuitterXMoveFolder=false;
char DestFolder[1000];
 
 
//---------------------------------------------------------------------------
__fastcall TFormXMoveFolder::TFormXMoveFolder(TComponent* Owner)
    : TForm(Owner){}
 
void __fastcall TFormXMoveFolder::FormCreate(TObject *Sender)
{
MEMOSCREEN->Clear();
xMoveFolder("c:\\data\\line5","d:\\titi");
}
//---------------------------------------------------------------------------
void __fastcall TFormXMoveFolder::FormCloseQuery(TObject *Sender, bool &CanClose)
{
 QuitterXMoveFolder = true;
}
 
// --------------------------------------------------------------------------
// ----------- XmoFile Deplacements des dossiers              ---------------
// --------------------------------------------------------------------------
 void  __fastcall TFormXMoveFolder::xMoveFolder(char FolderSource[],char FolderDest[])
{
char CurrentDrivePath[1000];
lstrcpy(DestFolder,FolderDest);
if (FolderSource[lstrlen(FolderSource)-1]!='\\') lstrcat(FolderSource,"\\");
if (*(FolderSource+1)!=':')
   {
   DWORD lplength;
   if (!GetCurrentDirectory(lplength,CurrentDrivePath)) lstrcpy(CurrentDrivePath,"c:");
      else
      CurrentDrivePath[2]=NULL;
   lstrcat(CurrentDrivePath,FolderSource);
   lstrcpy(FolderSource,CurrentDrivePath);
   }
//Pointertmp=(FolderSource+2);
Char TMPDestFolder[1000];
lstrcpy(TMPDestFolder,DestFolder);lstrcat(TMPDestFolder,(FolderSource+2));
int length=lstrlen(TMPDestFolder);
for (int i=0; i<length; i++)
     {
      if (TMPDestFolder[i]=='\\')
          {
           lstrcpyn(CurrentDrivePath,TMPDestFolder,(i+1));
           CreateDirectory(CurrentDrivePath,NULL);
          }
     }
 QuitterXMoveFolder=false;
 xScanMoveFolder(FolderSource);
 RmDir(FolderSource);
}
//---------------------------------------------------------------------------
// --------------------------------------------------------------------------
// ----------- Fonction récursive des placements des dossiers ---------------
// --------------------------------------------------------------------------
 void  __fastcall TFormXMoveFolder::xScanMoveFolder(char FolderSource[])
{
 char CopySource[1000];
 char CopyDest[1000];
 char CopyFile[1000];
 lstrcpy(CopySource, FolderSource);
 WIN32_FIND_DATA w32fd;
 char Nom[1000];
 lstrcpy(Nom, CopySource); lstrcat(Nom, "*.*");
 HANDLE h = FindFirstFile(Nom, &w32fd);
 bool res = true;
 if (h!=INVALID_HANDLE_VALUE)
 {
  while (res && !QuitterXMoveFolder)
  {
   if (lstrcmp(w32fd.cFileName, "..") && lstrcmp(w32fd.cFileName, "."))
   {
    if (w32fd.dwFileAttributes&FILE_ATTRIBUTE_DIRECTORY)
    {
     // Traitement des Dossiers
     char N[1000];
     lstrcpy(N, CopySource); lstrcat(N, w32fd.cFileName);
     lstrcpy(CopyDest,DestFolder);lstrcat(CopyDest,(N+2));
     MEMOSCREEN->Lines->Add(AnsiString("creat  ")+  CopyDest);
     MkDir(CopyDest);
     lstrcat(N, "\\");
     xScanMoveFolder(N);
     lstrcpyn(CopyDest,N,(strlen(N)));
     //RemoveDirectory(CopyDest);
     //RmDir("c:\\data\\line5\\FOERSTER\\empty\\2\\25\\lot2"); la sa marche
     AnsiString toto=CopyDest;
     RmDir(toto);                   // Ici ca me marche pas
     RemoveDirectory(toto.c_str());
     MEMOSCREEN->Lines->Add(AnsiString("del")+ CopyDest+AnsiString("del"));
 
    }
    else
    {
    // Traitement des Fichiers
    strcpy(CopyFile, CopySource);
    lstrcat(CopyFile, w32fd.cFileName);
    lstrcpy(CopyDest,DestFolder);lstrcat(CopyDest,(CopyFile+2));
    MEMOSCREEN->Lines->Add(AnsiString("fichsource  ")+ CopyFile);
    MEMOSCREEN->Lines->Add(AnsiString("fichDest  ")+ CopyDest);
    MoveFile(CopyFile,CopyDest);
    }
   }
   res = FindNextFile(h, &w32fd);
   Application->ProcessMessages();
  }
 }
}

Deplacement de dossier SHFileOperation (Merci a Lanomyme

Je suis toujours interesse pourquoi mon prog si dessus ne fonctionne pas.
Mais en fait j'en suis venue a utiliser SHFileOperation qui fonctionne tres bien.
Pour mon appli je creer d'abord les sous repertoire pour les sous repertoire qui ne seront pas deplace. Ceci afin de garder la meme arboresence sur la destination. Ensuite je met dans un queue les dossiers a deplacer et dans un thread j'utilise la fonction SHFileOperation pour vider le tampon plus d'autre petite chose.
En tout Cas merci a tout le monde pour cette aide.
Code:

1 2 3 4 5 6 7 8 9 10 11 SHFILEOPSTRUCT FileOpStr; TMPVarFolder=TamponMoveFolder.front()+ AnsiString("\0"); // Nom du dossier a deplacer ZeroMemory(&FileOpStr,sizeof(FileOpStr)); // Taille Memoire FileOpStr.hwnd=Application->Handle; // Handle sur la fenetre FileOpStr.fFlags=FOF_NOCONFIRMATION | FOF_SILENT; // Repond tjs oui et en mode silencieux FileOpStr.wFunc=FO_MOVE; // Deplacement FileOpStr.pFrom=TMPVarFolder.c_str(); // Depuis Ou TMPVarFolder[1]=Drives; // construit la dest FileOpStr.pTo=TMPVarFolder.c_str(); // Vers Ou if (!SHFileOperation(&FileOpStr)) // Effectue le deplacement TamponMoveFolder.pop();