Solved

Moving the Home folders for users in Active directory

Posted on 2008-06-18
4
345 Views
Last Modified: 2010-08-05
I have copied the Home folders for our active directory users to a new location.
Is there a possible way to make all the users map to the new location without changing each one from the active directory users profile?
0
Comment
Question by:haftrine
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
4 Comments
 
LVL 3

Expert Comment

by:GlobalStrata
ID: 21816503
Assuming that the directories you created for the users uses the User name, highlight all the users accounts and open properties.  Go to the profile Home Directory field and type \\SERVER_NAME\%USERNAME%

%USERNAME% will replace the Directory with the appropiate user name.

If the directory does not exist, AD will create it and provide the proper permissions.

Cheers,

Gladys I. Rodriguez
0
 
LVL 30

Expert Comment

by:LauraEHunterMVP
ID: 21817008
Not reasonably, no.

Assuming that everyone's pathname is in the format \\servername\%username%, download ADMODIFY.NET and make bulk modificaitons there instead of in ADUC.
0
 
LVL 7

Accepted Solution

by:
ms-pro earned 125 total points
ID: 21817906
try this http://manageengine.adventnet.com/products/ad-manager/active-directory-user-profile-settings.html
or use a vbs script, put it on a logon gpo.
Dim objNetwork, objFSO
Dim strDriveLetter, strUNCPath, strUser
 
On Error Resume Next
 
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objNetwork= CreateObject("Wscript.Network")
strUser =objNetwork.UserName
strUNCPath = "\\servername\profiles"
strNewName = "Home-Drive"
 
if objFSO.FolderExists(strUNCPath) then
 
  if objFSO.FolderExists(strUNCPath & "\" & strUser) then
 
  else
    objFSO.CreateFolder(strUNCPath & "\" & strUser)
  end if
end if
strDriveLetter = "H:"
objNetwork.RemoveNetworkDrive strDriveLetter, True
objNetwork.MapNetworkDrive strDriveLetter,strUNCPath & "\" & strUser
Set objShell = CreateObject("Shell.Application")
objShell.NameSpace(strDriveLetter).Self.Name = strNewName
 
WScript.Quit

Open in new window

0
 
LVL 3

Expert Comment

by:GlobalStrata
ID: 21850974
The script provided does exactly the same thing that I explained above.  The problem with this is that you have no way to select the users you want to do this with.  All user profiles are changed.  

Cheers,

Gladys I. Rodriguez
0

Featured Post

NEW Veeam Agent for Microsoft Windows

Backup and recover physical and cloud-based servers and workstations, as well as endpoint devices that belong to remote users. Avoid downtime and data loss quickly and easily for Windows-based physical or public cloud-based workloads!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

A project that enables an administrator to perform actions within a user session context not just at the time of login but any time later on day(s) or week(s) later.
Auditing domain password hashes is a commonly overlooked but critical requirement to ensuring secure passwords practices are followed. Methods exist to extract hashes directly for a live domain however this article describes a process to extract u…
This tutorial will walk an individual through the process of transferring the five major, necessary Active Directory Roles, commonly referred to as the FSMO roles to another domain controller. Log onto the new domain controller with a user account t…
This video shows how to use Hyena, from SystemTools Software, to bulk import 100 user accounts from an external text file. View in 1080p for best video quality.

752 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question