solo para probar ya intentaste colocar el path "fisico" del que quieres acces??
ejemplo:
Cita: ...
Dim dirInfo as New DirectoryInfo("c:\directorio\SuperPinwi")
y deja todo lo demás tal cual lo tienes, porque tu code está bien el problema posiblemente sea el path.
Salu2