Is there any way to check the file encode type? (ANSI or Unicode / UTF=8 etc)

This can be simply checked by open the file with NOTEPAD and click SAVEAS, then check in the "ENCODE" field.

Just don't know how to check it with vba, I have tried "ADODB.Stream.Charset" but it always return "Unicode" for all files with different encoder. And "Scripting.FileSystemObject" also can't do that.

Any idea?