Do this instead:
lcFileDestination = getdir()
If !empty(lcFileDestination)
lcDirSelected = addbs(lcFileDestination)
Else
Messagebox("Destination Not Selected" ,16 ,"Warning")
return
Endif
For zipping to the A: drive, are you using the disk spanning option? If not, are you sure your zipfile is small enough to fit on 1 diskette?
As for selecting a CD-RW, I would first create the zip file in a temp location, then copy it to the CD-RW. This is what I do.
>I just purchased Dynazip and am using the wrapper class by Mark from the UT download directory. I want to let the user select the destination of the backup zip file and use the following code out of a click event of a Backup command button.
>
>lcFileDestination = getdir()
>lnlength = len(lcFileDestination)
>
>*** determine if use cancelled out of the program
>If lnLength != 0
> lcFileDestination = left(lcFileDestination,lnlength -1)
> lcdirselected = lcfileDestination+"\"
>Else
> Messagebox("Destination Not Selected" ,16 ,"Warning")
> return
>Endif
>...
>oDZ = newobject('dynazip', 'dynazip.fxp')
>with oDZ
> .cZip_ZipFile = lcdirselected + "sob.zip"
>.....
>....
>If I want to backup to the A: drive or the CDROM drive, the program won't create the backup unless you are directing it to a subdirectory on those two drives.
>
>The error message is #1961 " A subdirectory or file a:\already exists" or in the case of CDROM ...file d:\already exists.
>
>The DynaZIP program and wrapper class is exactly what I needed. I just got the both programs and with about 2 hrs work will have a solution to my backup problem. Special thanks to the excellent class and documentation by Mark McCasland.
>
>Any work arounds or better yet what the heck am I doing wrong?
>
>Gaylen Jungling
Mark McCasland
Midlothian, TX USA