<%
function readtxt(FileName)
set fso=server.createobject("scripting.filesystemobject")
set obj_file=fso.opentextfile(server.mappath(FileName))
str=obj_file.readall
readtxt=mid(str,instr(str,"[")+1,instr(str,"]")-(instr(str,"[")+1))
End function
set fso=server.createobject("scripting.filesystemobject")
set obj_file=fso.opentextfile("c:\liu.htm")
str=obj_file.readall
str=mid(str,instr(str,"[")+1,instr(str,"]")-2)
set fso=createobject("scripting.filesystemobject")
set obj_file=fso.opentextfile("c:\liu.htm")
str=obj_file.readall
str=mid(str,instr(str,"[")+1,instr(str,"]")-2)