The server is not operational

From: CalSun (calsun_at_gmail.com)
Date: 07/20/05


Date: Wed, 20 Jul 2005 11:22:20 -0700

Hi all,

I really need your help on this problem. (no help for 1 day goolging).

I use form authentication on my 2 simple aspx pages.
User is redirected to login.aspx, then see the main content page.
I use LDAP to verify the user from a domain named Dserver where the AD users locate.

Everything works just fine on my laptop (localhost). I could verify the user from the Active Directory. I am also able to verify whether the user belongs to a group named AllowDogs and redirect accordingly (main content page or fail-message).

Problem: As I move this application to an existing IIS win2k3 std box, I failed to verify user from the Dserver. I got the error message "The server is not operational"

Here is my IsAuthenticated code:

Public Function IsAuthenticated(ByVal domain As String, ByVal act As String, ByVal ps As String) As Boolean

Dim domainAndAct As String = domain & "\" & act

Dim entry As DirectoryEntry = New DirectoryEntry(_path, domainAndAct, ps)

Try

Dim obj As Object = entry.NativeObject

Dim search As DirectorySearcher = New DirectorySearcher(entry)

search.Filter = "(SAMAccountName=" & act & ")"

search.PropertiesToLoad.Add("cn")

Dim result As SearchResult = search.FindOne()

If (result Is Nothing) Then

Return False

End If

'update the path to the user in the directory

_path = result.Path

_filterAttribute = result.Properties("cn").Item(0)

Catch ex As Exception

'Throw New Exception("Error authenticating user: " & ex.Message)

Return False

End Try

Return True

End Function

Thank you all for help/reading
--CalSun



Relevant Pages

  • Re: Save a File from a Text Box
    ... how do I get it to verify the path&file found in my text box; ... Function DriveExists(ByVal sDrive As String) As Boolean ... Public Function FileExistAs Boolean ... Dim blnResult As Boolean ...
    (microsoft.public.access.modulesdaovba)
  • Re: Post to a php form?
    ... processes the data and sends a redirect which my windows application ... Private Function GetPage2(ByVal URL As String, ... Dim web As New System.Net.WebClient ... a windows app to a form. ...
    (microsoft.public.dotnet.framework.webservices)
  • Re: Trouble Using DataAdapter.Update()
    ... You have to define Update/Insert/Delete commands for dad2 - verify what has SqlCommandBuilder done for you by inspecting them. ... Dim TextConn As New ... ' Verify that the data is corect by binding to a gridview for visual display ...
    (microsoft.public.dotnet.framework.adonet)
  • Re: Transitioning from Passive Error Flagging to Automatic Correction?
    ... Dim rngData As Range ... 'define the 2 cells that you want to validate / fix ... VERIFY THE PRESENCE OF VALUE ...
    (microsoft.public.excel.programming)
  • Cant convert to MDE after adding refresh links functions
    ... now I can't convert that database to MDE format. ... Dim objFileDialog As FileDialog ... 'Verify connection information in linked tables. ... Dim cat As ADOX.Catalog ...
    (comp.databases.ms-access)

Loading