vba 读取文件乱码问题

lok9828 2009-03-12 02:33:20
读取 Java文件(utf-8)格式保存的,
怎么读取得时候总是乱码呢。

通过以下2种方式都不可以

第一种:
Open sActionSampleFile For Input As #1
Open sActionFile For Append As #2
While Not EOF(1)
Line Input #1, sLine
'处理
Write #2, sLine
Wend
Close #1
Close #2

第二种
Set fso = CreateObject("Scripting.FileSystemObject")
Set oSample = fso.OpenTextFile(sActionSampleFile, 1, False)
sAllData = oSample.Readall
'处理
'写文件
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.OpenTextFile(sActionFile, 2, False, 0)
f.Write sAllData
f.Close



...全文
2594 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
arong1234 2009-03-15
  • 打赏
  • 举报
回复
fso对象功能有限,有些格式他不懂的
utf-8文件是不是就是没有头字节那种最普通的问题?如果是他就应该可以读
如果你说的utf-8是以FFFE开头的那种,我记得fso是读不了的。

5,138

社区成员

发帖
与我相关
我的任务
社区描述
其他开发语言 Office开发/ VBA
社区管理员
  • Office开发/ VBA社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧