---
title: "Fil-info?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/dotnet/159863-fil-info"
topic: ".NET"
topic_url: "https://www.webforum.nu/amne/dotnet"
author: "Travoni"
published: "2007-05-02T15:37:23.000Z"
updated: "2007-05-02T18:08:03.000Z"
replies: 2
views: 220
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/dotnet/159863-fil-info"
---

# Fil-info?

## #1 — Travoni, 2007-05-02T15:37Z

Namnet = file.Name, o.s.v. men är det någon som vet hur man får reda på filens typ? 

```
Dim currentDirectory As IO.DirectoryInfo = New IO.DirectoryInfo(mBasePath)

For Each file In currentDirectory.GetFiles()
                strFile = file.Name
'... Annat
Next
```

Med gamla FSO så kunde man få ut filtypen så att ex. pdf blev "Portable document file" o.s.v.

Permalänk: https://www.webforum.nu/p/159863

## #2 — joko, 2007-05-02T16:43Z

Extension finns som property i FileInfo, men det ger ju dig bara 'pdf' ifallet då det är en pdf-fil antar jag.

Permalänk: https://www.webforum.nu/p/1971351

## #3 — Travoni, 2007-05-02T18:08Z

Sökte lite och hittade denna funktion.

```
Import microsoft.win32

Private Function GetFileTypeFromRegistry(ByVal sFileExtension As String) As String

Dim myRegClsRoot As RegistryKey = Registry.ClassesRoot
Dim myRegKeyExt As RegistryKey
Dim myRegKeyFileType As RegistryKey
Dim sFileType As String

If Not sFileExtension.StartsWith(".") Then
sFileExtension = "." + sFileExtension
End If

myRegKeyExt = myRegClsRoot.OpenSubKey(sFileExtension, False)

If myRegKeyExt Is Nothing Then
Return "Unkown Extension"
End If

If myRegKeyExt.GetValue("") = "" Then
myRegKeyFileType.Close()
Return "Unknown Extension"
End If

myRegKeyFileType = myRegClsRoot.OpenSubKey(myRegKeyExt.GetValue(""), False)

sFileType = myRegKeyFileType.GetValue("")

myRegKeyFileType.Close()
myRegKeyExt.Close()

Return sFileType

End Function
```

Permalänk: https://www.webforum.nu/p/1971380

---

Tråden på webben: https://www.webforum.nu/amne/dotnet/159863-fil-info