% set fs=Server.CreateObject("Scripting.FileSystemObject") Set fr=fs.OpenTextFile(Server.MapPath("Cache/cp.txt")) cp=fr.readall Set fr=fs.OpenTextFile(Server.MapPath("Cache/honor.txt")) honor=fr.readall Set fr=fs.OpenTextFile(Server.MapPath("Cache/news.txt")) news=fr.readall fr.close set fr=nothing set fs=nothing %>
|
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||