Thats absolutely brilliant. Worked a treat, and only two duff discs!
Here's the code I used, the majority of it is what you gave me.
_________________________________________________
property myfile
on mouseup me
cd = xtra("cdpro").new()
getCDDrive(cd)
mydrive = getCDDrive(cd)
sourcepath = mydrive & "\Docs\" & myfile
fxObj = xtra("FileXtra3").new()
destinationpath = fxObj.fx_FileSaveAsDialog("c:\", myfile, "Step 2 (select
save location)", True)
fxObj.fx_FileCopy(sourcepath, destinationpath)
alert (String(fxObj.fx_ErrorNumber()))
fxObj = 0
end
on getpropertydescriptionlist me
description = [:]
addprop description, #myfile, [#comment:"Filename", #format:#char,
#default:"[Type filename]"]
return description
end getpropertydescriptionlist
_________________________________________________
Thanks plenty
Richard Poole
----- Original Message -----
From: "Nitin Urdhwareshe" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Wednesday, October 31, 2001 9:39 AM
Subject: RE: <lingo-l> Copying files from CD
> Hi Richard
>
> Use a combination of CDPro Xtra and FileXtra - both are free
>
> on mouseUp me
> --use CDPro Xtra here to fine the source path
> global cd, myFileName
> set cd = xtra("cdpro").new()
> getCDDrive(cd)
> mydrive = getCDDrive(cd)
>
> searchpath = mydrive
>
> sourcepath = mydrive & "\yourfilename.doc"
> set myFileName = "yourfilename.doc"
>
> --use FileXtra here to get destination path and copy the file
> fxObj = xtra("FileXtra3").new()
>
> destinationpath = fxObj.fx_FileSaveAsDialog("c\", "yourfilename.doc",
> "Enter a filename", True)
>
>
>
>
> fxObj.fx_FileCopy(sourcepath, destinationpath)
>
> fxObj = 0
>
> end
>
> Nitin Urdhwareshe
> [EMAIL PROTECTED]
>
> -----Original Message-----
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On
> Behalf Of Richard Poole
> Sent: Thursday, November 01, 2001 2:42 PM
> To: [EMAIL PROTECTED]
> Subject: <lingo-l> Copying files from CD
>
>
> Hi
>
> I am trying to find out how to get my projector file which is on a cd, to
> copy a file (also on the cd 'mode_of_action.doc'), to a location specified
> by the user.
>
> The program works fine when played back in director and int he project on
> system, but when burnt onto a cd the file wont copy, keeps saying file not
> found.
>
> Does anyone know of an Xtra or some way I can get this to work?
>
> The real pain is I have committed myself to this job because the projector
> on system and it's deadline for completion is tomorrow!
>
> Many thanks in advance
>
> Richard Poole
>
>
> [To remove yourself from this list, or to change to digest mode, go to
> http://www.penworks.com/LUJ/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!]
>
>
>
> [To remove yourself from this list, or to change to digest mode, go to
> http://www.penworks.com/LUJ/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!]
>
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/LUJ/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!]
