Compress maildat files into .zip file inside presort folder

Information regarding the mail.dat electronic reports for PostalOne! add-on module for AccuZIP6.

Moderators: Chrissy, Steve, Terry, Donna, Dave, Eric, MartyH, Kristen, Geoff, Vince

Post Reply
User avatar
Eric
Moderator
Posts: 1909
Joined: Tue Sep 19, 2006 3:29 pm
Contact:

Compress maildat files into .zip file inside presort folder

Post by Eric » Wed Aug 11, 2010 8:56 am

The command below can be run manually AFTER you have Presorted a file.

1. Presort any database.
2. Close the Print Presort window
3. Pull down the Edit menu to Command…
4. Run the command below and a Maildat.zip file will be created inside the Presort Folder automatically with all Maildat.* files in it.

Code: Select all

*Instantiate Compression Object
SET OLEOBJECT ON
oZipObject=CREATEOBJECT("dzactxctrl.dzactxctrl.1")

*Get current Presort Folder from Databases INI File
com_PresortFolderPath=GetIniValue(FORCEEXT(DBF(),"ini"),"WORKING DIR")

*What files are going to be compressed
oZipObject.ItemList=["]+com_PresortFolderPath+"Maildat.*"+["]

*Where is the .zip file going to be created
oZipObject.ZIPFile=["]+com_PresortFolderPath+"Maildat.zip"+["]

*Do not include Directory Structure in ZIP file
oZipObject.NoDirectoryNamesFlag=.T.

*Perform compression
oZipObject.ActionDZ = 4
Chat with an AccuZIP6 technician weekdays from 7-4 PST with AccuZIP6 Live Online Support

Post Reply