Jump to content


This is a ready-only archive of the InstallSite Forum. You cannot post any new content here. / Dies ist ein Archiv des InstallSite Forums. Hier können keine neuen Beiträge veröffentlicht werden.
Photo

CopyFile ()


5 replies to this topic

JochenH

JochenH
  • Members
  • 28 posts

Posted 08 April 2003 - 15:00

Hallo,

ich versuche eine Datei von Festplatte auf ein anderes Verzeichnis zu kopieren (mit CopyFile).

Der Returnwert ist OK, das neue File wird auch angelegt, aber es hat immer die Größe 0 !?!

Was mach ich da falsch ?

Wenn ich vorher die Filegröße der Sourcedatei abfrage, dann zeigt sie die reguläre Größe an.


Jochen.
Gruß,
Jochen

Perotin

Perotin
  • Full Members
  • 407 posts

Posted 08 April 2003 - 15:38

Hast Du einen Auszug aus dem Script da?
Gruß / regards
Thomas

JochenH

JochenH
  • Members
  • 28 posts

Posted 08 April 2003 - 15:42

Ja,
sieht so aus :

Code Sample

VarSave (SRCTARGETDIR);

   SRCDIR    = "c:\\starrec";
   TARGETDIR = "c:\\tmp";

   szFileName = "xyz.txt";
   szFileName2  = SRCDIR ^ szFileName;

   //nResult = GetFileInfo ( szFileName2 , FILE_SIZE , iTmp , szTmp );

   nResult = CopyFile ( szFileName, szFileName);
   if(nResult != 0) then
       switch(nResult)
         case COPY_ERR_CREATEDIR:    szMsg = "COPY_ERR_CREATEDIR";
         case COPY_ERR_MEMORY:       szMsg = "COPY_ERR_MEMORY";
         case COPY_ERR_NODISKSPACE:  szMsg = "COPY_ERR_NODISKSPACE";
         case COPY_ERR_OPENINPUT:    szMsg = "COPY_ERR_OPENINPUT";
         case COPY_ERR_OPENOUTPUT:   szMsg = "COPY_ERR_OPENOUTPUT";
         case COPY_ERR_TARGETREADONLY: szMsg = "COPY_ERR_TARGETREADONLY";
       endswitch;
       MessageBox(szMsg, SEVERE);
     endif;

     VarRestore (SRCTARGETDIR);


Der Filename xyz.txt existiert natürlich auf den Source-Verzeichnis.

Jochen.
Gruß,
Jochen

Perotin

Perotin
  • Full Members
  • 407 posts

Posted 09 April 2003 - 09:50

Du kopierst also, ohne umzubenennen ...

Hast Du es mal mit
Code
XCopyFile (szSrcFile, szTargetFile, COMP_NORMAL);
versucht?

Hast Du mal CopyFile mit Wildcards versucht (also
Code
CopyFile ("*.txt", "");
, dabei wird der Parameter szTargetFile ignoriert)?

Ansonsten schon fast ein Fall für die X-Files ... :(

Mein Rat wäre erstmal, es mit XCopyFile zu versuchen.
Gruß / regards
Thomas

JochenH

JochenH
  • Members
  • 28 posts

Posted 09 April 2003 - 10:52

Leider hilft da gar nichts ???  :angry:

Sowohl XCopyFiles als auch CopyFiles mit Wildcards oder ohne, führen immer zum selben Ergebnis: alle Dateien, die kopiert werden haben die Größe 0 ?

Jochen.
Gruß,
Jochen

JochenH

JochenH
  • Members
  • 28 posts

Posted 16 April 2003 - 15:31


Es geschehen noch Zeichen und Wunder !!

Es ist zwar wie bei Copperfiled, ohne dass ich was im Skript geändert habe funktioniert's wieder !?! biggrin.gif

Ich hoffe nur, dass das auch so bleibt ! wink.gif
Gruß,
Jochen