.

    ,BINDSTATUS_MIMETYPEAVAILABLE

.

    ,BINDSTATUS_VERIFIEDMIMETYPEAVAILABLE

.

    ,BINDSTATUS_LOADINGMIMEHANDLER

.

    ,BINDSTATUS_FILTERREPORTMIMETYPE

.

    ,BINDSTATUS_RAWMIMETYPE

.

    ///The request is missing a required SMIME capabilities extension.

.

    [Description("The request is missing a required SMIME capabilities extension.")]

.

    public const int CERTSRV_E_SMIME_REQUIRED = unchecked((int)0x80094805);

.

    ///Signing certificate cannot include SMIME extension.

.

    [Description("Signing certificate cannot include SMIME extension.")]

.

    public const int XENROLL_E_KEYSPEC_SMIME_MISMATCH = unchecked((int)0x80095005);

.

    '''The request is missing a required SMIME capabilities extension.

.

    <Description("The request is missing a required SMIME capabilities extension.")> _

.

    Public Const CERTSRV_E_SMIME_REQUIRED As Integer = CInt(&H80094805UI)

.

    '''Signing certificate cannot include SMIME extension.

.

    <Description("Signing certificate cannot include SMIME extension.")> _

.

    Public Const XENROLL_E_KEYSPEC_SMIME_MISMATCH As Integer = CInt(&H80095005UI)

.

        FEATURE_MIME_HANDLING = 2,

.

        FEATURE_MIME_SNIFFING = 3,

.

Summary

Determines the MIME type from the data provided.

.

Documentation

[FindMimeFromData] on MSDN

.

    static extern int FindMimeFromData(IntPtr pBC,

.

             [MarshalAs(UnmanagedType.LPWStr)]  string pwzMimeProposed,

.

          int dwMimeFlags,

.

          out IntPtr ppwzMimeOut,

.

VB.NET dwMimeFlags: (http://msdn.microsoft.com/en-us/library/ie/ms775107(v=vs.85).aspx)

.

<Flags()> Public Enum MIMEFlags As UInteger

.

    ''' <summary>Internet Explorer 6 for Windows XP SP2 and later. Use MIME-type detection even if FEATURE_MIME_SNIFFING is detected. Usually, this feature control key would disable MIME-type detection.</summary>

.

    EnableMIMESniffing = &H2

.

    ''' <summary>Internet Explorer 6 for Windows XP SP2 and later. Perform MIME-type detection if "text/plain" is proposed, even if data sniffing is otherwise disabled. Plain text may be converted to text/html if HTML tags are detected. </summary>

.

    IgnoreMIMETextPlain = &H4

.

    ''' <summary>Internet Explorer 8. Use the authoritative MIME type specified in pwzMimeProposed. Unless <see cref="MIMEFlags.IgnoreMIMETextPlain "/> is specified, no data sniffing is performed.</summary>

.

    ServerMIME = &H8

.

    ''' <summary>Internet Explorer 9. Do not perform detection if "text/plain" is specified in pwzMimeProposed.</summary>

.

    ReturnUpdatedImgMIMEs = &H20

.

    Private Shared Function FindMimeFromData( _

.

        ByVal pwzMimeProposed As String, _

.

        ByVal dwMimeFlags As Integer, _

.

        ByRef ppwzMimeOut As String, _

.

    Public Declare Function FindMimeFromData Lib "urlmon.dll" ( _

.

        ByVal pwzMimeProposed As String, _

.

        dwMimeFlags As Long, _

.

        ppwzMimeOut As Long, _

.

public string MimeTypeFrom(byte[] dataBytes, string mimeProposed) {

.

   string mimeRet = String.Empty;

.

   if (mimeProposed != null && mimeProposed.Length > 0) {

.

     //suggestPtr = Marshal.StringToCoTaskMemUni(mimeProposed); // for your experiments ;-)

.

     mimeRet = mimeProposed;

.

   int ret = FindMimeFromData(IntPtr.Zero, null, dataBytes, dataBytes.Length, mimeProposed, 0, out outPtr, 0);

.

     mimeRet = Marshal.PtrToStringUni(outPtr);

.

     return mimeRet;

.

   return mimeRet;

.

Trace.Write("MimeType is " + MimeTypeFrom(Encoding.ASCII.GetBytes("%PDF-"), "text/plain"));

.

    public static string getMimeFromFile(string file)

.

        IntPtr mimeout;

.

        int result = FindMimeFromData(IntPtr.Zero, file, buf, MaxContent, null, 0, out mimeout, 0);

.

        string mime = Marshal.PtrToStringUni(mimeout);

.

        Marshal.FreeCoTaskMem(mimeout);

.

        return mime;

.

        string mime = getMimeFromFile(getImg);

.

    Public Shared Function getMimeFromFile(ByVal file As String) As String

.

    Dim mimeout As IntPtr

.

    Dim result As Integer = FindMimeFromData(IntPtr.Zero, file, buf, MaxContent, Nothing, 0, mimeout, 0)

.

    Dim mime As String = Marshal.PtrToStringUni(mimeout)

.

    Marshal.FreeCoTaskMem(mimeout)

.

    Return mime

.

    End Function 'getMimeFromFile

.

  result = FindMimeFromData(0, "file://c:/test/form1.frm", vbNullString, 0, vbNullString, 0, buffAddr, 0)

.

    public static PropertyKey PKEY_MIMEType = new PropertyKey( 0x0B63E350, 0x9CCC, 0x11D0, 0xBC, 0xDB, 0x00, 0x80, 0x5F, 0xCC, 0xCE, 0x04, 5);

.

    public static PropertyKey WPD_FORMAT_ATTRIBUTE_MIMETYPE = new PropertyKey(0xA0A02000, 0xBCAF, 0x4BE8, 0xB3, 0xF5, 0x23, 0x3F, 0x23, 0x1C, 0xF5, 0x8F, 3);

.

        /// The request is missing a required SMIME capabilities extension.

.

        public const int CERTSRV_E_SMIME_REQUIRED = (int)(0x80094805 - 0x100000000);

.

        /// Signing certificate cannot include SMIME extension.

.

        public const int XENROLL_E_KEYSPEC_SMIME_MISMATCH = (int)(0x80095005 - 0x100000000);