<% function ReadFile(filename) on error resume next err.clear ‘ASP的一种校错方法 Const ForReading = 2 Const Create = false Dim FSO DIM TS DIM filepath DIM thefile Dim content ‘—————操作地址 Set FSO=server.createobject(scr ipting.filesystemobject) filepath