一段用ASP查看ASP文件源码的程序.

请输入ASP文件名



<%
on error resume next
dim file
file=request.form("filename")
response.write file & "源程序如下

---

"
if trim(file)<> "" then
call showcode(file)
end if
%>