ADSI - The server is not operational

Discussion in 'Scripting' started by Gordon Rose, Oct 7, 2009.

  1. Gordon Rose

    Gordon Rose Guest

    Hi, I have installed a W2K3 domain controller and have installed Certificate Services on the computer. I have also installed the CA's root certificate in the Trusted Root Certification Authorities folder of a remote, non-domain member computer.

    When I run the following simple VBS script on the DC, it works fine. When I run it on the non-domain member computer, it fails with the message "The service is not operational". Anyone have ideas?

    set objOU = objLDAP.OpenDSObject("LDAP://myserver.MyDomain.local:636/cn=users,dc=MyDomain,dc=local", _
    "", _
    "Password1", _
    ADS_SECURE_AUTHENTICATION + ADS_USE_SSL)

    WScript.Echo objOU.Get("cn")

    Thanks,

    Gordon

    EggHeadCafe - Software Developer Portal of Choice
    SAPI 5.1: Voice - Enabled Applications With VB
    http://www.eggheadcafe.com/tutorial...ab58-90633f7ae7e4/sapi-51-voice--enabled.aspx
     
    Gordon Rose, Oct 7, 2009
    #1
    1. Advertisements

  2. Gordon Rose

    Gordon Rose Guest

    Here is the code again

    ADS_SECURE_AUTHENTICATION = 1
    ADS_USE_SSL = 2

    set objLDAP = GetObject("LDAP:")


    set objOU = objLDAP.OpenDSObject("LDAP://myserver.MyDomain.local:636/cn=users,dc=MyDomain,dc=local", _

    "", _

    "Password1", _
    ADS_SECURE_AUTHENTICATION + ADS_USE_SSL)

    WScript.Echo objOU.Get("cn")




    Gordon Rose wrote:

    ADSI - The server is not operational
    07-Oct-09

    Hi, I have installed a W2K3 domain controller and have installed Certificate Services on the computer. I have also installed the CA's root certificate in the Trusted Root Certification Authorities folder of a remote, non-domain member computer.

    When I run the following simple VBS script on the DC, it works fine. When I run it on the non-domain member computer, it fails with the message "The service is not operational". Anyone have ideas?

    set objOU = objLDAP.OpenDSObject("LDAP://myserver.MyDomain.local:636/cn=users,dc=MyDomain,dc=local", _
    "", _
    "Password1", _
    ADS_SECURE_AUTHENTICATION + ADS_USE_SSL)

    WScript.Echo objOU.Get("cn")

    Thanks,

    Gordon

    EggHeadCafe - Software Developer Portal of Choice
    VB.NET Event Managment / Logging through Publisher / Subsriber Pattern
    http://www.eggheadcafe.com/tutorial...8192-bfdf6fef6500/vbnet-event-managment-.aspx
     
    Gordon Rose, Oct 7, 2009
    #2
    1. Advertisements

  3. Gordon Rose

    Gordon Rose Guest

    ADS_SECURE_AUTHENTICATION = 1
    ADS_USE_SSL = 2

    set objLDAP = GetObject("LDAP:")


    set objOU = objLDAP.OpenDSObject("LDAP://myserver.MyDomain.local:636/cn=users,dc=MyDomain,dc=local", _
    "", _
    "Password1", _
    ADS_SECURE_AUTHENTICATION + ADS_USE_SSL)

    WScript.Echo objOU.Get("cn")




    Gordon Rose wrote:

    Oops - code didn't paste correctly
    07-Oct-09

    Here is the code again

    ADS_SECURE_AUTHENTICATION = 1
    ADS_USE_SSL = 2

    set objLDAP = GetObject("LDAP:")


    set objOU = objLDAP.OpenDSObject("LDAP://myserver.MyDomain.local:636/cn=users,dc=MyDomain,dc=local", _

    "", _

    "Password1", _
    ADS_SECURE_AUTHENTICATION + ADS_USE_SSL)

    WScript.Echo objOU.Get("cn")

    EggHeadCafe - Software Developer Portal of Choice
    ASP.NET DataList and DataRepeater Controls
    http://www.eggheadcafe.com/tutorial...b2-a3db1af393f5/aspnet-datalist-and-data.aspx
     
    Gordon Rose, Oct 7, 2009
    #3
  4. I replied a few days ago, but since I still don't see it, I'll try again. My
    suggestion was to try ADS_SERVER_BIND instead of ADS_USE_SSL. For example:
    ===========
    ' ADS Authentication constants that can be used.
    Const ADS_SECURE_AUTHENTICATION = &H1
    Const ADS_SERVER_BIND = &H200

    Set objOU =
    objLDAP.OpenDSObject("LDAP://MyServer/cn=users,dc=MyDomain,dc=local", _
    , "Password1", _
    ADS_SECURE_AUTHENTICATION Or ADS_SERVER_BIND)
     
    Richard Mueller [MVP], Oct 9, 2009
    #4
    1. Advertisements

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 (here). After that, you can post your question and our members will help you out.