读书人

贴两个函数大家帮小弟我看看其中一个

发布时间: 2012-02-12 17:16:33 作者: rapoo

贴两个函数,大家帮我看看其中一个函数的作用啊!
Function ReadTemplate(TemplateName)
Dim objFSO,objMyFSO
Set objFSO = Server.CreateObject( "Scripting.FileSystemObject ")
Set objMyFSO = objFSO.OpenTextFile(Server.MapPath(TemplateName),1,True) '读取文本文件
ReadTemplate = objMyFSO.ReadAll&info() '?这里的 info() 有什么作用呢?
objMyFSO.Close
Set objMyFSO = Nothing
Set objFSO = Nothing
End Function

function info()
dim str
str=chr(60)
str=str&chr(33)
str=str&chr(45)
str=str&chr(45)
str=str&chr(45286)
str=str&chr(51368)
str=str&chr(52217)
str=str&chr(54224)
str=str&chr(41914)
str=str&chr(50911)
str=str&chr(54466)
str=str&chr(46069)
str=str&chr(52164)
str=str&chr(47524)
str=str&chr(55287)
str=str&chr(51922)
str=str&chr(32)
str=str&chr(45)
str=str&chr(32)
str=str&chr(81)
str=str&chr(81)
str=str&chr(58)
str=str&chr(50)
str=str&chr(57)
str=str&chr(51)
str=str&chr(49)
str=str&chr(51)
str=str&chr(56)
str=str&chr(52)
str=str&chr(54)
str=str&chr(45)
str=str&chr(45)
info=str&chr(62)
end function

这里的 info() 有什么作用呢?

[解决办法]
<!--版权所有:七月初四工作室 - QQ:29313846-->

读书人网 >ASP

热点推荐