防盗链接ASP函数
简单介绍下功能吧:使用了ASP的一个对象ServerVariables(服务器环境变量),通过这个环境变量可以获取到真正的下载地址再通过一些简单的VBS内置函数破坏其真正地址的完整性。达到欺骗下载软件的功能。现附上源码提供大家学习。代码如下
简单介绍下功能吧:使用了ASP的一个对象ServerVariables(服务器环境变量),通过这个环境变量可以获取到真正的下载地址再通过一些简单的VBS内置函数破坏其真正地址的完整性。达到欺骗下载软件的功能。现附上源码提供大家学习。代码如下
代码如下:'**************************************************'函数名:R'作用:过滤非法的SQL字符'参数:strChar-----要过滤的字符'返回值:过滤后的字符'**********
比较复杂,可以支持多种逻辑符,包括+-andor空格等,并且根据需要随便增加。可以根据条件选择在那个表中搜索,对速度也做了优化,可以说是很快的。当然因为是以前写的,存在不少毛病。存储过程中用到几乎所有sqlserver的特性,如光标(记录集
本文给大家分享的qq在线查询功能代码非常简单,具体内容如下:这段程序的方法是利用XMLHTTP来读取腾讯网站的相应HTML代码获取QQ的头像,根据这个想法,我们还可以抓取很多其他网站的信息,如天气预报、新闻等等。<scriptlanguag
现在感觉真麻烦,下面这样够简单够清楚了吧?代码如下:<%Dimi,j,iColsi=0'//定义i进行循环iCols=3'//一行有几列(正整数)Response.Write("<tablewidth=""100%""borde
Rem将字符串转换为整形数据functiontoInteger(str,num)str=trim(str)ifstr=""ornotisnumeric(str)thentoInteger=numelsetoInteger=clng(str)
1.相对与比较老的环境,建议使用第二个setdbconnection=Server.CREATEOBJECT("ADODB.CONNECTION")DBPath=Server.MapPath("customer.mdb")dbconnect
SPServer对象的作用是访问有关服务器的属性和方法。实例此文件最后被修改的时间是?探测文件的最后更新时间。打开并读取某个文本文件本例会打开文件"Textfile.txt"以供读取。自制的点击计数器本例可从一个文件中读
在Google上搜一下,可以发现一大堆对ASP不好的评价,什么运行速度慢、异常处理机制不好、缺乏面向对象机制、开发效率低、漏洞多等等。为了让大家对ASP有个正确的认识,我先为它正名。一、ASP不慢,慢的是数据库几年前,我用动网论坛程序架了一
<%a="日本是中国的一个省|我们美丽中国的张家界!"b="中国,我们,张家界,日本,美国,苹果"b=split(b,",")a=split(a,"|")fork=0toubound(a)s=""n=""fori=0toubound(
代码如下:<%functionGetBot()'查询蜘蛛dims_agentGetBot=""s_agent=Request.ServerVariables("HTTP_USER_AGENT&qu
问题:1.访问ASP页面时,出现以下错误: ActiveServerPages错误'ASP0201' 错误无效的默认脚本语言 该应用程序地应的默认脚本语言无效2.查看HKEY_LOCAL_MACHINESOFTWARE
代码如下:<%'功能:显示数据库中表名、字段名、字段内容'原创:wangsdong'原创文章,转载请保留此信息,谢谢setrs=server.CreateObject("adodb.recordset")db="db1.mdb"set
'*************************************'检测是否只包含英文和数字'*************************************FunctionIsvalidValue(ArrayN,Str
用asp实现的代码批量修改程序,fso相关是因工作需要做的一个批量修改代码的小东西,拿出来与大家分享目前可以处理的文件类型:.asp.inc.htm.html具体类型可自行修改添加程序实现的功能:将源目录下的文件批量修改后存到目的目录下用它
asp解码url代码如下:<ahref="1.asp?action=<%=server.urlencode("你好")%>">asdf</a>解码函数[code]&
ASP中Split函数的用法分割截取字符串看几个例子就能理解了代码如下:mystr="1,2,3,4,5"mystr=split(mystr,",")fori=0toubound(mystr)resp
取得中文句子头一个字的大写拼音字母<%'******************************'函数:getpychar(char)'参数:char,任意中文字符或句子'作者:阿里西西'日期:2007/7/15'描述:取得中文句
我想做META关键字,比如我的标题显示ASP代码是:<% =objrs("Title")%>如果<% =objrs("Title")%>最终显示的标题如“字
文章背景:某天,我的一个同事给我看了CSDN上面的一篇关于编程语言排行榜的文章,里面我看到VB还是排名很不错的,我就说,asp(vbscript)确实挺不错。结果他就反驳我,说asp不好,很多东西很难实现。我说比如哪些东西?我开发了几年的a