DesktopMime.FromFile (gb.desktop)

Static Function FromFile ( Path As String ) As DesktopMime

Creates a DesktopMime object from the given file Path

Example, get a files mimetype..

Public Sub GetMimeType(sFilePath As String) As String

  Dim hMime As DesktopMime

  hMime = DesktopMime.FromFile(sFilePath)

  Return hMime.Type

End