Active Directory & Parameter

G

Guest

Guten Tag

Ich sollte ein Script machen, das beim Einloggen mit Win2000, Parameter
übernimmt.

Zum Beispiel, wenn sich der User Schaub02 einlogt, das er auf einem Server
eine Datei Gemappt bekommt.

Ich benötige hinweise, wie und wo ich für meine Problemlösung suchen muss
und wie ich anfangen soll.

Besten Dank!
Greg

PS: Ich bin in dem Bereich Amfänger
 
D

Daniel

Greg said:
Guten Tag

Ich sollte ein Script machen, das beim Einloggen mit Win2000, Parameter
übernimmt.

Zum Beispiel, wenn sich der User Schaub02 einlogt, das er auf einem Server
eine Datei Gemappt bekommt.

Ich benötige hinweise, wie und wo ich für meine Problemlösung suchen muss
und wie ich anfangen soll.

Besten Dank!
Greg

PS: Ich bin in dem Bereich Amfänger
this is an english newsgroup.
 
C

Cor Ligthert

Greg,

This is not a scripting newsgroup for Win2000 server.

I think that the best place for this question is a Server newsgroup.

I hope this helps,

Cor
 
G

Guest

Wie schon gesagt, ich bin Neu hier.

Wissen Sie wo ich eine MSDN Newsgroups auf Deutsch finde,
vieleicht ein Link.
Danke!

Mit freundlichen Grüssen
Greg

:
 
G

Guest

Es geht mir auch um den VB-Scribt und nicht direckt um den Server2000, 2003
oder Workstation

Es geht um Login-Script

Cor Ligthert said:
Greg,

This is not a scripting newsgroup for Win2000 server.

I think that the best place for this question is a Server newsgroup.

I hope this helps,

Cor


Ich habe zum Beispiel diesen Code bekommen, aber brauche mehr infos wie ich
das ändern muss oder umwandeln, muss ich eine Consolenanwendung machen um MMC
zu steuern oder oder, brauche diesbezüglich hilfe:

Listing 1: Enum_groups.vbs

option explicit

Dim objArgs, strGroupDN
set objArgs = WScript.Arguments
if objArgs.Count <> 1 then
Dim objRootDSE
set objRootDSE = GetObject("LDAP://RootDSE")
strGroupDN = "cn=Domain Admins,cn=users," &
objRootDSE.Get("defaultNamingContext")
else
strGroupDN = objArgs.Item(0)
end if

Dim dicSeenGroupMember
set dicSeenGroupMember = CreateObject("Scripting.Dictionary")
Wscript.Echo "Members of " & strGroupDN & ":"
DisplayMembers "LDAP://" & strGroupDN, " ", dicSeenGroupMember

Function DisplayMembers (strGroupADsPath, strSpaces, dicSeenGroupMember)

Dim objGroup, objMember
set objGroup = GetObject(strGroupADsPath)
for each objMember In objGroup.Members

Wscript.Echo strSpaces & objMember.Get("distinguishedname")
if objMember.Class = "group" then

if dicSeenGroupMember.Exists(objMember.ADsPath) then
Wscript.Echo strSpaces & " ^ already seen group member " & _
"(stopping to avoid loop)"
else
dicSeenGroupMember.Add objMember.ADsPath, 1
DisplayMembers objMember.ADsPath, strSpaces & " ", _
dicSeenGroupMember
end if

end if

next
End Function
 
C

Cor Ligthert

Grec.

microsoft.public.de. are the newsgroups where the german language is used,

I advise you really to take first the active directory one.

From there you will probably get your script or the best newsgroup for that.

Cor
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads


Top