buona sera...

dovrei effettuare un procedura che mi cancella dei file in un cartella specifica.
Uso vbnet2003 e windows vista

Dim di As IO.DirectoryInfo = New IO.DirectoryInfo(directory)
For Each File As IO.FileInfo In di.GetFiles()
File.Delete()
Next


solo che questo codice su windows vista non mi va.Mi dice accesso su file non possibile.Stesso codice su xp va.La cartella è c:\programmi\prova1 e io sono amministratore del pc


Come risolvere?

grazie