How can I share a folder over a network through VB6?

I have folder called FolderName.
I want to change FolderName's attributes to be shared over the network.
I want to do this from VB6.

Please help.