Dataportfehlermeldung zeig einen falschen Dateinamen

Hallo,

wir haben folgenden Programmcode um Textdateien per Dataport zu importieren:

Code:

CLEAR(counter);
txtPath := CompanySetup."path for import";
recdir.RESET;
recdir.SETRANGE(Path,txtPath);
recdir.SETRANGE("Is a file",TRUE);
IF recdir.FIND('-') THEN
BEGIN
  SteeringDialog(1,2,FORMAT(recdir.COUNT));
  REPEAT
    counter := counter + 1;
    SteeringDialog(1,1,FORMAT(counter));

    CLEAR(DP);
    pfad_Datei := txtPath + recdir.Name;
    SteeringDialog(1,3,pfad_Datei);   
    DP.FILENAME := pfad_Datei;
    DP.RUNMODAL;
  UNTIL recdir.NEXT=0;
END;

Nach dem ausführen kommt die folgende Fehlermeldung:

---------------------------
Microsoft Dynamics NAV
---------------------------
Das Betriebssystem findet den Pfad nicht, den Sie für die Datei 'c:\temp\importfile4711.txt' eingegeben haben.

Prüfen Sie bitte das aktuelle Laufwerk und Verzeichnis und prüfen Sie auch die Schreibweise des Pfadnamens.

---------------------------
OK
---------------------------

Bei der Zuweisung DP.FILENAME := pfad_Datei; war aber der Dateinamen 'c:\Import\importfile4711.txt'

Habt ihr eine Idee warum er hier einen falschen Dateinamen angibt.

Im Dataport selber gibt es keine Zuweisung eines Dateinamens.

Kennt jemand von euch den Grund dafür?

Gruß

Michael

Hallo,

wenn "recdir" die File-Table ist, dann musst du vor jedem Durchlauf auf ein anderes Verzeichnis filtern und dann wieder zurück

erst auf z.B. 'C.\temp\' und FIND und dann dein Verzeichnis und FIND, und das jedes mal.

Gruß Fiddi

Hallo Fiddi,

vielen Dank für deine Antwort. Ja, das ist eine File-Tabelle. Wenn ich aber mit dem Debugger mir anschauen, welche Datei an den Dataport übergeben wird, dann ist sie korrekt. Trotzdem kommt diese Fehlermeldung.

Gruß

Michael