|
17.09.2011, 21:55 | #1 |
Участник
|
//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; Примерно так, используя NAS,мы импортируем *.xml files. |
|
18.09.2011, 10:56 | #2 |
Участник
|
Цитата:
Сообщение от 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; |
|