DirectoryEntry error.... "Type expected."

I am getting a compilation error with the following code :

<script runat="server">


Public Class ActiveDirectory
    Public Function GetUserInfo(ByVal inSAM as String, ByVal inType as String) as String
        Try
            Dim sPath as String = "LDAP://myDomain.com/DC=mydomain,DC=com"
            Dim SamAccount as String = Right(inSam, Len(inSam) - InStr(inSam, "\"))
            Dim myDirectory as = New DirectoryEntry(sPath, "EnterPrise Admin", "Password")
            Dim mySearcher as New DirectorySearcher(myDirectory)
            Dim mySearchResultColl as SearchResultCollection
            Dim mySearchResult as SearchResult
            Dim myResultPropColl as ResultPropertyCollection
            Dim myResultPropValueColl as ResultPropertyValueCollection


        'Build LDAP query
            mySearcher.Filter = ("(&(objectClass=user)(samaccountname=" & SamAccount &"))")
            mySearchResultColl = mySearcher.Findall()


        'We only expect one user from the search
            Select Case mySearchResultColl.Count
                Case 0
                    Return "Null"
                    Exit Function
                Case is > 1
                    Return "Null"
                    Exit Function
             end select


         ' Get the search result from the collection
            mySearchResult = mySearchResultColl.Item(0)
         ' Get the properties, they contain the usefull info
            myResultPropColl = mySearchResult.Properties
         ' Return the requested property.. displayname, mail, etc
            myResultPropValueColl = myResultPropColl.Item(inType)


            Return CStr(myResultPropValueColl.Item(0))


            Catch ex as System.Exception
            ' Handle errors
        End try


    end function


    Dim sEmail as String = GetUserInfo(User.Identity.Name, "mail")


end class

The Error is Type Expected and its on the following line of code :

Dim myDirectory as = New DirectoryEntry(sPath, "EnterPrise Admin", "Password")

Any ideas ?

Re: DirectoryEntry error.... "Type expected."

You need to declare the type of object you are instantiating:

Dim myDirectory as DirectoryEntry = New DirectoryEntry(sPath, "EnterPrise Admin", "Password")

Re: DirectoryEntry error.... "Type expected."

I found out that the problem was actually to do with me not being able to import System.DirectoryServices I had to copy the .dll file to a bin folder in my applications folder

Re: DirectoryEntry error.... "Type expected."

That is also an issue, but with any strongly typed language, you will need to declare the type as well.