hello
ok
here my program and the message d' error enclosure
Dim fd As FileDialog
fd.FastScroll = True
fd.FilePath = File.DirAssets
fd.FileFilter = ".png, .jpg" ' for example or ".jpg,.png" for multiple file types
ret = fd.Show("Etiquettes Vins", "Yes", "No", "Maybe", Null)
ToastMessageShow(ret & " : Path : " & fd.FilePath & CRLF & "File : " & fd.ChosenName, False)
Best Regards