去除网页源代码中的网页标签，只留文字部分 asp 函数
<%
Function RemoveHTML( strText )
Dim TAGLIST
TAGLIST = ";!--;!DOCTYPE;A;ACRONYM;ADDRESS;APPLET;AREA;B;BASE;BASEFONT;" &_
"BGSOUND;BIG;BLOCKQUOTE;BODY;BR;BUTTON;CAPTION;CENTER;CITE;CODE;" &_
"COL;COLGROUP;COMMENT;DD;DEL;DFN;DIR;DIV;DL;DT;EM;EMBED;FIELDSET;" &_
"FONT;FORM;FRAME;FRAMESET;HEAD;H1;H2;H3;H4;H5;H6;HR;HTML;I;IFRAME;IMG;" &_
"INPUT;INS;ISINDEX;KBD;LABEL;LAYER;LAGEND;LI;LINK;LISTING;MAP;MARQUEE;" &_
"MENU;META;NOBR;NOFRAMES;NOSCRIPT;OBJECT;OL;OPTION;P;PARAM;PLAINTEXT;" &_
"PRE;Q;S;SAMP;SCRIPT;SELECT;SMALL;SPAN;STRIKE;STRONG;STYLE;SUB;SUP;" &_
"TABLE;TBODY;TD;TEXTAREA;TFOOT;TH;THEAD;TITLE;TR;TT;U;UL;VAR;WBR;XMP;"
Const BLOCKTAGLIST = ";APPLET;EMBED;FRAMESET;HEAD;NOFRAMES;NOSCRIPT;OBJECT;SCRIPT;STYLE;"
Dim nPos1
Dim nPos2
Dim nPos3
Dim strResult
Dim strTagName
Dim bRemove
Dim bSearchForBlock
nPos1 = InStr(strText, "<")
Do While nPos1 > 0
nPos2 = InStr(nPos1 + 1, strText, ">
相关文档：
'**************************************************
'函数名：FSOFileRead
'作 用：使用FSO读取文件内容的函数
'参 数：filename ----文件名称
'返回值：文件内容
'************** ......
摘自：http://zxlh168.blog.163.com/blog/static/7778614020098168638654/
<%
’FSO组件名称
dim FSObject
FSObject="Scripting.FileSystemObject"
’=========================================================
’◆是否支持组件
’=============================================== ......
首先贴代码：
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Dim objDic
Dim arr(2)
arr(0) = 0
arr(1) = 1
arr(2) = 2
Set objDic = Server.CreateObject("Scripting.Dictionary")
objDic.Add "key",arr
Response.Write("这是修改之前的值：" & objDic.Item("key")(0))
objDic.Item("key")(1) = ob ......
1，在web服务器上安装Oracle数据库客户端，这是连接Oracle数据库的基础（但，不一定是必须的）。
2，在客户端的Net Manager 中进行配置服务的名称，配置如图（这一点非常的重要以后的链接全都在这个服务名称的基础上进行的）
3，ASP链接服务的链接字符串和方法如下：
<%
connstr= "Provider=MSDAORA.1;Password=***; ......
在将 ASP.NET Web 部件的集成控件集中的控件包括在网页中时，这些控件将遵守该页的规则；具体而言就是，这些控件将在该页的生命周期内运行。
每个网页都具有一个生命周期，网页在其生命周期内将执行一系列处理步骤。这些步骤包括初始化、创建控件、还原和维护状态、运行事件处理程序代� ......
