C# Definition:

     [ComImport(), InterfaceType(ComInterfaceType.InterfaceIsDual), Guid("fd8256d0-fd15-11ce-abc4-02608c9e7553")]
     interface IADs
    {
        [DispId(2)]
        [return: MarshalAs(UnmanagedType.BStr)]
        string Name();
        [DispId(3)]
        [return: MarshalAs(UnmanagedType.BStr)]
        string Class();
        [DispId(4)]
        [return: MarshalAs(UnmanagedType.BStr)]
        string Guid();
        [DispId(5)]
        [return: MarshalAs(UnmanagedType.BStr)]
        string ADsPath();
        [DispId(6)]
        [return: MarshalAs(UnmanagedType.BStr)]
        string Parent();
        [DispId(7)]
        [return: MarshalAs(UnmanagedType.BStr)]
        string Schema();
        [DispId(8)]
        void GetInfo();
        [DispId(9)]
        void SetInfo();
        [DispId(10)]
        [return: MarshalAs(UnmanagedType.Struct)]
        object Get(string bstrName);
        [DispId(11)]
        void Set(
            [MarshalAs(UnmanagedType.BStr)]
            string bstrName,
            [MarshalAs(UnmanagedType.Struct)]
        object vProp);
        [DispId(0xc)]
        [return: MarshalAs(UnmanagedType.Struct)]
        object GetEx(
            [MarshalAs(UnmanagedType.BStr)]
            string bstrName);
        [DispId(0xd)]
        void PutEx(int lngControlCode,
                [MarshalAs(UnmanagedType.BStr)]
             string bstrName,
                [MarshalAs(UnmanagedType.Struct)]
            object vProp);

        [DispId(0xe)]
        void GetInfoEx(
        [MarshalAs(UnmanagedType.Struct)]
        object vProperties, int lnReserved);

    }!!!!VB Definition:
<ComImport> _
<Guid("TODO")> _
'TODO: Insert <InterfaceType(ComInterfaceType.InterfaceIsIUnknown)> _ if this doesn't derive from IDispatch
Interface +
   TODO
End Interface

User-Defined Types:

None.

Sample invocation:

var obj = System.Runtime.InteropServices.Marshal.BindToMoniker("IIS://localhost/W3SVC") as IADs;