Unable to access Network drives from TestExecute

If I run this code from TestComplete 11 running on my PC:    Sub EnumerateDrives    Dim colDrives, oDrive, i    Set colDrives = aqFileSystem.Drives    For i = 0 to colDrives.Count - 1   MsgBox ...