Hello,
I have following script for AD user. How to make it run on stand alone
server with no AD?
Thanks.

*********************
Const Enabled = 1
Const Disabled = 0

Set objUser = GetObject _
("LDAP://cn=MyerKen,ou=Management,dc=NA,dc=fabrikam,dc=com" )

objUser.ConnectClientDrivesAtLogon = Enabled
objUser.ConnectClientPrintersAtLogon = Enabled
objUser.DefaultToMainPrinter = Enabled
objUser.TerminalServicesInitialProgram = "cmd"
objUser.TerminalServicesWorkDirectory = "c:\temp"
objUser.SetInfo
*********************************

Can anybody with this .VBS, Please!!!!

"Leo" wrote:

> Hello,
> I have following script for AD user. How to make it run on stand alone
> server with no AD?
> Thanks.
>
> *********************
> Const Enabled = 1
> Const Disabled = 0
>
> Set objUser = GetObject _
> ("LDAP://cn=MyerKen,ou=Management,dc=NA,dc=fabrikam,dc=com" )
>
> objUser.ConnectClientDrivesAtLogon = Enabled
> objUser.ConnectClientPrintersAtLogon = Enabled
> objUser.DefaultToMainPrinter = Enabled
> objUser.TerminalServicesInitialProgram = "cmd"
> objUser.TerminalServicesWorkDirectory = "c:\temp"
> objUser.SetInfo
> *********************************
>

What do you want it to do on a standalone server? Do you want it to operate
on accounts that are NOT active directory accounts? If so, what kind of
accounts are they, and do they have the equivalent attributes to those your
script is manipulating?

If it is just a case of running the script to test this kind of scripting, I
understand that there is an AD-simulating package (called, I think, "Adam").
You might try googling for that.


/Al

"Leo" <Leo@discussions.microsoft.com> wrote in message
news:68BC8AAF-207E-497C-A43C-F4BA876E66AB@microsoft.com...
> Can anybody with this .VBS, Please!!!!
>
> "Leo" wrote:
>
>> Hello,
>> I have following script for AD user. How to make it run on stand alone
>> server with no AD?
>> Thanks.
>>
>> *********************
>> Const Enabled = 1
>> Const Disabled = 0
>>
>> Set objUser = GetObject _
>> ("LDAP://cn=MyerKen,ou=Management,dc=NA,dc=fabrikam,dc=com" )
>>
>> objUser.ConnectClientDrivesAtLogon = Enabled
>> objUser.ConnectClientPrintersAtLogon = Enabled
>> objUser.DefaultToMainPrinter = Enabled
>> objUser.TerminalServicesInitialProgram = "cmd"
>> objUser.TerminalServicesWorkDirectory = "c:\temp"
>> objUser.SetInfo
>> *********************************
>>

Thank you Al Dunbar, I find way to do it

"Al Dunbar" wrote:

> What do you want it to do on a standalone server? Do you want it to operate
> on accounts that are NOT active directory accounts? If so, what kind of
> accounts are they, and do they have the equivalent attributes to those your
> script is manipulating?
>
> If it is just a case of running the script to test this kind of scripting, I
> understand that there is an AD-simulating package (called, I think, "Adam").
> You might try googling for that.
>
>
> /Al
>
> "Leo" <Leo@discussions.microsoft.com> wrote in message
> news:68BC8AAF-207E-497C-A43C-F4BA876E66AB@microsoft.com...
> > Can anybody with this .VBS, Please!!!!
> >
> > "Leo" wrote:
> >
> >> Hello,
> >> I have following script for AD user. How to make it run on stand alone
> >> server with no AD?
> >> Thanks.
> >>
> >> *********************
> >> Const Enabled = 1
> >> Const Disabled = 0
> >>
> >> Set objUser = GetObject _
> >> ("LDAP://cn=MyerKen,ou=Management,dc=NA,dc=fabrikam,dc=com" )
> >>
> >> objUser.ConnectClientDrivesAtLogon = Enabled
> >> objUser.ConnectClientPrintersAtLogon = Enabled
> >> objUser.DefaultToMainPrinter = Enabled
> >> objUser.TerminalServicesInitialProgram = "cmd"
> >> objUser.TerminalServicesWorkDirectory = "c:\temp"
> >> objUser.SetInfo
> >> *********************************
> >>
>
>
>