VBA 64位系统中,API创建FTP,获得指定路径文件名乱码

在VBA (Visual Basic for Applications) 中，在64位系统环境下处理FTP (File Transfer Protocol) 操作并获取文件名可能会遇到编码问题，特别是在从服务器下载文件时，如果服务器端的文件名包含非ASCII字符，可能会出现乱码显示。

当使用API (Application Programming Interface) 调用FTP命令，比如使用像Microsoft Scripting Runtime中的FTPFolder对象，它默认可能会受到系统的当前区域设置影响。如果你的系统默认字符集与服务器的字符集不一致，可能会导致文件名无法正确解码，显示成乱码。

解决这个问题的一般步骤包括：

1. 确认字符编码：首先检查服务器端使用的字符编码（如UTF-8、GBK等），然后在VBA中设置适当的字符编码转换。

Set objFtp = CreateObject("MSXML2.ServerXMLHTTP")
objFtp.Charset = "UTF-8" ' 或者服务器实际使用的字符编码

2. 文件接收后解码：在接收到文件内容后，需要将其正确地解码为可用的字符格式。你可以使用如`Mid$`函数配合`DecodeURIComponent`来尝试解码。

decodedFileName = DecodeURIComponent(Mid$(content, Find, Len(content)))