Read Only 'deletion' ?

[Jop]

*wow* thanks both of you!!!
Thank you very much and happy vb-ing!

Jop!

[Jop]

Can you please tell me how I can use your code?
What does it return?
when I give

explore("c:\blabla")
?


Thanks Kedaman!

JOP

[kedaman]

explore does not return anything, it's a sub.

But as soon as you insert a instance of the control (name it whatever), you can doubbleclick it, it will show up the filecatch event, put your code there. The other event catches directories.

Then put the explore("c:\blabla") in a commandbutton or whatever and see what happens!

[Jop]

Ok Kedaman
When I'll ask you the following question, you might think I'm an absolute newbie, and yes... I am

Can you please give detailed info?
.I've added the control > fine so far..
.I've copied the code you gave me in the control > fine so far..
.I've doubleclikked the control > fine so far..

But now..

Wich code do I have to add in the File_Catch event?
And.. when I add a menu with the action: explore("c:\blabla")

it says that the sub not defined is..
how do I get this nice control to work?
I really apreciate (< spell check!) your help pal!

Thanks again,
Jop

[kedaman]

Wich code do I have to add in the File_Catch event?

Here you need to write your own code but I give you an example:

Private Sub Subdirs2_Filecatch(File As String, path As String, level As Integer)
    Debug.Print "Path: " & path & "File: " & "Sub level: " & level
End Sub

And.. when I add a menu with the action: explore("c:\blabla")

it says that the sub not defined is..

explorer is a method of the usercontrol, use usercontrl.explore where usercontrol is the name of the usercontrol

Hope you got everything now this time. Have fun!

[Jop]

Thanks Kedaman!!!
It works now, but I don't now how to retrieve all files yet, but I hope I'll can fix it myself!!!
(not sure about that )
But hey, thanx Kedaman, if I want to ask somethin', can I?

Jop

[kedaman]

Sure thing, you could also mail me: [email protected]