从工作组IIS安装向AD进行身份验证

Question

我正在使用经典的ASP（我知道我应该继续使用ASP.NET）和工作组IIS安装。我可以获取它以对AD进行身份验证吗？因此，到目前为止，它只是不会连接到AD。

它可以在我的桌面上正常工作，该桌面已加入域，没有任何麻烦，但是相同的代码将无法在工作组计算机上工作。

Session( "signon_domain" ) = UCase( strSignOnDomain )
Session( "signon_userid" ) = LCase( strSignOnUserID )

' Set the AD path to connect to
strADsPath = "WinNT://" & strSignOnDomain

' Bind to the AD path
Set objADsPath = GetObject( strADsPath )

' Get the namespace
strADsNamespace = "WinNT:"

' Bind to the namespace
Set objADsNamespace = GetObject( strADsNamespace )

' Turn on error handling
On Error Resume Next

' Connect to AD with the provided credentials
Set objADsAuthenticate = objADsNamespace.OpenDSObject( strADsPath, strSignOnDomain & "\" & strSignOnUserID, strSignOnPassword, 0 )

' Check for any errors
If Err.Number <> 0 Then
    ' Specify the error to display
    strMessage = "User ID or password or domain incorrect."
    Session( "signon" ) = ""
Else
    Session( "signon" ) = "successful"
End If

' Turn off error handling
On Error Goto 0

' Clear variables
Set objADsAuthenticate = Nothing
Set objADsNamespace = Nothing
Set objADsPath = Nothing
strADsNamespace = Empty
strADsPath = Empty

期望来自AD的响应，但它根本没有连接到AD。