贴两个函数,大家帮我看看其中一个函数的作用啊!
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-->