Hi,
I've been using the following piece of code to unzip a password-protected
zip on to the user's machine. Works wonderfully on Windows 98 and NT but
not Windows 2000. Does anyone have any idea why? Also, the code doesn't
work for the Mac either. Does anyone know what I can do to make it work for
the Mac? Any insights will be appreciated. Thank you.
if objectP(myFileIO) then set myFileIO = 0
--Delete the instance if it already exists
myFileIO = new(xtra "FileIO")
--Create FileIO object
put chars(string(gLogo),1,length(string(gLogo))-3) & "eps" into
resultfile
put myFileIO.displaySave("Save As", string (resultfile)) into
extractPath -- display the "Open" dialog
if (extractPath = "") = false then
-- execute only if diferent from blank.
put "-s" & gLogoPass & " " & DirectorDir & "logo\" & gLogo &
" " & chars(extractPath,1,length(extractPath) - length(resultfile)) into
openexec
open openexec with "pkunzip"
end if
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/lingo-l.cgi To post messages to the list,
email [EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED])
Lingo-L is for learning and helping with programming Lingo. Thanks!]
