最新下载
热门教程
- 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
相关文章
- 三角洲行动航天基地每日密码4月21日-航天基地4月21日密码 05-15
- 樱花漫画官方正版下载入口-优质漫画平台最新版本免费下载 05-15
- 哔咔漫画-哔咔漫画官网PicAcg 05-15
- 藏剑技能攻略（探索古老武学的无尽魅力，提升你的剑术水平） 05-15
- 《征服战场，以太史慈技能攻略大揭秘》（操控技巧与战术思路，让你无往不胜） 05-15
- 搜狗浏览器网页版直达-搜狗搜索2026网页版快捷入口 05-15