Skip to main content

Notifications

Business Central forum
Suggested answer

Files created post zipping is corrupted

Posted on by 876

Hi,

I am trying to zip multiple files and download it .The files after unzipping is corrupted.

The following is the code

 ZipFileName := 'Documents_' + Format(CurrentDateTime) + '.zip';
                    DataCompression.CreateZipArchive();
                    DocAttment.Reset;
                    CurrPage.SetSelectionFilter(DocAttment);
                    if DocAttment.FindSet() then begin
                        repeat
                            TempBlob.CreateOutStream(DocumentStream);
                            RecRef.GetTable(DocAttment);
                            FldRef := RecRef.Field(DocAttment.FieldNo("No."));
                            FldRef.SetRange(DocAttment."No.");
                            if RecRef.FindFirst() then begin
                                TempBlob.CreateInStream(IStream);
                                FullFileName := DocAttment."File Name" + '.' + DocAttment."File Extension";
                               
                                DataCompression.AddEntry(IStream, FullFileName);
                                //FileManagement.BLOBExport(TempBlob, STRSUBSTNO('SalesOrder_%1.Pdf', Rec."No."), TRUE);
                            end;
                        until DocAttment.Next() = 0;
                        TempBlob.CreateOutStream(DocumentStream);
                        DataCompression.SaveZipArchive(DocumentStream);
                        TempBlob.CreateInStream(IStream);
                        DownloadFromStream(IStream, '', '', '', ZipFileName);
Please suggest
Regards,
Indira
Categories:
  • Suggested answer
    Marco Mels Profile Picture
    Marco Mels on at
    RE: Files created post zipping is corrupted

    Hello,

    We currently do not have dedicated Dev support via the Dynamics 365 Business Central forums, but I wanted to provide you some additional resources to assist. If you need assistance with debugging or coding I would recommend discussing this on one of our communities.

    www.yammer.com/dynamicsnavdev

    dynamicsuser.net/.../developers

    I will open this up to the community in case they have something to add.

    Thanks.

Under review

Thank you for your reply! To ensure a great experience for everyone, your content is awaiting approval by our Community Managers. Please check back later.

Helpful resources

Quick Links

Anton Venter – Community Spotlight

Kudos to our October Community Star of the month!

Announcing Our 2024 Season 2 Super Users!

A new season of Super Users has arrived, and we are so grateful for the daily…

Dynamics 365 Community Newsletter - September 2024

Check out the latest community news

Leaderboard

#1
André Arnaud de Calavon Profile Picture

André Arnaud de Cal... 290,524 Super User 2024 Season 2

#2
Martin Dráb Profile Picture

Martin Dráb 228,493 Most Valuable Professional

#3
nmaenpaa Profile Picture

nmaenpaa 101,148

Leaderboard

Featured topics

Product updates

Dynamics 365 release plans