ADSI Homedrive

Ok I'm using the following code to Add a home drive to my user in AD. I can see the changes in ADUC however when the user logs it connects the home drive as:
\\server01\home$\
instead of
\\server01\home$\newuser

DE.Properties("homeDrive").Add("h:")
DE.Properties("homeDirectory").Add("\\server01\home$\%username%")
DE.CommitChanges()

However if I just open ADUC go to the profile tab and hit apply next log on it works. I'm I missing something in my code to create the Directory itself?

Hi RedCamel,

AD will not create the directory for you automatically, you need to create it yourself through your code.

Do you have any sample code?

Creating a directory is easy, use the IO class and you can do it in one line of code.

VB Code:

IO.Directory.CreateDirectory([i]DirectoryToMake[/i])