Le 7 oct. 06 à 16:20 Soir, Lennox Jacob a écrit:
Hi Terry,
f = volume ("My Files Hard Drive").child(My docs).child(My New docs)
1. You forgot the Quotes in the child folder names.
Actually in the project I did not forget the quotes, in the email I
did.
The problem here is that:
f = volume ("My Files Hard Drive").child("My docs").child("My New
docs") is not accepted by the compiler, it needs something like this
f = volume (1).child("My docs").child("My New docs")
and that is accepted.
The volume function takes an integer for its parameter (that's life).
If you want to look for your disk, you may use:
dim f as folderItem
dim i as integer
for i=0 to VolumeCount-1
f=Volume(i)
if f<>nil and f.name="My Files Hard Drive" then exit
next
if f=nil then
MsgBox "The disk “My Files Hard Drive” has not been found."
'Show SelectFolder dialog or retry
return 'If you don't do anything, at least put a return
end if
Then 'f' is your disk.
Note that, if you have more than one disk named "My Files Hard
Drive", the first one you inserted will be used._______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
