利用正则表达式去掉字符串中所有html内容,得到所有文本内容，去掉的内容有：div,img,超连接，script脚本等html内容。将以下例子保存为asp文件，运行一下就知道效果了。 % FunctionRemoveHTML(strText) DimRegEx SetRegEx=NewRegExp RegEx.Pattern=[^]* RegEx.Global=Tr...

2009-05-12 15:09:29

今天在网上看到防采集代码,我把它放到这里与大家共享。此代码的缺点是：也防了蜘蛛。 % DimAppealNum,AppealCount AppealNum=10'同一IP60秒内请求限制10次 AppealCount=Request.Cookies(AppealCount) IfAppealCount=Then response.Cookies(AppealCount)=1 AppealCount=...

2009-05-12 15:09:29

下面是一个去掉超链接的例子,改变一下,可以去掉其他的,如script、div、span等html代码 pahref='1.html'11111/a/pp2222/pp ahref='2.html'3333/a/pp44444/p 想得到的结果是: p11111/pp2222/pp3333/pp4444/p % FunctionregExReplace(sSource,patrn,replStr) DimregEx,str...

2009-05-12 15:08:51

图片采集程序，将一个图片保存到本机上，并重新命名。 % '================================================ '作用：保存远程的文件到本地 '参数：LocalFileName------本地文件名 'RemoteFileUrl------远程文件URL '返回值：True----成功 'False----失败 '===========...

2009-05-12 15:08:50

打开asp页面的时候,页面需要访问数据库,然后将要符合要求的内容,显示到页面上来。若数据库中的记录很多，那么、页面的访问速度也就相对变慢，通过以下方法，可以提高页面的访问速度。 技巧之一：提高使用Request集合的效率 访问一个ASP集合来提取一个值是费时的、占用...

2009-05-12 15:08:50

一、配置方法 1、开始---运行---dcomcnfg 2、组件服务---计算机---我的电脑---dcom配置---MicrosoftExcel应用程序(右键)---属性---安全 3、启动和激活权限选择自定义，点击编辑，添加用户everyone并给予所有权限 4、访问权限、配置权限同上 二、ASP对Excel的基本操作 1...

2009-05-12 15:08:50

有时候,需要获取网页的html代码,如新闻采集。采集之前，首页要得到被采集的页面的html代码，然后根据代码，分析出你想要得到的内容，最后将得到的内容保存到自己的数据库中 function.asp % Function getHTTPPage(url) On Error Resume Next dim http set http=Server.c...

2009-05-12 15:08:50

自动获取当前页面URL的ASP函数： % Function GetLocationURL() Dim Url Dim ServerPort,ServerName,ScriptName,QueryString ServerName = Request.ServerVariables(SERVER_NAME) ServerPort = Request.ServerVariables(SERVER_PORT) ScriptName = Request.ServerVariab...

2009-05-12 15:08:11

asp检测conn.execute是否执行成功的函数： sql=update conn.execute(sql) 如何检测conn.execute更新成功? dim a sql=update conn.execute sql,a if a=1 then response.write 更新成功 else response.write 更新失败 end if...

2009-05-12 15:08:11

有时候缓存会给程序带来很大的麻烦，这段代码是用来清空IE缓存里的内容 1.禁止客户端缓存要在head中加入类似如下内)： META HTTP-EQUIV=pragma CONTENT=no-cache META HTTP-EQUIV=Cache-Control CONTENT=no-cache, must-revalidate META HTTP-EQUIV=expires CONTENT=We...

2009-05-12 15:08:11