关于ASP使用stream读取文件内容后用replace替换内容
问题如题,我不熟悉ASP,大概知道原理那么用想用模版生成静态页,不过在替换标记内容时没成功不知道是我方法不对还是怎么的。麻烦丢个小DEMO给我...
问题如题,我不熟悉ASP,大概知道原理那么用
想用模版生成静态页,不过在替换标记内容时没成功
不知道是我方法不对还是怎么的。麻烦丢个小DEMO给我 展开
想用模版生成静态页,不过在替换标记内容时没成功
不知道是我方法不对还是怎么的。麻烦丢个小DEMO给我 展开
1个回答
展开全部
Function Admin_LoadFile(t0)
IF Len(t0)=0 Then Exit Function
t1=Empty
Set stm=Server.CreateObject("adodb.stream")
stm.Type=2'以本模式读取
stm.mode=3
stm.charset=CharSet'这里修改为你的文件的编码,utf-8,gb2312
stm.open
stm.loadfromfile Server.MapPath(t0)
t1=stm.readtext
stm.Close
Set stm=Nothing
IF Err Then
Admin_LoadFile="“"&t0&"”"&Err.Description:Err.Clear
Else
Admin_LoadFile=t1
End IF
End Function
IF Len(t0)=0 Then Exit Function
t1=Empty
Set stm=Server.CreateObject("adodb.stream")
stm.Type=2'以本模式读取
stm.mode=3
stm.charset=CharSet'这里修改为你的文件的编码,utf-8,gb2312
stm.open
stm.loadfromfile Server.MapPath(t0)
t1=stm.readtext
stm.Close
Set stm=Nothing
IF Err Then
Admin_LoadFile="“"&t0&"”"&Err.Description:Err.Clear
Else
Admin_LoadFile=t1
End IF
End Function
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询