最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
数据文件并设置编码
时间:2022-07-02 22:42:25 编辑:袖梨 来源:一聚教程网
function ReadText(FileName) '这是一个用于读出文本文件的函数
On Error Resume Next
set adf=server.CreateObject("Ado"&"db.Str"&"eam")
if instr(filename,":")<>0 then
path=filename
else
path=server.MapPath(FileName)
end if
with adf
' response.write path
.Type=2
.LineSeparator=13
.Open
.LoadFromFile (path)
.Charset="GB2312"
.Position=2
ReadText=.ReadText
.Cancel()
.Close()
end with
set adF=nothing
end function
相关文章
- 无痛单词怎么关闭单词自动发音 无痛单词关闭单词自动发音方法 07-16
- venera安卓版官方正版极速下载入口-venera安卓最新版自带漫画源安装包下载 07-16
- 阿里云企业邮箱手机端入口-阿里云企业邮箱手机端入口稳定访问技巧 07-16
- 异环怎么主动投案自首 07-16
- duyin抖音官网首页网页版官方入口-duyin抖音官网首页网页版官方地址 07-16
- 漫蛙manwa2(台版)-入口 07-16