ASP网页编程之一个功能更壮大的函数,也是用正则表达...
Windows本身的所有问题都会一成不变的也累加到了它的身上。安全性、稳定性、跨平台性都会因为与NT的捆绑而显现出来;函数|正则<%OptionExplicit
FunctionstripHTML(strtext)
dimarysplit,i,j,strOutput
arysplit=split(strtext,"<")
iflen(arysplit(0))>0thenj=1elsej=0
fori=jtoubound(arysplit)
ifinstr(arysplit(i),">")then
arysplit(i)=mid(arysplit(i),instr(arysplit(i),">")+1)
else
arysplit(i)="<"&arysplit(i)
endif
next
strOutput=join(arysplit,"")
strOutput=mid(strOutput,2-j)
strOutput=replace(strOutput,">",">")
strOutput=replace(strOutput,"<","<")</P><P>stripHTML=strOutput
EndFunction
%>
<formmethod="post"id=form1name=form1>
<b>EnteranHTMLString:</b><br>
<textareaname="txtHTML"cols="50"rows="8"wrap="virtual"><%=Request("txtHTML")%></textarea>
<inputtype="submit"value="StripHTMLTags!"id=submit1name=submit1>
</form></P><P><%ifLen(Request("txtHTML"))>0then%>
<hr>
<b><u>Viewofstring<i>withno</i>HTMLstripping:</u></b><br>
<xmp>
<%=Request("txtHTML")%>
</xmp>
<b><u>Viewofstring<i>with</i>HTMLstripping:</u></b><br>
<pre>
<%=StripHTML(Request("txtHTML"))%>
</pre>
<%EndIf%>
专业性的服务。有的ASP商提供垂直型的应用服务,针对某一特定行业提供应用服务。 Session:这个存储跟客户端会话过程的数据,默认20分钟失效 它可通过内置的组件实现更强大的功能,如使用A-DO可以轻松地访问数据库。 那么,ASP.Net有哪些改进呢? 最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。 掌握asp的特性而且一定要知道为什么。 下载一个源代码,然后再下载一个VBScript帮助,在源代码中遇到不认识的函数或是其他什么程序,都可以查帮助进行解决,这样学习效率很高。 它可通过内置的组件实现更强大的功能,如使用A-DO可以轻松地访问数据库。 运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。
页:
[1]