Question get file Icons ?

[biplob.shee]

Hi,
I would like to get filenames from a directory and populate its name and icons in a listview.

I tried for the filename and succeded.

[COLOR=blue]Private[/COLOR] [COLOR=blue]Sub[/COLOR] PopulateData() [COLOR=#008000][I]'[/I][/COLOR][COLOR=#008000][I]// Filename (user.dat) into listview
[/I][/COLOR][COLOR=blue]Dim[/COLOR] FilePath [COLOR=blue]As[/COLOR] [COLOR=blue]String[/COLOR] = Application.StartupPath & [COLOR=purple]"[/COLOR][COLOR=purple]\users\"[/COLOR]
[COLOR=blue]Dim[/COLOR] ContentItem [COLOR=blue]As[/COLOR] [COLOR=blue]String[/COLOR] = Dir(FilePath & [COLOR=purple]"[/COLOR][COLOR=purple]*.dat"[/COLOR])
ListView1.Items.Clear()
[COLOR=blue]If[/COLOR] ContentItem = [COLOR=purple]"[/COLOR][COLOR=purple]"[/COLOR] [COLOR=blue]Then[/COLOR]
     MsgBox([COLOR=purple]"[/COLOR][COLOR=purple]No users found."[/COLOR])
[COLOR=blue]End[/COLOR] [COLOR=blue]If[/COLOR]
[COLOR=blue]Do[/COLOR] Until ContentItem = [COLOR=purple]"[/COLOR][COLOR=purple]"[/COLOR]
     ListView1.Items.Add(ContentItem)
     ContentItem = Dir()
[COLOR=blue]Loop[/COLOR]
[COLOR=blue]End[/COLOR] [COLOR=blue]Sub[/COLOR]

and I am populating the listview in form loading event.

[COLOR=blue]Private[/COLOR] [COLOR=blue]Sub[/COLOR] FormCreateUser_Load([COLOR=blue]ByVal[/COLOR] sender [COLOR=blue]As[/COLOR] System.[COLOR=blue]Object[/COLOR], [COLOR=blue]ByVal[/COLOR] e [COLOR=blue]As[/COLOR] System.EventArgs) [COLOR=blue]Handles[/COLOR] [COLOR=blue]MyBase[/COLOR].Load
     PopulateData()
[COLOR=blue]End[/COLOR] [COLOR=blue]Sub[/COLOR]

"users" is a folder from where I want to get the filename details.

But I want to get the file icons also and I don't know how to do this.

Please help.

 

[jmcilhinney]

Use the Icon.ExtractAssociatedIcon method.