24. Februar 2010 15:51
VerzeichnisL.RESET;
VerzeichnisL.SETRANGE(Path, TEXTBasispfad + parNummer + '\');
//VerzeichnisL.SETRANGE("Is a file", FALSE); nicht notwendig
IF VerzeichnisL.FINDFIRST THEN ;
24. Februar 2010 16:56
CLEAR(FILEREC)
FILEREC.RESET;
FILEREC.SETRANGE("Is File",TRUE);
FILERECT.SETFILTER(Name,'<>%1','blb');
IF FILEREC.FIND('-') THEN BEGIN
...
FILE.ERASE(FILEREC.Path+FILEREC.Name);
END;
24. Februar 2010 17:09
CaddyM hat geschrieben:Wenn das Verzeichnis nun nicht existiert, erhalte ich nach dem FINDFIRST eine Meldung von Navision, dass dieser Pfad nicht gefunden werden kann. So ein Verhalten habe ich bisher noch nie beobachtet, wenn ich per FIND eine Tabelle durchsuche, daher meine Frage: Ist das ein spezieller Fall mit der File Tabelle? Kann ich das irgendwie unterbinden?
Danjo hat geschrieben:Werden die Dateien gefunden, kommen die in ein BLOB und werden anschliessend gelöscht. Beim nächsten durchlauf will er dann aber wieder auf die Dateien zugreifen.
24. Februar 2010 17:22
24. Februar 2010 17:44
25. Februar 2010 12:56
findeOrdner(parNummer : Code[10]) retOrdner : Text[250]
retOrdner := '';
IF ISCLEAR(FileSystem) THEN
CREATE(FileSystem);
IF NOT FileSystem.FolderExists(TEXTBasispfad + parNummer) THEN
FileSystem.CreateFolder(TEXTBasispfad + parNummer);
retOrdner := TEXTBasispfad + parNummer + '\';
CLEAR(FileSystem);
EXIT(retOrdner);