18.09.2011, 10:56 | #23 |
Участник
|
Цитата:
Сообщение от zma
//Name DataType Subtype Length
//InFiles Record File //IntegrationSetup."Inbound Document Folder" - какой-то установленный folder CLEAR(InFiles); InFiles.RESET; InFiles.SETFILTER(Path,IntegrationSetup."Inbound Document Folder"); InFiles.SETRANGE("Is a file",TRUE); IF InFiles.FIND('-') THEN REPEAT ImpFileName := InFiles.Path+'\'+InFiles.Name; CLEARLASTERROR; ........ UNTIL InFiles.NEXT = 0; |
|