-
获取 ASP 中此页面所需之属性及数据的函数
所属栏目：[Asp教程] 日期：2023-10-20 热度：8026
复制代码 代码如下:
Function getCurrentUrl()
On Error Resume Next
Dim strTemp
If LCase(Request.ServerVariables("HTTPS")) = "off" Then
strTemp = "http://"
Else
strTemp = "https://"
End If
strTe[详细] -
asp 输出换行的详细描述
所属栏目：[Asp教程] 日期：2023-10-20 热度：8026
测试代码：输出简单的ul li
1.asp
复制代码 代码如下:
<%
response.write "<ul>"
response.write "<li>错新站长站</li>"
response.write "<li>www.Cuoxin.com</li>"
response.write "</ul>"
%>
结果是:右[详细] -
在ASP中可以使用CACHE的方式
所属栏目：[Asp教程] 日期：2023-10-20 热度：8026
在ASP输出页面只是调出数据库里内容展现给用户看没有使用SESSION等动态属性，是可以CACHE的，以加快访问速度，具体操作方法如下：
在asp程序页面顶上端加上：
<% @Language="VBScript" %>
<% Response.CacheC[详细] -
ASP checkbox复选框是否被选用的代码
所属栏目：[Asp教程] 日期：2023-10-20 热度：8026
有的时候，我们在网页中会用到复选框，也就是多选框，当用户提交输入信息的时候，我们会获取复选框的内容，然后保存到数据库中，如经常用到的是用户输入的个人信息。可是当用户提交后可能还需要修改，那么我们就要从[详细]
-
ASP获取日期单日期自动补零函数代码
所属栏目：[Asp教程] 日期：2023-10-20 热度：3667
复制代码 代码如下:
public function fillzero(l1)
if len(l1)=1 then
fillzero="0"&l1
else
fillzero=l1
end if
end function
用法示例：
复制代码 代码如下:
response year(now)&month(now)&day(now) [详细] -
利用asp获取微软安全更新列表的代码 小偷程序
所属栏目：[Asp教程] 日期：2023-10-20 热度：3667
复制代码 代码如下:
<%
Function Bytes2bStr(vin,cSet)
Dim BytesStream,StringReturn
Set BytesStream = Server.CreateObject("ADODB.Stream")
BytesStream.Type = 2
BytesStream.Open
BytesStream.WriteTex[详细] -
在ASP中使用INSERT INTO语句来将数据插入到数据库中的方法
所属栏目：[Asp教程] 日期：2023-10-20 热度：3667
'建立register.asp
复制代码 代码如下:
<%@ language=vbscript %>
<html >
<head>
<title>注册页面</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<style type="text[详细] -
做了CDN加快器的ASP网站获取用户真实IP程序
所属栏目：[Asp教程] 日期：2023-10-20 热度：3667
复制代码 代码如下:
function checkip(checkstring)'用正则判断IP是否合法
dim re1
set re1=new RegExp
re1.pattern="^[0-9]{1,3}.[0-9]{1,3}.[0-9]{1,3}.[0-9]{1,3}$"
re1.global=false
re1.Ignorecase=f[详细] -
使用 ASP，链接地址将以编码方式显示中文
所属栏目：[Asp教程] 日期：2023-10-19 热度：1793
asp解码url
复制代码 代码如下:
<a href="1.asp?action=<%=server.urlencode("你好")%>">asdf</a>
解码函数
[code]
<%
Function URLDecode(enStr)
dim deStr,strSpecial
dim c,i,v
deStr=""
strSpecial=[详细] -
ASP常见错误详解及解决方案汇总
所属栏目：[Asp教程] 日期：2023-10-19 热度：1793
有三种主要的错误类型：
１．编译错误：
这种错误出现一般都是代码的语法问题。因为编译错误而导致辞ASP停止运行。
２．运行错误：
这个错误是发生在你准备运行ASP时的。例如：如果你试图给一个变量赋值，但是却[详细] -
ASP同一站点下gb2312和utf-8页面传递参数乱码的最佳解决方法
所属栏目：[Asp教程] 日期：2023-10-19 热度：1793
①.页面文件使用正确的编码，gb2312使用ANSI，utf-8使用utf-8；
②.ASP代码中设置正确的CODEPAGE，gb2312使用936，utf-8使用65001；
③.HTML代码中设置正确的charset，gb2312使用gb2312，utf-8使用utf-8；
④.将传[详细] -
asp数字或者字符排列的函数代码
所属栏目：[Asp教程] 日期：2023-10-19 热度：9063
复制代码 代码如下:
'排序
Function Sort1(ary)
Dim KeepChecking,I,FirstValue,SecondValue
KeepChecking = TRUE
Do Until KeepChecking = FALSE
KeepChecking = FALSE
For I = 0 to UBound(ary)
If I [详细] -
asp正则表达式运用详解
所属栏目：[Asp教程] 日期：2023-10-19 热度：9063
复制代码 代码如下:
Dim re
Set re = new RegExp '创建RegExp实例
re.Pattern = "ab+c" '定义正则表达式文字，你可以在这里替换正则表达式
Dim myString
myString = "abcefg" '定义要匹配的字符串，[详细] -
asp中通过addnew添加内容后获取当前文章的自递增ID的方法
所属栏目：[Asp教程] 日期：2023-10-19 热度：9063
asp中使用addnew方法添加一条记录后，我们经常使用取得自递增的ID，而使用bookmark很容易实现这样的功能。
复制代码 代码如下:
rs.open sql,conn,3,3
rs.addnew
rs("user")="小男"
rs("pass")="333333"
rs.upd[详细] -
用ASP来生成日志文件
所属栏目：[Asp教程] 日期：2023-10-19 热度：9063
这个例子使用文本文件来写入用户的信息创建一个logfile.asp放在每一个asp的页面的顶端<!--#Include File="LogFile.asp"-->当有人来访问你的站点logfile.asp自动把他的信息写入LogFile.txt,如果相关的URl一样的话则不[详细]
-
将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([详细]
