编写一个ASP程序,从磁盘中读取它自身,并将其代码显示在客户端浏览器上(注意:必须对它进行HTML格式化编码)。显示格式自定。

admin2014-08-26  28

问题 编写一个ASP程序,从磁盘中读取它自身,并将其代码显示在客户端浏览器上(注意:必须对它进行HTML格式化编码)。显示格式自定。

选项

答案显示脚本内容的程序: <%@LANGUAGE=vbscript%> <% Dim obits,strFile,objTextStream,strLine,strHTML Set objFS=Server.CreateObject(″Scripting.Files3,stemObject″) strFile=Server.MapPath(Request.ServerVariables(″SCRINAME″)) Response.Write”文件的物理路径是:”&strFile&”
” Set objTextStream=objFS.OpenTextFile(strFile,l,0) Response.write”ASP源程序如下:″
″ Do While objTextStream.AtEndoP3tream<>True strLine=objTextStream.ReadLine strHTML=Server.HTMLEncode(strLine) Response.Write strHTML&″
″&vberff Loop objTextStream.Close Set objTextStream=Nothing Set objFS=Nothing %>

解析
转载请注明原文地址:https://kaotiyun.com/show/XmNx777K
0

最新回复(0)