我想擺脫DotNet。
是否有任何代碼單元可以用于此代碼(可能在 FileManagement 中):
procedure GetNoOfFilesInFolder(): Integer
var
DirectoryInfo: DotNet DirectoryInfo;
Directory: DotNet Directory;
begin
IF NOT Directory.Exists(pathToFolder) THEN
EXIT(-1);
DirectoryInfo := DirectoryInfo.DirectoryInfo(pathToFolder);
EXIT(DirectoryInfo.GetFiles().Length);
end;
uj5u.com熱心網友回復:
您確實可以File Management為此使用 codeunit,但它只會洗掉直接的 DotNet 依賴項。File Management只是相同 DotNet 程式集的包裝器。
在任何情況下,如果您要使用檔案系統,您target需要OnPrem在app.json.
以下代碼應完成與您的示例相同的操作:
local procedure GetNoOfFilesInFolder(PathToFolder: Text): Integer
var
FileList: Record "Name/Value Buffer" temporary;
FileManagement: Codeunit "File Management";
begin
if not FileManagement.ServerDirectoryExists(PathToFolder) then
exit(-1);
FileManagement.GetServerDirectoryFilesList(FileList, PathToFolder);
exit(FileList.Count);
end;
轉載請註明出處,本文鏈接:https://www.uj5u.com/shujuku/453995.html
