Sign in to follow this  
Followers 0
stoffmann

Add User from other domain to local admins

7 posts in this topic

Hello,

i have a vbscript that does what i need. I looks like this.

Dim DomainName
Dim UserAccount
Set net = WScript.CreateObject("WScript.Network")
local = net.ComputerName
UserAccount = "ww900/Teamgroup"


set group = GetObject("WinNT://"& local &"/Administrators")

on error resume next
group.Add "WinNT://"&  UserAccount &""
CheckError

sub CheckError
    if not err.number=0 then
    set ole = CreateObject("ole.err")
    WScript.echo ole.oleError(err.Number), vbCritical
    err.clear
else
    WScript.echo "Done."
end if
end sub

I've tried to translate this to AutoIt and ended up with this (found in the forum)

Dim $UserGroup, $UserName

$UserGroup = "administrators"
$UserName = "ww900/Teamgroup"

;Add User to group 
$objGroup = ObjGet("WinNT://" & @ComputerName & "/" & $UserGroup & ",group")
$objUser = ObjGet("WinNT://" & $UserName & ",user")
If Not $objGroup.IsMember($objUser.AdsPath) Then
    $objGroup.Add ($objUser.AdsPath)
    ConsoleWrite("User added")
Else
    ConsoleWrite("Failed to add user")
EndIf

The AutoIt code works if i the user is in the same domain as the computer, but not if the user is from an other domain.

What am i doing wrong?

I found this but i have no idea

on how to use this script works.

Thank's in advance

Stefan

Share this post


Link to post
Share on other sites



Just a shot in the dark but I think you'll have to add the domain where you want to search for the user. Something like:

$objUser = ObjGet("WinNT://" & $Domain "\" & $UserName & ",user")


My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2017-04-18 - Version 1.4.8.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX (NEW 2017-02-27 - Version 1.3.1.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2015-04-01 - Version 0.4.0.0) - Download - General Help & Support - Example Scripts
Excel - Example Scripts - Wiki
Word - Wiki
PowerPoint (2015-06-06 - Version 0.0.5.0) - Download - General Help & Support

Tutorials:
ADO - Wiki

 

Share this post


Link to post
Share on other sites

Just a shot in the dark but I think you'll have to add the domain where you want to search for the user. Something like:

$objUser = ObjGet("WinNT://" & $Domain "\" & $UserName & ",user")

Thank's for the hint, but i allready have the domain in the variable $UserName = "ww900/Teamgroup".

Share this post


Link to post
Share on other sites

Ahhh, I see.

I don't know if that makes a difference but usually I use a backslash between domain and username e.g. $UserName = "ww900\Teamgroup".


My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2017-04-18 - Version 1.4.8.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX (NEW 2017-02-27 - Version 1.3.1.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2015-04-01 - Version 0.4.0.0) - Download - General Help & Support - Example Scripts
Excel - Example Scripts - Wiki
Word - Wiki
PowerPoint (2015-06-06 - Version 0.0.5.0) - Download - General Help & Support

Tutorials:
ADO - Wiki

 

Share this post


Link to post
Share on other sites

Share this post


Link to post
Share on other sites

Ahhh, I see.

I don't know if that makes a difference but usually I use a backslash between domain and username e.g. $UserName = "ww900\Teamgroup".

You're right, backslash is the normal syntax.I tried both variants in the AutoIt script. The VBScript works with the slash.

Thanks

Share this post


Link to post
Share on other sites

Are you aware of there being domain trusts in place? Can you currently perform cross domain authentication?

The domains are trusted. As i said, the vbscript doing the same (as far es i can see) works.

Thank You

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0