8. Februar 2011 16:09
IF Trittspur <> '' THEN BEGIN
  Pos := STRPOS(Trittspur,'.');
  FileEnding := COPYSTR(Trittspur,Pos);
    OSCHeader.SETRANGE("No.","No.");
      IF OSCHeader.FINDLAST THEN BEGIN
        FilePathNew := '\\192.168.X.X\Test\';
        FileNameNew := 'TS' + '-' + OSCHeader."Customer Name" + '-' + "No." + FileEnding;
          IF FILE.COPY(Trittspur,FilePathNew + FileNameNew) THEN
            MESSAGE('kopiert')
          ELSE
            MESSAGE('Nope');
      END;
END;
 
			
				8. Februar 2011 16:17
8. Februar 2011 16:18
8. Februar 2011 16:23
 
			
		8. Februar 2011 16:30

8. Februar 2011 16:38
Kowa hat geschrieben:Fürs komfortables Kopieren und vieles andere mehr bietet sich das Windows FileSystemObject an. Das kann in NAV als Automation Server genutzt werden.
 
			
		8. Februar 2011 18:05
 . Da muss man es nachinstallieren.
 . Da muss man es nachinstallieren.
			9. Februar 2011 08:55
CopyTest.CopyFile(Trittspur,FilePathNew + FileNameNew);
