FSO的奇怪问题

tanky

我用FSO的WriteLine方法批量向文本文件写入字符串，已经成功的插入了一些字符串。

当插入某条特定的字符串时报错：“无效的过程调用或参数”。当我手工将这个字符串复制

到文本文件（用记事本打开）点击保存的时候，记事本提示：

该文件含有Unicode格式的字符，当文件保存为ANSI 编码的文本文件时，该字符将丢失......

我想程序出错也应该是由于插入了Unicode格式的字符串造成的。可我的代码要怎么应对这种格

式的字符串呢？

陈能技

FSO默认打开文件是以ASCII码格式打开的，可以指定格式参数为TristateTrue 以Unicode格式读写文件：
TristateTrue ：Open the file as Unicode.
TristateFalse ：Open the file as ASCII.
TristateUseDefault ：Open the file using the system default.

tanky

回楼上的，三个参数我之前都试过了，不行。

dycadrtf

关注

陈能技

把代码贴出来瞧瞧

tanky

由于我的WriteLine的内容来自另外一个文本文件的读入
所以帖出打开、写入，两段代码，都是QTP Plus上的：
'打开文本文件
Function OpenFile (FilePath,mode)
    set OpenFile = oFSO.OpenTextFile(FilePath, mode, False,0)
End Function
'写文本文件
Function WriteToFile (byref FileRef,str)
   FileRef.WriteLine(str)
End Function
这其中OpenTextFile的最后一个参数的几种情况都试过了，都不行。

陈能技

把
set OpenFile = oFSO.OpenTextFile(FilePath, mode, False,0)
换成：
set OpenFile = oFSO.OpenTextFile(FilePath, mode, False,TristateTrue )
也不行吗？

或者不要用WriteLine，改用Write。

tanky

确实太奇怪了，一个文档里面就两条数据，加工后输入到文本文件时出错。

其它都没问题。而且如果在QTP里面Debug的话，用msgbox或print都能成功显示这两条数据。

[ 本帖最后由 tanky 于 2008-7-25 09:36 编辑 ]

陈能技

使用DoNETFactory来调用.NET的文件读写类试试吧