-
将URL编码字符串转换成字串，或把字串转成URL编码
所属栏目：[Asp教程] 日期：2023-10-19 热度：9063
下面的代码是从kesion系统扒下的，确实不错，支持utf8格式。
复制代码 代码如下:
'================================================
'函数名：URLDecode
'作 用：URL解码
'=================[详细] -
Asp常见挂马方式汇总
所属栏目：[Asp教程] 日期：2023-10-18 热度：7407
一:框架挂马
<iframe src=地址 width=0 height=0></iframe>
其中“地址”处可以输入恶意网站链接等
二:js文件挂马
只要是JS文件，都可以通过被恶意修改从而被挂上恶意代码，一般被全站引用的J[详细] -
ASP中Server.Execute和Execute实现动态包括脚本的差异
所属栏目：[Asp教程] 日期：2023-10-18 热度：7407
最近打算尝试一下在ASP中实现MVC架构，肯定有人问我：ASP都淘汰了，为什么还研究？这点我也知道，自从微软放弃ASP 3.0转向ASP.NET后，ASP已经远远落后于和它几乎同时开始的PHP和JSP，开源比闭源的好处就像PHP和ASP一[详细]
-
ASP关于编码的几个实用的函数小结(utf8)
所属栏目：[Asp教程] 日期：2023-10-18 热度：7407
UTF转GB---将UTF8编码文字转换为GB编码文字
复制代码 代码如下:
function UTF2GB(UTFStr)
for Dig=1 to len(UTFStr)
'如果UTF8编码文字以%开头则进行转换
if mid(UTFStr,Dig,1)="%" then
'UTF8编码文[详细] -
Asp中Server.ScriptTimeOut属性需要注意的一点解析
所属栏目：[Asp教程] 日期：2023-10-18 热度：7407
这个属性的服务器默认值是90，单位是秒，我们可以通过这样的代码输出这个值：
复制代码 代码如下:
<%
Response.Write Server.ScriptTimeOut
Response.Write " Http://www.Cuoxin.com"
%>
由于IIS默认的Scrip[详细] -
经过ASP禁止指定IP和只允许指定IP访问网站的代码
所属栏目：[Asp教程] 日期：2023-10-18 热度：7407
一、禁止指定IP防问网站,并执行相应操作:
复制代码 代码如下:
<%
Dim IP,IPString,VisitIP
'设置IP地址，用“|”隔开
IPString="|192.168.0.42|192.168.0.43|"
'获取IP地址
IP = Request.S[详细] -
ASP网站出现 msxml3.dll 错误 80072ee7 错误的处理方式
所属栏目：[Asp教程] 日期：2023-10-18 热度：7407
这两天接到通知，说公司的一个网站访问不了，经访问发现页面提示如下错误：
复制代码 代码如下:
msxml3.dll 错误 '80072ee7'
The server name or address could not be resolved
看提示应该是域名或[详细] -
ASP JSON类文件的运用方法
所属栏目：[Asp教程] 日期：2023-10-18 热度：7407
而且要使用某个节点的时候要好好的分析，节点的路径一级级的定位。而JSON最大的好处就是，在使用时候可以只需要将数据字符串声明为一个对象，就可以很方便的调用对象中的各成员。也方便在客户端使用Javascript直接调[详细]
-
asp Fix、Int、Round、CInt函数使用介绍
所属栏目：[Asp教程] 日期：2023-10-18 热度：7407
Fix(number) 和 Int(number) 都是返回数字的整数部分。
number 为正数时，二者返回值一样。比如：Fix(3.6)=3，Int(3.6)=3。
number 为负数时，Fix 直接去除小数部分，Int 返回小于或等于 number 的第一个负整数。[详细] -
使用innerHTML时留意处理空格和回车符
所属栏目：[Asp教程] 日期：2023-10-18 热度：7407
代码如下：
复制代码 代码如下:
Function ReplaceEx(strOri,replStr)
Set regEx=New RegExp
regEx.Global=True
regEx.MultiLine=True
regEx.Pattern="/r/n"
regEx.IgnoreCase=True
ReplaceEx=regEx.Replace([详细] -
Asp限制IP访问 抑制某一个IP段禁止访问本站的代码
所属栏目：[Asp教程] 日期：2023-10-18 热度：7407
复制代码 代码如下:
<%
''获取访问者的地址
ip=Request.ServerVariables("REMOTE_ADDR")
''允许的IP地址段为10.0.0.0～10.68.63.255
allowip1="10.0.0.0"
allowip2="10.68.10.71"
response.w[详细] -
一个asp CutStrX自定义字符串截取函数
所属栏目：[Asp教程] 日期：2023-10-17 热度：9870
复制代码 代码如下:
Function CutStrX(ByVal Str,ByVal StrLen)
Dim l,t,c,i,r
'过滤全部HTML标记
Set r=New RegExp
r.Global=True
r.MultiLine=True
r.Pattern="(</?[A-Za-z][A-Za-z0-9]*[^>]*>)"
st[详细] -
较为完善的asp防CC攻击代码分享
所属栏目：[Asp教程] 日期：2023-10-17 热度：9870
复制代码 代码如下:
<%
Dim CC_Info(4),strInfo,strTemp
If Session("CC_Info") = "" Then
CC_Info(0) = "cclog.txt" '日志文件名
CC_Info(1) = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
CC_Info[详细] -
asp页面遇到Response 对象 错误 ASP 0156
所属栏目：[Asp教程] 日期：2023-10-17 热度：9870
其实这类问题就是因为缓存问题，大家可以参考下面的方法解决:
有些ASP页面第一次打开的时候会出现Response 对象 错误 'ASP 0156 : 80004005' HTTP 头错误，但刷新后又正常了，解决方法如下
复制代码 代码[详细] -
从一个网站扒下的asp形成静态页面的代码
所属栏目：[Asp教程] 日期：2023-10-17 热度：9870
复制代码 代码如下:
<%
webfolder="/"
host="index_cn.asp"'前台动态地址
folder="/"'文件夹
filename="index_cn.html"'生成静态文件名
Fso_info host,folder,filename
response.write"生成网站中[详细] -
VBScript ASP CDbl() 函数转换成双精度类型
所属栏目：[Asp教程] 日期：2023-10-17 热度：9870
CDbl 函数
返回表达式，此表达式已被转换为 Double 子类型的 Variant。
CDbl(expression)
expression 参数是任意有效的表达式。
说明
通常，您可以使用子类型数据转换函数书写代码，以显示某些操作的结[详细] -
ASP Eval、Execute、ExecuteGloba不同分析
所属栏目：[Asp教程] 日期：2023-10-17 热度：2137
Eval 计算一个表达式的值并返回结果。
语法：[result = ]eval_r(expression_r)
expression_r 为任意有效 VBScript 表达式的字符串
示例：
复制代码 代码如下:
response.Write(eval_r("3+2")) '输出 5
"3[详细] -
保护 ASP.NET 不受攻击的完全保障
所属栏目：[Asp教程] 日期：2023-10-17 热度：2137
下面给出4个函数，足够你抵挡一切SQL注入漏洞！读懂代码，你就能融会贯通。
注意要对所有的request对象进行过滤：包括 request.cookie, request.ServerVariables 等等容易被忽视的对象：
程序代码
复制代码 代[详细] -
ASP中读取出Excel表格名称的实现代码
所属栏目：[Asp教程] 日期：2023-10-17 热度：2137
看代码：
复制代码 代码如下:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
dim conn,rs,excelFileName
excelFileName=Server.MapPath("Data/test.xls")
set conn = Server.CreateObject("ADODB.Connection"[详细] -
asp清除html的函数代码分析
所属栏目：[Asp教程] 日期：2023-10-17 热度：2137
下面这段代码，不会替换ld<sad中间的<，所以内容仍然是正常的
复制代码 代码如下:
<%
function nohtml(str)
dim re
Set re=new RegExp
re.IgnoreCase =true
re.Global=True
re.Pattern="(/<.[^/<]*/>)"
str[详细] -
Asp下Access无法更新的处理方法
所属栏目：[Asp教程] 日期：2023-10-16 热度：6090
在windows＋iis服务器上运行asp程序可能会出现数据库无法更新的情况，具体错误信息可能为：
1、Microsoft JET Database Engine (0x80040E09) 不能更新。数据库或对象为只读
2、Microsoft OLE DB Provider for [详细] -
asp中记录集对象的getrows和getstring用法解析
所属栏目：[Asp教程] 日期：2023-10-16 热度：6090
GetRows 方法
将 Recordset 对象的多个记录复制到数组中。
语法
复制代码 代码如下:
array = recordset.GetRows( Rows, Start, Fields )
返回值
返回二维数组。
参数
Rows 可选，长整型表达式，指定要检索[详细] -
ASP:ActiveX不支持创建Scripting.FileSystemObject对象解决办法
所属栏目：[Asp教程] 日期：2023-10-16 热度：6090
今天遇到个问题，一个ASP网站生成静态页面时报错：
Microsoft VBScript 运行时错误 错误 '800a01ad'
ActiveX 部件不能创建对象: 'Scripting.FileSystemObject'
其实这个问题比较常见，报错原[详细] -
判别dll文件是否已经注册的ASP函数代码
所属栏目：[Asp教程] 日期：2023-10-16 热度：6090
asp判断服务器是否安装了某个组件，也就是是否安装了某个dll文件，判断某个组件是否在服务器注册了，asp组件很多，它的判断可以减少很多asp错误，主要是用下面的函数：
复制代码 代码如下:
<%
'功能:检查是否[详细] -
asp短信接口源码 比较简单但也非常实用用的
所属栏目：[Asp教程] 日期：2023-10-16 热度：6090
写法一：
复制代码 代码如下:
<%
Sub sendsms(mobile,msg)
'如需要发送多个手机号，请自动循环，多个手机号之间用“,”分隔，最后手机号码后不加,号
'或调用我们 HttpInterfaceMore.aspx 接口[详细]
