截取字符串特定部分内容函数<%’******************************’函数：GetKey(HTML,Start,Last)’参数：HTML,待截取的原字符串；tart,截取开始标记；last,截取结束标记’作者：阿里西西’日期：2007/7/12’描述：截取字符串函数，从Start开始截取，到Last为结束’示例：<%=GetKey("阿里西西，国内最大的WEB开发资源","最大的","资源")%>’******************************Function GetKey(HTML,Start,Last)filearray=...

看到很多人需要，就放出来，好东西大家一起分享。 [code]Function content_Code(Str)   dim ary_String,i,n,n_pos   ary_String=split(Str,"[ code ]")   n=ubound(ary_String)   If n<1 then    content_Code=Str &...

<%’’获取访问者的地址ip=Request.ServerVariables("REMOTE_ADDR") ’’允许的IP地址段为10.0.0.0～10.68.63.255allowip1="10.0.0.0"allowip2="10.68.10.71"response.write checkip(ip,allowip1,allowip2)function checkip(ip,allowip1,allowip2)dim check(4)checkip=falseipstr=split(ip,".")allow1=split(allowip1,"....

最近网上流行着一些采集程序,更多人拿着这些东西在网上叫卖,很多不太懂的人看着那些程序眼羡,其实如果你懂一些ASP,了解自动采集程序的原理后,你会感觉实现自动化也是那么的简单.原理及优点:通过XML中的XMLHTTP组件调用其它网站上的网页，然后批量截取或替换原有的信息使其转化成变量后再一一储存到数据库中。其主要的优点便是无需再手工添加大量的信息了，可以指定对某一个站信息的截取进行批量录入，达到省时省力的目的。与其单纯的ASP小偷程序不同的是:它已经不再依赖其目标网站。简单事例:[code] <%  ’声明取得目标信息的函数,通过XML组件进行实现。 ...

1、将下面的文本文件下载,并将.TXT改为remote.asp,里面有具体设置方法[code]<% ’添加资源时是否保存远程图片Const sSaveFileSelect=True’远程图片保存目录,结尾请不要加“/”Const sSaveFilePath="/images/News"’远程图片保存类型Const sFileExt="jpg|gif|bmp|png"’/////////////////////////////////////////////////////’作 用：替换字符串中的远程文件为本地文件并保存远程文件’参&nbs...