Result = ZIP FILE TO FILE(zipfile$,file$,pw$)

if returns 0 then error has occured, otherwise returns file size


Result = ZIP FILE TO MEMBLOCK(zipfile$,file$,pw$)

if returns 0 then error has occured, otherwise returns memblock ID