复制代码代码如下所示：
功能名称：readtextfile
效果：读文本文件以UTF-8格式的数据流对象使用。
----------------------------------------------------
功能readfromtextfile（FileURL，字符集）
如果FileURL = 或空（FileURL）然后
= readfromtextfile
退出功能
最后如果
如果Not FLib.IsReallyPath（FileURL）然后
FileURL = server.mappath（FileURL）
最后如果
微弱的STR
集STM = server.createobject（ADODB。流）
Stm。类型= 2在这种模式下读取
模式= 3
STM的字符集的字符集。
stm.open
stm.loadfromfile FileURL
STR = stm.readtext
STM。关闭
设置STM =无
readfromtextfile = str
端功能
-------------------------------------------------
功能名称：writetotextfile
效果：写一个文本文件以UTF-8格式的数据流对象使用。
----------------------------------------------------
功能writetotextfile（FileURL，ByVal Str，字符集）
如果FileURL = 或空（FileURL）然后
= writetotextfile
退出功能
最后如果
如果Not FLib.IsReallyPath（FileURL）然后
FileURL = server.mappath（FileURL）
最后如果
昏暗的隧道
集STM = server.createobject（ADODB。流）
Stm。类型= 2在这种模式下读取
模式= 3
STM的字符集的字符集。
stm.open
stm.writetext STR
stm.savetofile FileURL，2
stm.flush
STM。关闭
设置STM =无
端功能