Gets and sets a user's home drive. When the user logs on, the drive specified as the Home Drive is connected to the user's home directory.
You can specify the home drive as a case-insensitive drive letter followed by a colon. For instance, "M:" or "d:". You can use any alphabet (from A to Z) to represent a drive.
Dim UserInfo As IUserInfo
'Get UserInfo interface on user object
Set UserInfo = GetObject("NTDS://MSFT/John")
'Get current Home Drive
'Assign new Home Drive
UserInfo.HomeDrive = "M:"