代码如下:function FSOlastline(filename) dim fso,f,temparray,tempcnt set fso = server.CreateObject(“scr ipting.filesystemobject”) if not fso.fileExists(server.mappath(filename)) then exit function set f = fso.opentextfile(server.mappath(filename),1) if no