Foreign Characters in Filename - How to manage

[Jrams]

How to work around / with file names that contain non-Ascii characters, for example "Hush Gounod (Bachú Ave Maria).mp3"

Iterating through

 vStr = Dir("*.*")

returns files as above. Atempting

 Ln = filelen(vstr)

produces a "File not found" Error 53

FileSystemObjec t is also unable to "see" this file.

Are there any workarounds to access such named file?

[vijay6]

Hey Jrams, you can use like this,

Dim list As String() = System.IO.Directory.GetFiles("C:\Users\Public\Music\", "*.mp3") // To get all mp3 format file names including files with Non-ASCII characters

For Each item As var In list
	MessageBox.Show(item + " " + item.Length) // Display all file names with length.
Next

[Jrams]

vijay6, thanks for your response... but it makes me realize that I somehow got my query posted t the wrong forum. I need a solution in VB6 / VBA. Sorry to not be able to use your prompt help.

[Rabbit]

I will move your thread for you but I need to know if it's VB6 or VBA.

[Jrams]

Thanks, Rabbit... either will work, perhaps VB6 will have broader application?

[Rabbit]

Well... You'd get a more accurate response if you told me which language you're developing in.

[Jrams]

OK... the initial application will be for/in VBA.

[Jrams]

One workaround, but not a full solution, I have found:
var = dir() produces an ASCII result &, hence, the subsequent error

But originally acquiring the filename via FileSystemObjec t produces an ANSI result:

    Set fso = CreateObject("Scripting.FileSystemObject")
    Set ff = fso.GetFolder(FolderName)
    Set f = ff.Files
    For Each var in f

Hard to believe that a dir() iteration of say, Spanish filenames, produces an otherwise unusable pointer?