| Author |
Message |
jrod091884
Guest
|
 Posted:
Mon Nov 07, 2005 9:50 pm Post subject:
workgroup to domain issue |
|
|
i have a workgroup of 36 pcs on the network some have very important
information like outlook messages and company files... there arent any
advanced users i want to put every1 in a domain without them noticing any
change and not having to search for files in there pc... or lose any settings
in there programs... can sum1 help... thank you |
|
| Back to top |
|
 |
Wendel Hamilton
Guest
|
| Posted:
Tue Nov 08, 2005 9:50 am Post subject:
RE: workgroup to domain issue |
|
|
Hi,
Prepare the domain controller.
Create the user accounts.
After joining the computer to the domain log on as the user
this will create a new profile. Logoff and logon as administrator.
Change the profile path for the user back to the old one by changing the
registry key
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows
NT\CurrentVersion\ProfileList\{guid}\ProfileImagePath
If you want to automate that part of it then you could write some scripts to
1. save the path before joining the domain
2. Enable Autoadmin logon as admin.
3. Join the computer to the domain and reboot
4. add user to local machine administrators group or add domain uses and
reboot (you could use group policy to do this)
5. Enable Autoadmin logon as the user and reboot.
6. User gets logged on, enable Autoadmin logon for admin and logout.
7. Restore the users profile path.
8. Disable Autoadmin logon and logout.
"jrod091884" wrote:
| Quote: | i have a workgroup of 36 pcs on the network some have very important
information like outlook messages and company files... there arent any
advanced users i want to put every1 in a domain without them noticing any
change and not having to search for files in there pc... or lose any settings
in there programs... can sum1 help... thank you |
|
|
| Back to top |
|
|
jrod091884
Guest
|
| Posted:
Tue Nov 08, 2005 5:50 pm Post subject:
RE: workgroup to domain issue |
|
|
how would i know what {guid} is the 1 to save if there is more than 1 and
each are labeled with numbers ex: S-1-5-20-...
"Wendel Hamilton" wrote:
| Quote: | Hi,
Prepare the domain controller.
Create the user accounts.
After joining the computer to the domain log on as the user
this will create a new profile. Logoff and logon as administrator.
Change the profile path for the user back to the old one by changing the
registry key
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows
NT\CurrentVersion\ProfileList\{guid}\ProfileImagePath
If you want to automate that part of it then you could write some scripts to
1. save the path before joining the domain
2. Enable Autoadmin logon as admin.
3. Join the computer to the domain and reboot
4. add user to local machine administrators group or add domain uses and
reboot (you could use group policy to do this)
5. Enable Autoadmin logon as the user and reboot.
6. User gets logged on, enable Autoadmin logon for admin and logout.
7. Restore the users profile path.
8. Disable Autoadmin logon and logout.
"jrod091884" wrote:
i have a workgroup of 36 pcs on the network some have very important
information like outlook messages and company files... there arent any
advanced users i want to put every1 in a domain without them noticing any
change and not having to search for files in there pc... or lose any settings
in there programs... can sum1 help... thank you |
|
|
| Back to top |
|
|
Wendel Hamilton
Guest
|
| Posted:
Wed Nov 09, 2005 1:50 am Post subject:
RE: workgroup to domain issue |
|
|
Hi,
You could check each the value of ProfileImagePath for each Guid for a match
with the current user profile path which is in the environment variable
%UserProfile%
or
The following VBscript returns info about the user including the SID used.
Replace strUsername with the logon name for the user.
' Generated by ScriptomaticV2
On Error Resume Next
strUserName = "Wendel"
Const wbemFlagReturnImmediately = &h10
Const wbemFlagForwardOnly = &h20
arrComputers = Array(".")
For Each strComputer In arrComputers
WScript.Echo
WScript.Echo "=========================================="
WScript.Echo "Computer: " & strComputer
WScript.Echo "=========================================="
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_UserAccount",
"WQL", _
wbemFlagReturnImmediately +
wbemFlagForwardOnly)
For Each objItem In colItems
if objItem.name = strUserName then
WScript.Echo "AccountType: " & objItem.AccountType
WScript.Echo "Caption: " & objItem.Caption
WScript.Echo "Description: " & objItem.Description
WScript.Echo "Disabled: " & objItem.Disabled
WScript.Echo "Domain: " & objItem.Domain
WScript.Echo "FullName: " & objItem.FullName
WScript.Echo "InstallDate: " & WMIDateStringToDate(objItem.InstallDate)
WScript.Echo "LocalAccount: " & objItem.LocalAccount
WScript.Echo "Lockout: " & objItem.Lockout
WScript.Echo "Name: " & objItem.Name
WScript.Echo "PasswordChangeable: " & objItem.PasswordChangeable
WScript.Echo "PasswordExpires: " & objItem.PasswordExpires
WScript.Echo "PasswordRequired: " & objItem.PasswordRequired
WScript.Echo "SID: " & objItem.SID
WScript.Echo "SIDType: " & objItem.SIDType
WScript.Echo "Status: " & objItem.Status
WScript.Echo
end if
Next
Next
Function WMIDateStringToDate(dtmDate)
WScript.Echo dtm:
WMIDateStringToDate = CDate(Mid(dtmDate, 5, 2) & "/" & _
Mid(dtmDate, 7, 2) & "/" & Left(dtmDate, 4) _
& " " & Mid (dtmDate, 9, 2) & ":" & Mid(dtmDate, 11, 2) & ":" &
Mid(dtmDate,13, 2))
End Function
"jrod091884" wrote:
| Quote: | how would i know what {guid} is the 1 to save if there is more than 1 and
each are labeled with numbers ex: S-1-5-20-...
"Wendel Hamilton" wrote:
Hi,
Prepare the domain controller.
Create the user accounts.
After joining the computer to the domain log on as the user
this will create a new profile. Logoff and logon as administrator.
Change the profile path for the user back to the old one by changing the
registry key
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows
NT\CurrentVersion\ProfileList\{guid}\ProfileImagePath
If you want to automate that part of it then you could write some scripts to
1. save the path before joining the domain
2. Enable Autoadmin logon as admin.
3. Join the computer to the domain and reboot
4. add user to local machine administrators group or add domain uses and
reboot (you could use group policy to do this)
5. Enable Autoadmin logon as the user and reboot.
6. User gets logged on, enable Autoadmin logon for admin and logout.
7. Restore the users profile path.
8. Disable Autoadmin logon and logout.
"jrod091884" wrote:
i have a workgroup of 36 pcs on the network some have very important
information like outlook messages and company files... there arent any
advanced users i want to put every1 in a domain without them noticing any
change and not having to search for files in there pc... or lose any settings
in there programs... can sum1 help... thank you |
|
|
| Back to top |
|
|
jrod091884
Guest
|
| Posted:
Wed Nov 09, 2005 5:50 pm Post subject:
RE: workgroup to domain issue |
|
|
ok so...all i have to do i hit modify copy the old path, exit log in as the
admin modify there new user path to there old path and thats it? would there
new path be in the same location even though its is a domain user? and if
this is correct is there a way to get this done automatically without scripts
cuz i dont know anything about scripts... and i cant interupt every1s work to
do this.
"Wendel Hamilton" wrote:
| Quote: | Hi,
You could check each the value of ProfileImagePath for each Guid for a match
with the current user profile path which is in the environment variable
%UserProfile%
or
The following VBscript returns info about the user including the SID used.
Replace strUsername with the logon name for the user.
' Generated by ScriptomaticV2
On Error Resume Next
strUserName = "Wendel"
Const wbemFlagReturnImmediately = &h10
Const wbemFlagForwardOnly = &h20
arrComputers = Array(".")
For Each strComputer In arrComputers
WScript.Echo
WScript.Echo "=========================================="
WScript.Echo "Computer: " & strComputer
WScript.Echo "=========================================="
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_UserAccount",
"WQL", _
wbemFlagReturnImmediately +
wbemFlagForwardOnly)
For Each objItem In colItems
if objItem.name = strUserName then
WScript.Echo "AccountType: " & objItem.AccountType
WScript.Echo "Caption: " & objItem.Caption
WScript.Echo "Description: " & objItem.Description
WScript.Echo "Disabled: " & objItem.Disabled
WScript.Echo "Domain: " & objItem.Domain
WScript.Echo "FullName: " & objItem.FullName
WScript.Echo "InstallDate: " & WMIDateStringToDate(objItem.InstallDate)
WScript.Echo "LocalAccount: " & objItem.LocalAccount
WScript.Echo "Lockout: " & objItem.Lockout
WScript.Echo "Name: " & objItem.Name
WScript.Echo "PasswordChangeable: " & objItem.PasswordChangeable
WScript.Echo "PasswordExpires: " & objItem.PasswordExpires
WScript.Echo "PasswordRequired: " & objItem.PasswordRequired
WScript.Echo "SID: " & objItem.SID
WScript.Echo "SIDType: " & objItem.SIDType
WScript.Echo "Status: " & objItem.Status
WScript.Echo
end if
Next
Next
Function WMIDateStringToDate(dtmDate)
WScript.Echo dtm:
WMIDateStringToDate = CDate(Mid(dtmDate, 5, 2) & "/" & _
Mid(dtmDate, 7, 2) & "/" & Left(dtmDate, 4) _
& " " & Mid (dtmDate, 9, 2) & ":" & Mid(dtmDate, 11, 2) & ":" &
Mid(dtmDate,13, 2))
End Function
"jrod091884" wrote:
how would i know what {guid} is the 1 to save if there is more than 1 and
each are labeled with numbers ex: S-1-5-20-...
"Wendel Hamilton" wrote:
Hi,
Prepare the domain controller.
Create the user accounts.
After joining the computer to the domain log on as the user
this will create a new profile. Logoff and logon as administrator.
Change the profile path for the user back to the old one by changing the
registry key
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows
NT\CurrentVersion\ProfileList\{guid}\ProfileImagePath
If you want to automate that part of it then you could write some scripts to
1. save the path before joining the domain
2. Enable Autoadmin logon as admin.
3. Join the computer to the domain and reboot
4. add user to local machine administrators group or add domain uses and
reboot (you could use group policy to do this)
5. Enable Autoadmin logon as the user and reboot.
6. User gets logged on, enable Autoadmin logon for admin and logout.
7. Restore the users profile path.
8. Disable Autoadmin logon and logout.
"jrod091884" wrote:
i have a workgroup of 36 pcs on the network some have very important
information like outlook messages and company files... there arent any
advanced users i want to put every1 in a domain without them noticing any
change and not having to search for files in there pc... or lose any settings
in there programs... can sum1 help... thank you |
|
|
| Back to top |
|
|
Wendel Hamilton
Guest
|
| Posted:
Fri Nov 11, 2005 9:50 am Post subject:
RE: workgroup to domain issue |
|
|
Hi,
It should not matter that it is a domain account.
I don't think there are any tools to automate what you want.
The only possibility is the Active directory migration tool but that
migrates from domain to domain.
"jrod091884" wrote:
| Quote: | ok so...all i have to do i hit modify copy the old path, exit log in as the
admin modify there new user path to there old path and thats it? would there
new path be in the same location even though its is a domain user? and if
this is correct is there a way to get this done automatically without scripts
cuz i dont know anything about scripts... and i cant interupt every1s work to
do this.
"Wendel Hamilton" wrote:
Hi,
You could check each the value of ProfileImagePath for each Guid for a match
with the current user profile path which is in the environment variable
%UserProfile%
or
The following VBscript returns info about the user including the SID used.
Replace strUsername with the logon name for the user.
' Generated by ScriptomaticV2
On Error Resume Next
strUserName = "Wendel"
Const wbemFlagReturnImmediately = &h10
Const wbemFlagForwardOnly = &h20
arrComputers = Array(".")
For Each strComputer In arrComputers
WScript.Echo
WScript.Echo "=========================================="
WScript.Echo "Computer: " & strComputer
WScript.Echo "=========================================="
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_UserAccount",
"WQL", _
wbemFlagReturnImmediately +
wbemFlagForwardOnly)
For Each objItem In colItems
if objItem.name = strUserName then
WScript.Echo "AccountType: " & objItem.AccountType
WScript.Echo "Caption: " & objItem.Caption
WScript.Echo "Description: " & objItem.Description
WScript.Echo "Disabled: " & objItem.Disabled
WScript.Echo "Domain: " & objItem.Domain
WScript.Echo "FullName: " & objItem.FullName
WScript.Echo "InstallDate: " & WMIDateStringToDate(objItem.InstallDate)
WScript.Echo "LocalAccount: " & objItem.LocalAccount
WScript.Echo "Lockout: " & objItem.Lockout
WScript.Echo "Name: " & objItem.Name
WScript.Echo "PasswordChangeable: " & objItem.PasswordChangeable
WScript.Echo "PasswordExpires: " & objItem.PasswordExpires
WScript.Echo "PasswordRequired: " & objItem.PasswordRequired
WScript.Echo "SID: " & objItem.SID
WScript.Echo "SIDType: " & objItem.SIDType
WScript.Echo "Status: " & objItem.Status
WScript.Echo
end if
Next
Next
Function WMIDateStringToDate(dtmDate)
WScript.Echo dtm:
WMIDateStringToDate = CDate(Mid(dtmDate, 5, 2) & "/" & _
Mid(dtmDate, 7, 2) & "/" & Left(dtmDate, 4) _
& " " & Mid (dtmDate, 9, 2) & ":" & Mid(dtmDate, 11, 2) & ":" &
Mid(dtmDate,13, 2))
End Function
"jrod091884" wrote:
how would i know what {guid} is the 1 to save if there is more than 1 and
each are labeled with numbers ex: S-1-5-20-...
"Wendel Hamilton" wrote:
Hi,
Prepare the domain controller.
Create the user accounts.
After joining the computer to the domain log on as the user
this will create a new profile. Logoff and logon as administrator.
Change the profile path for the user back to the old one by changing the
registry key
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows
NT\CurrentVersion\ProfileList\{guid}\ProfileImagePath
If you want to automate that part of it then you could write some scripts to
1. save the path before joining the domain
2. Enable Autoadmin logon as admin.
3. Join the computer to the domain and reboot
4. add user to local machine administrators group or add domain uses and
reboot (you could use group policy to do this)
5. Enable Autoadmin logon as the user and reboot.
6. User gets logged on, enable Autoadmin logon for admin and logout.
7. Restore the users profile path.
8. Disable Autoadmin logon and logout.
"jrod091884" wrote:
i have a workgroup of 36 pcs on the network some have very important
information like outlook messages and company files... there arent any
advanced users i want to put every1 in a domain without them noticing any
change and not having to search for files in there pc... or lose any settings
in there programs... can sum1 help... thank you |
|
|
| Back to top |
|
|
|
|
|
|
FAQ
Memberlist
Register
Profile
Log in to check your private messages
Log in