Get Folder and File Access in Windows 7

See more:

VB

Hi all,
I have being pulling my hair out and spending way to much time on google. I am writing my own backup programme and would like to have access over my machine. While trying to read all the file names in My Documents. I get the error code that I can not access My Music. Which is of course a pain in the back side. How do I get around this.

{Program is set to require admin rights at execution}


dim Folder as string 
folder=Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)
dim sPattern as string
sPatter="*.*"
for each File_Entry as string in Direcotry.GetFiles(Folder,sPattern,IO.SearchOption.AllDirectories)
'Code here to do stuff with files.
next

I get this error

<br />
Access to the path 'C:\Users\{current user}\Documents\My Music\' is denied.<br />

I have tried the following.

On Error Resume Next. this of course stops it in its tracks

Try Catch End Try. again stops in its tracks

Setting Access Rules. Unless I am doing it wrong, Does not work

Continue For in Try Again bad idea

Any Help would be fantastic. I don't want to copy or minipulate the files. I just want to get a complet list of filename and directory structures out of it.

Cheers