Support 805.461.7300
Sales
Our Technology. Your Success.

Compress and move all Mail.DAT files from the Presort folder

NOTE: You can change the "Move to" path that is currently set to the C:\

SET OLEOBJECT ON

com_FileName=FORCEEXT(JUSTFNAME(FILETOSTR("Cleanup.ini")),"")
com_PresortPath=ADDBS(JUSTPATH(DBF("_azqualification")))

oZipObject=CREATEOBJECT("dzactxctrl.dzactxctrl.1")
oZipObject.ItemList=["]+com_PresortPath+[Maildat.*]+["]
wait window oZipObject.ItemList
oZipObject.ZIPFile="C:\"+com_FileName+"_POSTALONE.zip"
oZipObject.ActionDZ = 4

« Back to Commands

Thanks very much for your help. As always, you guys have the best tech support I have ever run into.
S.S., Allegheny, PA