Microsoft KB Archive/250617: Difference between revisions

From BetaArchive Wiki
(importing KB archive)
 
m (Text replacement - """ to """)
 
Line 66: Line 66:
     '
     '
     On Error Resume Next
     On Error Resume Next
     Set oBuilder = GetObject("LDAP:")
     Set oBuilder = GetObject("LDAP:")
     Set oADSContainer = oBuilder.OpenDSObject("LDAP://localhost/o=microsoft/ou=members","cn=administrator,ou=members,o=microsoft","password", 0)
     Set oADSContainer = oBuilder.OpenDSObject("LDAP://localhost/o=microsoft/ou=members","cn=administrator,ou=members,o=microsoft","password", 0)
     Set oAdmin = oADSContainer.Create("member","cn=SiteServer Administrator")
     Set oAdmin = oADSContainer.Create("member","cn=SiteServer Administrator")
     oAdmin.Put "userPassword","password"
     oAdmin.Put "userPassword","password"
     oAdmin.Put "guid", "66C113EAB27539232424563ECB967ED2"
     oAdmin.Put "guid", "66C113EAB27539232424563ECB967ED2"
     oAdmin.SetInfo
     oAdmin.SetInfo


Line 76: Line 76:
     ' Add him to the SiteServer Administrators group:
     ' Add him to the SiteServer Administrators group:
     '
     '
     Set oADSContainer = oBuilder.OpenDSObject("LDAP://localhost/o=microsoft/ou=groups/ou=NTgroups/cn=Administradores de SiteServer","cn=administrator,ou=members,o=microsoft","password", 0)
     Set oADSContainer = oBuilder.OpenDSObject("LDAP://localhost/o=microsoft/ou=groups/ou=NTgroups/cn=Administradores de SiteServer","cn=administrator,ou=members,o=microsoft","password", 0)
     Set oMemberOf = oADSContainer.Create("memberOf", "cn=SiteServer Administrator")
     Set oMemberOf = oADSContainer.Create("memberOf", "cn=SiteServer Administrator")
     oMemberOf.Put "memberObject", "cn=SiteServer Administrator,ou=members,o=microsoft"
     oMemberOf.Put "memberObject", "cn=SiteServer Administrator,ou=members,o=microsoft"
     oMemberOf.SetInfo
     oMemberOf.SetInfo


Line 86: Line 86:
     ' Add him to the SiteServer DirectMail Administrators group:
     ' Add him to the SiteServer DirectMail Administrators group:
     '
     '
     Set oADSContainer = oBuilder.OpenDSObject("LDAP://localhost/o=microsoft/ou=groups/ou=NTgroups/cn=Administradores de correo directo de Site Server","cn=administrator,ou=members,o=microsoft","password", 0)
     Set oADSContainer = oBuilder.OpenDSObject("LDAP://localhost/o=microsoft/ou=groups/ou=NTgroups/cn=Administradores de correo directo de Site Server","cn=administrator,ou=members,o=microsoft","password", 0)
     Set oMemberOf = oADSContainer.Create("memberOf", "cn=SiteServer Administrator")
     Set oMemberOf = oADSContainer.Create("memberOf", "cn=SiteServer Administrator")
     oMemberOf.Put "memberObject", "cn=SiteServer Administrator,ou=members,o=microsoft"
     oMemberOf.Put "memberObject", "cn=SiteServer Administrator,ou=members,o=microsoft"
     oMemberOf.SetInfo
     oMemberOf.SetInfo


Line 95: Line 95:
     ' Add him to the SiteServer DirectMail Operators  group:
     ' Add him to the SiteServer DirectMail Operators  group:
     '
     '
     Set oADSContainer = oBuilder.OpenDSObject("LDAP://localhost/o=microsoft/ou=groups/ou=NTgroups/cn=Operadores de correo directo de Site Server","cn=administrator,ou=members,o=microsoft","password", 0)
     Set oADSContainer = oBuilder.OpenDSObject("LDAP://localhost/o=microsoft/ou=groups/ou=NTgroups/cn=Operadores de correo directo de Site Server","cn=administrator,ou=members,o=microsoft","password", 0)
     Set oMemberOf = oADSContainer.Create("memberOf", "cn=SiteServer Administrator")
     Set oMemberOf = oADSContainer.Create("memberOf", "cn=SiteServer Administrator")
     oMemberOf.Put "memberObject", "cn=SiteServer Administrator,ou=members,o=microsoft"
     oMemberOf.Put "memberObject", "cn=SiteServer Administrator,ou=members,o=microsoft"
     oMemberOf.SetInfo
     oMemberOf.SetInfo
                 </pre>
                 </pre>

Latest revision as of 13:51, 21 July 2020

Knowledge Base


Site Server Administrator Is Not Added to the Correct Groups with Createssadmin.vbs

Article ID: 250617

Article Last Modified on 10/16/2002



APPLIES TO

  • Microsoft Site Server 3.0 Standard Edition



This article was previously published under Q250617

SYMPTOMS

In the Spanish version of Site Server 3.0, the Site Server Administrator is not added to the correct groups. When you view group membership for the Administrator account in the Microsoft Management Console (MMC), the Administrator does not show any group membership.

CAUSE

The Createssadmin.vbs file is incorrect in the Spanish version of Site Server 3.0.

WORKAROUND


To work around this problem, replace the Createssadmin.vbs file with the following:

    'LOCALIZED FOR SPANISH
    ' Create SiteServer Administrator
    '
    On Error Resume Next
    Set oBuilder = GetObject("LDAP:")
    Set oADSContainer = oBuilder.OpenDSObject("LDAP://localhost/o=microsoft/ou=members","cn=administrator,ou=members,o=microsoft","password", 0)
    Set oAdmin = oADSContainer.Create("member","cn=SiteServer Administrator")
    oAdmin.Put "userPassword","password"
    oAdmin.Put "guid", "66C113EAB27539232424563ECB967ED2"
    oAdmin.SetInfo

    '
    ' Add him to the SiteServer Administrators group:
    '
    Set oADSContainer = oBuilder.OpenDSObject("LDAP://localhost/o=microsoft/ou=groups/ou=NTgroups/cn=Administradores de SiteServer","cn=administrator,ou=members,o=microsoft","password", 0)
    Set oMemberOf = oADSContainer.Create("memberOf", "cn=SiteServer Administrator")
    oMemberOf.Put "memberObject", "cn=SiteServer Administrator,ou=members,o=microsoft"
    oMemberOf.SetInfo



    '
    ' Add him to the SiteServer DirectMail Administrators group:
    '
    Set oADSContainer = oBuilder.OpenDSObject("LDAP://localhost/o=microsoft/ou=groups/ou=NTgroups/cn=Administradores de correo directo de Site Server","cn=administrator,ou=members,o=microsoft","password", 0)
    Set oMemberOf = oADSContainer.Create("memberOf", "cn=SiteServer Administrator")
    oMemberOf.Put "memberObject", "cn=SiteServer Administrator,ou=members,o=microsoft"
    oMemberOf.SetInfo


    '
    ' Add him to the SiteServer DirectMail Operators  group:
    '
    Set oADSContainer = oBuilder.OpenDSObject("LDAP://localhost/o=microsoft/ou=groups/ou=NTgroups/cn=Operadores de correo directo de Site Server","cn=administrator,ou=members,o=microsoft","password", 0)
    Set oMemberOf = oADSContainer.Create("memberOf", "cn=SiteServer Administrator")
    oMemberOf.Put "memberObject", "cn=SiteServer Administrator,ou=members,o=microsoft"
    oMemberOf.SetInfo
                

RESOLUTION

To resolve this problem, obtain the latest service pack for Site Server version 3.0. For additional information, click the following article number to view the article in the Microsoft Knowledge Base:

219292 How to Obtain the Latest Site Server 3.0 Service Pack




STATUS

Microsoft has confirmed that this is a problem in Site Server 3.0. This problem was first corrected in Site Server 3.0 Service Pack 4.

Keywords: kbbug kbfix kbqfe kbsiteserv300sp4fix KB250617