心有多大,舞台就有多大!
标签 Tag : ASP

关于

<Category: > 发表评论

阿泽的小档案

阿泽的靓照

姓名: ZhuZe
昵称:赤龙虾/阿泽 Chilongxia/a-ze
生日:1987年10月14日 Oct.14.1987
出生地:.西安 Shannxi.Xi’an
少年居住地:江苏.泰兴 Jiangsu.Taixing
目前居住地:陕西.西安 Shannxi.Xi’an
MSN:chilongxia@msn.com
Gtalk:chilongxia@Gmail.com
QQ:592358
Mobile:13659239977
相册:http://592358.photo.qq.com

由来:阿泽的驿站

  阿泽的驿站(www.a-ze.com)-赤龙虾(chilongxia)的草根博客前身是“赤龙侠冰河工作室(IceRiverStudio)”,诞生于2002年3月,名字叫的有点狂,不过只是一个不知名的个人小站而已,那时候我还在上初中,学业上碌碌无为,却整日痴迷于网络的花花世界,很喜欢钻研一些所谓的黑客技术,出于对“冰河木马”的作者黄鑫的崇拜,与我“威震八方”的网名“赤龙侠”一组合,赤龙侠冰河工作室便成立了,成员也只有我一个,收集了一些关于冰河的文章,从源码之家(mycodes.net)下载了几个HTML模板,七拼八凑做成了那个网站,早期使用的是8u8.com的免费空间,只支持HTML,没有FTP功能,只能WEB上传和修改,还申请了一大堆只有转发功能的免费二级域名,记得还当时网易的126.com是最稳定的,后来8u8因为某些原因被关闭了,我的小站也没有备份,数据全部丢失。印象中当时使用8u8做的比较出名的是雪落无声音乐网,推广手段很流氓,在8u8关闭了之后也就消失了,雪落无声上面留的站长QQ我一直还加着,不过至今没见过上线,也不知道那个站长现在混的怎么样了……

  2003年的时候阿杜走红大江南北,还有当时有个做网站统计程序的阿江比较牛,于是就跟风给自己起了个名字叫阿泽(a-ze),在万网查了一下a-ze.com可以注册,不过万网当时¥300大洋一年的注册费让我犹了了好几个月,那可是我一个月的生活费啊,谁知到了6月份再查的时候,a-ze.com竟然被一个外国人给注册了,当时心痛不已。2004年8月,偶然间发现a-ze.com因为没有续费被释放了,顿时大悦,立马注册了我人生中的第一个花钱的域名,当时还买不起空间,转发到了一个提供的日记服务的网站上,那个网站的模板做的还比较漂亮,不过那个网站我已经忘记叫什么了,因为也没怎么在上面写过东西,所以印象不深,总之不是新浪、搜狐、网易之类的大网站,他们当时还没有这种服务,其实2004年的时候国内就已经有一些网站提供博客服务了,只是当时“博客”这个词还没有流行开。

  2006年我上大学了,终于狠下心买了一个100M的ASP空间,用PJBlog开通了自己的独立博客“阿泽的驿站”,之所以叫驿站,是因为我对“e”这个字母和发音情有独钟,a-ze可以理解为a到z这个26个英文字母全部很e,亿、易、意、艺、译、逸……发“YI”这个音的字太多了,而且以E开头的英文字母意思也很广泛,最有代表性的除了Easy、English还有Electronic等等……所以我觉得E是充满智慧的,我的网站可以叫E站,后来觉得还是驿站看着比较舒服一点,所以就叫驿站吧,阿泽的驿站就是打造互联网智慧的聚集地!当然,这个目标还有点太远了,以我目前的能力只能贴点我觉得有智慧的东西,我写的东西就算不上是智慧了,不过确实是我心灵上的驿站。

  阿泽的驿站从2006年10月到现在度过了四个年头,程序上也从强大的PJBlog转换到了更强大的WordPress,但是阿泽的信念永远不变!

  关于阿泽的故事先讲到这里,欢迎朋友们常来阿泽的驿站坐坐,阿泽期待与大家一同分享智慧,感悟人生!

2009年6月

本文来自: 关于

asp内置对象 session 详解

<Category: 技术回收站> 发表评论

Session 对象
可以使用 Session 对象存储特定用户会话所需的信息。这样,当用户在应用程序的 页之间跳转时,存储在 Session 对象中的变量将不会丢失,而是在整个用户会话中一直存在下去。

当用户请求来自应用程序的 Web 页时,如果该用户还没有会话,则 Web 服务器将自动创建一个 Session 对象。当会话过期或被放弃后,服务器将终止该会话。

Session 对象最常见的一个用法就是存储用户的首选项。例如,如果用户指明不喜欢查看图形,就可以将该信息存储在 Session 对象中。有关使用 Session 对象的详细信息,请参阅“ 应用程序”部分的“管理会话”。

注意 会话状态仅在支持 cookie 的浏览器中保留。

语法
Session.collection|property|method

集合
Contents 包含已用脚本命令添加到会话中的项目。
StaticObjects 包含通过 标记创建的并给定了会话作用域的对象。

属性
CodePage 将用于符号映射的代码页。
LCID 现场标识。
SessionID 返回用户的会话验证。
Timeout 应用程序会话状态的超时时限,以分钟为单位。

方法
Abandon 该方法破坏 Session 对象并释放其资源。

事件
global.asa 文件中声明下列事件的脚本。

Session_OnEnd
Session_OnStart

有关以上事件及 global.asa 文件的详细信息, 请参阅 Global.asa 参考.

注释
您可以在 Session 对象中存储值。存储在 Session 对象中的信息在会话及会话作用域内有效。下列脚本演示两种类型的变量的存储方式。

< %
Session("username") = "Janine"
Session("age") = 24
%>

但是,如果您将对象存储在 Session对象中,而且您使用 VBScript 作为主脚本语言。则必须使用关键字 Set。如下列脚本所示。

< % Set Session("Obj1") = Server.CreateObject("MyComponent.class1") %>

然后,您就可以在后面的 Web 页上调用 MyComponent.class1 揭示的方法和属性,其调用方法如下:

< % Session("Obj1").MyMethod %>

也可以通过展开该对象的本地副本并使用下列脚本来调用:

< %
Set MyLocalObj1 = Session("Obj1")
MyLocalObj1.MyObjMethod
%>

创建有会话作用域的对象的另一种方法是在 global.asa 文件中使用

标记。

但是不能在 Session 对象中存储内建对象。例如,下面每一行都将返回错误。

< %
Set Session("var1") = Session
Set Session("var2") = Request
Set Session("var3") = Response
Set Session("var4") = Server
Set Session("var5") = Application
%>

在将对象存储到 Session 对象之前,必须了解它使用的是哪一种线程模型。只有那些标记为“Both”的对象才能存储在没有锁定单线程会话的 Session 对象中。详细信息, 请参阅“创建 ASP 组件”中的“选择线程模型”。

若您将一个数组存储在 Session对象中,请不要直接更改存储在数组中的元素。例如,下列的脚本无法运行。

< % Session("StoredArray")(3) = "new value" %>

这是因为 Session对象是作为集合被实现的。数组元素 StoredArray(3) 未获得新的赋值。而此值将包含在 Application 对象集合中,并将覆盖此位置以前存储的任何信息。

我们极力建议您在将数组存储在 Session对象中时,在检索或改变数组中的对象前获取数组的一个副本。在对数组操作时,您应再将数组全部存储在 Session 对象中,这样您所做的任何改动将被存储下来。下列的脚本对此进行演示。

—file1.asp—
< %
'Creating and initializing the array
Dim MyArray()
Redim MyArray(5)
MyArray(0) = "hello"
MyArray(1) = "some other string"

'Storing the array in the Session object
Session("StoredArray") = MyArray

Response.Redirect("file2.asp")
%>

—file2.asp—
< %
'Retrieving the array from the Session Object
'and modifying its second element
LocalArray = Session("StoredArray")
LocalArray(1) = " there"

'printing out the string "hello there"
Response.Write(LocalArray(0)&LocalArray(1))

'Re-storing the array in the Session object
'This overwrites the values in StoredArray with the new values
Session("StoredArray") = LocalArray
%>

示例
下列代码将字符串 MyName 分配给名为 name 的会话变量,并给名为 year 的会话变量指定一个值,而且为 some.Obj 组件的实例指定一个名为 myObj 的变量。

Session("name") = "MyName"
Session("year") = 96
Set Session("myObj") = Server.CreateObject("someObj")
%>

本文来自: asp内置对象 session 详解

ASP内置对象 Request对象 详解

<Category: 技术回收站> 发表评论

Request对象用于接受所有从浏览器发往你的服务器的请求内的所有信息。

集合

Request.ClientCertificate(key[SubField])

所有客户证书的信息的集合。对于Key,该集合具有如下的关键字:

Subject
证书的主题。包含所有关于证书收据的信息。能和所有的子域后缀一起使用。

Issuer
证书的发行人。包含所有关于证书验证的信息。除了CN外,能和所有的子域后缀一起使用。

VadidFrom
证书发行的日期。使用VBScript格式。

ValidUntil
该证书不在有效的时间。

SerialNumber
包含该证书的序列号。

Certificate
包含整个证书内容的二进制流,使用ASN.1格式。

对于SubField,Subject和Issuer关键字可以具有如下的子域后缀:(比如:SubjectOU或IssuerL)

C
起源国家。

O
公司或组织名称。

OU
组织单元。

CN
用户的常规名称。

L
局部。

S
州(或省)。

T
个人或公司的标题。

GN
给定名称。

I
初始。

当文件cervbs.inc(VBScript使用)或cerjavas.inc(Jscript使用)通过使用#INCLUDE导向包含在你的Active Server Page里时,下面两个标志可以使用:

ceCertPresent
指明客户证书是否存在,其值为TRUE或FALSE。

ceUnrecongnizedIssure
指明在该链表中的最后的证书的发行者是否未知,其值为TRUE或FALSE。

Request.Cookies(Cookie[(key).Attribute])

Cookie的集合。允许获得浏览器的Cookie。Cookie指明返回那一个Cookie。Key用于从Cookie字典中返回具有某一关键字的Cookie值。对于Attribute,你能使用属性HasKeys来确定某一Cookie是否具有子关键字。HasKeys的值为TRUE或FALSE。

Request.Form(Parameter)[(Index).Count]

填写在HTML的表单中所有的数据的集合。Parameter是在HTML表单中某一元素的名称。当某一参数具有不止一个值(比如,当在中使用MULTIPLE属性时)时,使用Index。当某一参数具有多值时,Count指明多值个数。

Request.QueryString(Varible)[(Index).Count]

查询字符串的所有值的集合。Varible是在查询字符串某一变量的名称。当某一变量具有多于一个值时,使用Index。当某一参数具有多值时,Count指明值的个数。

Request.ServerVaribles(Server Environment Variable)

环境变量的集合。允许读取HTTP头。你可以通过使用HTTP_前缀来读取任何头信息。比如,HTTP_USER_AGENT接受客户代理HTTP头(浏览器类型)。除此外,你可以使用下表所示的变量获得任何环境信息。

ALL_HTTP
客户端发送的所有HTTP标头,他的结果都有前缀HTTP_。

ALL_RAW
客户端发送的所有HTTP标头,其结果和客户端发送时一样,没有前缀HTTP_

APPL_MD_PATH
应用程序的元数据库路径。

APPL_PHYSICAL_PATH
与应用程序元数据库路径相应的物理路径。

AUTH_PASSWORD
当使用基本验证模式时,客户在密码对话框中输入的密码。

AUTH_TYPE
这是用户访问受保护的脚本时,服务器用于检验用户的验证方法。

AUTH_USER
代验证的用户名。

CERT_COOKIE
唯一的客户证书ID号。

CERT_FLAG
客户证书标志,如有客户端证书,则bit0为0。如果客户端证书验证无效,bit1被设置为1。

CERT_ISSUER
用户证书中的发行者字段。

CERT_KEYSIZE
安全套接字层连接关键字的位数,如128。

CERT_SECRETKEYSIZE
服务器验证私人关键字的位数。如1024。

CERT_SERIALNUMBER
客户证书的序列号字段。

CERT_SERVER_ISSUER
服务器证书的发行者字段

CERT_SERVER_SUBJECT
服务器证书的主题字段。

CERT_SUBJECT
客户端证书的主题字段。

CONTENT_LENGTH
客户端发出内容的长度。

CONTENT_TYPE
客户发送的form内容或HTTP PUT的数据类型。

GATEWAY_INTERFACE
服务器使用的网关界面。

HTTPS
如果请求穿过安全通道(SSL),则返回ON。如果请求来自非安全通道,则返回OFF。

HTTPS_KEYSIZE
安全套接字层连接关键字的位数,如128。

HTTPS_SECRETKEYSIZE
服务器验证私人关键字的位数。如1024。

HTTPS_SERVER_ISSUER
服务器证书的发行者字段。

HTTPS_SERVER_SUBJECT
服务器证书的主题字段。

INSTANCE_ID
IIS实例的ID号。

INSTANCE_META_PATH
响应请求的IIS实例的元数据库路径。

LOCAL_ADDR
返回接受请求的服务器地址。

LOGON_USER
用户登录Windows NT的帐号

PATH_INFO
客户端提供的路径信息。

PATH_TRANSLATED
通过由虚拟至物理的映射后得到的路径。

QUERY_STRING
查询字符串内容。

REMOTE_ADDR
发出请求的远程主机的IP地址。

REMOTE_HOST
发出请求的远程主机名称。

REQUEST_METHOD
提出请求的方法。比如GET、HEAD、POST等等。

SCRIPT_NAME
执行脚本的名称。

SERVER_NAME
服务器的主机名、DNS地址或IP地址。

SERVER_PORT
接受请求的服务器端口号。

SERVER_PORT_SECURE
如果接受请求的服务器端口为安全端口时,则为1,否则为0。

SERVER_PROTOCOL
服务器使用的协议的名称和版本。

SERVER_SOFTWARE
应答请求并运行网关的服务器软件的名称和版本。

URL
提供URL的基本部分。

 

方法

Request.BinaryRead(Count)

接收一个HTML表单的未经过处理的内容。当调用此方法时,Count指明要接收多少字节。在调用此方法后,Count指明实际上接收到多少个字节。

属性

Request.TotalBytes

查询体的长度,以字节为单位。

本文来自: ASP内置对象 Request对象 详解

参考资料之ASP函数

<Category: 技术回收站> 发表评论

1.函数 array()
功能:创建一个数组变量
格式:array(list)
参数:list 为数组变量中的每个数值列,中间用逗号间隔
例子:

结果: i 被赋予为数组

2.函数 Cint()
功能:将一表达式/其它类型的变量转换成整数类型(int)
格式:Cint(expression)
参数:expression 是任何有效的表达式/其它类型的变量
例子:
  
结果: 236
函数Cint()将字符"234"转换 成整数234.如果表达式为空, 或者无效时,返回值为0;

3.函数: Creatobject()
功能:创建及返回一个ActiveX对象.
格式:Creatobject(obname)
参数:obname 是对象的名称
例子:
  
结果:
4.函数 Cstr()
功能:将一表达式/其它类型的变量转换成字符类型(string)
格式:Cstr(expression)
参数:expression是任何有效的表达式/其它类型的变量
例子:
  
结果:函数Cstr()将整数 5 转换 成字符"5".

5.函数 Date()
功能:返回当前系统(server端)的日期
格式:Date()
参数:无
例子:
结果:05/10/00

6.函数 Dateadd()
功能:计算某个指定的时间和
格式:dateadd(timeinterval,number,date)
参数:timeinterval是时间单位(月,日..); number是时间间隔值,date是时间始点.
例子:

  
结果:
11/4/99
3:34:45 PM
其中
"m" = "month";
"d" = "day";
如果是currentDate 格式,则,
"h" = "hour";
"s" = "second"; 

7.函数 Datediff()
功能:计算某量个指定的时间差
格式:datediff(timeinterval,date1,date2[,firstdayofweek[,firstdayofyear]])
参数:timeinterval 是时间单位; date1,date2是有效的日期表达式,firstdayofweek,firstdayofyear 是任意选项.
例子:
  
结果:There are 150 days to millenium from 8/4/99. 

8.函数 day()
功能:返回一个整数值,对应于某月的某日
格式:day(date)
参数:date是一个有效的日期表达式;
例子:
结果:4

9.函数 formatcurrency()
功能:转换成货币格式
格式:formatcurrency(expression [,digit[,leadingdigit[,paren[,groupdigit]]]])
参数:expression 是有效的数字表达式;digit表示小数点后的位数;leadingdigit,paren,groupdigit是任意选项.
例子:
结果:$34.35

10.函数 Formatdatetime()
功能:格式化日期表达式/变量
格式:formatdatetime(date[,nameformat])
参数:date为有效的日期表达式/变量;nameformat是指定的日期格式常量名称.
例子:
结果:Wednesday,August 04,1999

11.函数 formatnumber()
功能:格式化数字表达式/变量
格式:formatnumbe(expression [,digit[,leadingdigit[,paren[,groupdigit]]]])
参数:express为有效的数字表达式, digit表示小数点后的位数;leadingdigit,paren,groupdigit是任意选项
例子:
  
结果: 23.222

12.函数 formatpercent()
功能:格式化百分数表达式/变量
格式:formatnumber(expression [,digit [,leading [,paren[,groupdigit]]]])
参数:expression 是有效的数字表达式,digit表示小数点后的位数;leadingdigit,paren,groupdigit是任意选项
例子:
  
结果: 45.233

13.函数: hour()
功能:返回一个数值,对应于的指定时间.
格式:hour(time)
参数:time对应于的指定时间.
例子:
  
结果:16 (24 小时制)

14.函数 instr()
功能:返回一个数值,对应于某字符(串)在另一字符串中的位置.
格式:instr([start,]strtobesearched,strsearchfor [,compare])
参数:start(任选)是从第start位寻找,strtobesearched 是被搜索的字符串,strsearchfor是被寻找的目标.compare是任意选项
例子:
  
结果:9,(字符"a"在strtext字符串的第九位)

15.函数 instrrev()
功能:返回一个数值,对应于某字符(串)在另一字符串中的位置(从后面起开始寻找).
格式:instrrev([start,] strtobesearched,strsearchfor[,compare])
参数:参考 instr(),
例子:

结果:13, 字串"s"是strtext的第13个字符(从后面起开始寻找)

16.函数 int()
功能:数字取整
格式:int(number)
参数:number 是任何有效的数字表达式/其它类型的变量
例子:

结果:322 (如果用Cint()则结果是323)

17.函数 isarray()
功能:返回一个布尔值,判断变量是否为数组.
格式: isarray(name)
参数:name是变量名称
例子:
  
结果:false

18.函数 isdate()
功能:返回一个布尔值,判断变量是否为日期变量.
格式:isdate(expression)
参数:expression 是任意的变量.
例子:
结果:true

19.函数 isempty()
功能:返回一个布尔值,判断变量是否为空.
格式:isempty(expression)
参数:expression 是任意的变量.
例子:

结果:true

20.函数 isnull()
功能:返回一个布尔值,判断变量是否包含非法的数据.
格式:isnull(expression)
参数:expression 是任意的变量.
例子:

结果:false

21.函数 Isnumeric()
功能:返回一个布尔值,判断变量是否为数字变量,或者是可以转换成数字的其它变量.
格式:isnumeric(expression)
参数:expression 是任意的变量.
例子:
  
结果: true.

22.函数 Isobject()
功能:返回一个布尔值,判断变量是否为对象的变量,
格式:isobject(expression)
参数:expression 是任意的变量.
例子:
  
结果: true

23.函数: Lbound()
功能:返回一个数组的下界.
格式:Lbound(arrayname[,dimension])
参数:arrayname 是数组变量,dimension 是任意项
例子:
  
结果:0
24.函数 Lcase()
功能:将一字符类型变量的字符全部变换小写字符.
格式:Lcase(string)
参数:string是字串变量
例子:
  
结果:this is lcase!

25.函数 left()
功能:截取一个字符串的前部分;
格式:left(string,length)
参数:string字符串,length截取的长度.
例子:
结果:this i

26.函数 len()
功能:返回字符串长度或者变量的字节长度
格式:len(string |varname)
参数:string字符串;varname任意的变量名称
例子:

结果:15

27.函数 ltrim()
功能:去掉字符串前的空格.
格式:ltrim(string)
参数:string 字串.
例子:
结果:Today

29.函数 minute()
功能:返回一数值, 表示分钟
格式:minute(time)
参数: time是时间变量
例子:
结果:23

30.函数 month()
功能:返回一数值, 表示月份
格式:month(time)
参数:time是日期变量
例子:
结果:9

31.函数 monthname()
功能:返回月份的字符串(名称).
格式:Monthname(date [,abb])
参数:date是日期变量,abb=true时 则月份的缩写,
例子:
  
结果:April
32.函数 Now()
功能:返回系统的当前时间和日期.
格式:now()
参数:无
例子:
  
结果: 05/10/00 8:45:32 pm

33.函数: replace()
功能:在字串中查找,替代指定的字串.
格式:replace(strtobesearched,strsearchfor,strreplacewith

[,start[,count[,compare]]])
参数:strtobesearched是字串; strsearchfor是被查找的子字串;strreplacewith

是用来替代的子字串.start,count,compare 是任意选项.
例子:
  
结果:this is an orange.

34.函数 right()
功能:截取一个字符串的后部分
格式:right(string,length)
参数:string字符串,length截取的长度.
例子:
  
结果:st!

35.函数 rnd()
功能:返回一个随机数值
格式:rnd[(number)]
参数:number是任意数值.
例子:

结果:0/1数值之一,无randomize(), 则不能产生随机数.
36.函数round()
功能:完整数值
格式:round(expression[,numright])
参数:expression数字表达式;numright任意选项.
例子:

结果: 12
37.函数 rtrim()
功能:去掉字符串后的空格.
格式:rtrim(string)
参数:string 是字串
例子:
  
结果:this is a test!

38.函数 second()
功能:返回一个整数值.
格式:second(time)
参数:time是一个有效的时间表达式;
例子:
结果:30

39.函数 strReverse()
功能:返回与原字串排列逆向的字串.
格式:strreverse(string)
参数:string是字串
例子:

——————————————————————————–

下面为带例子的:

Array()
FUNCTION: 返回一个数组
SYNTAX: Array(list)
ARGUMENTS: 字符,数字均可
EXAMPLE: < %
Dim myArray()
For i = 1 to 7
Redim Preserve myArray(i)
myArray(i) = WeekdayName(i)
Next
%>
RESULT: 建立了一个包含7个元素的数组myArray
myArray("Sunday","Monday", … … "Saturday")

CInt()
FUNCTION: 将一个表达式转化为数字类型
SYNTAX: CInt(expression)
ARGUMENTS: 任何有效的字符均可
EXAMPLE: < %
f = "234"
response.write cINT(f) + 2
%>
RESULT: 236
转化字符"234"为数字"234",如果字符串为空,则返回0值

CreateObject()
FUNCTION: 建立和返回一个已注册的ACTIVEX组件的实例。
SYNTAX: CreateObject(objName)
ARGUMENTS: objName 是任何一个有效、已注册的ACTIVEX组件的名字.
EXAMPLE: < %
Set con = Server.CreateObject("ADODB.Connection")
%>
RESULT:

CStr()
FUNCTION: 转化一个表达式为字符串.
SYNTAX: CStr(expression)
ARGUMENTS: expression 是任何有效的表达式。
EXAMPLE: < %
s = 3 + 2
response.write "The result is: " & cStr(s)
%>
RESULT: 转化数字“5”为字符“5”。

Date()
FUNCTION: 返回当前系统日期.
SYNTAX: Date()
ARGUMENTS: None.
EXAMPLE: < %=Date%>
RESULT: 8/4/99

DateAdd()
FUNCTION: 返回一个被改变了的日期。
SYNTAX: DateAdd(timeinterval,number,date)
ARGUMENTS: timeinterval is the time interval to add; number is amount of
time intervals to add; and date is the starting date.
EXAMPLE: < %
currentDate = #8/4/99#
newDate = DateAdd("m",3,currentDate)
response.write newDate
%>

< %
currentDate = #12:34:45 PM#
newDate = DateAdd("h",3,currentDate)
response.write newDate
%>
RESULT: 11/4/99
3:34:45 PM

"m" = "month";
"d" = "day";

If currentDate is in time format then,
"h" = "hour";
"s" = "second";

DateDiff()
FUNCTION: 返回两个日期之间的差值 。
SYNTAX: DateDiff(timeinterval,date1,date2 [, firstdayofweek ][,
firstweekofyear]])
ARGUMENTS: timeinterval 表示相隔时间的类型,如“M“表示“月”。
EXAMPLE: < %
fromDate = #8/4/99#
toDate = #1/1/2000#
response.write "There are " & _
DateDiff("d",fromDate,toDate) & _
" days to millenium from 8/4/99."
%>
RESULT: 从8/4/99 到2000年还有 150 天.

Day()
FUNCTION: 返回一个月的第几日 .
SYNTAX: Day(date)
ARGUMENTS: date 是任何有效的日期。
EXAMPLE: < %=Day(#8/4/99#)%>
RESULT: 4

FormatCurrency()
FUNCTION: 返回表达式,此表达式已被格式化为货币值
SYNTAX: FormatCurrency(Expression [, Digit ][, LeadingDigit ][, Paren ][,
GroupDigit]]]])
ARGUMENTS: Digit 指示小数点右侧显示位数的数值。默认值为 -1,指示使用的是
计算机的区域设置; LeadingDigit 三态常数,指示是否显示小数值小数点前面的
零。
EXAMPLE: < %=FormatCurrency(34.3456)%>
RESULT: $34.35

FormatDateTime()
FUNCTION: 返回表达式,此表达式已被格式化为日期或时间
SYNTAX: FormatDateTime(Date, [, NamedFormat])
ARGUMENTS: NamedFormat 指示所使用的日期/时间格式的数值,如果省略,则使用
vbGeneralDate.
EXAMPLE: < %=FormatDateTime("08/4/99", vbLongDate)%>
RESULT: Wednesday, August 04, 1999

FormatNumber()
FUNCTION: 返回表达式,此表达式已被格式化为数值.
SYNTAX: FormatNumber(Expression [, Digit ][, LeadingDigit ][, Paren ][,
GroupDigit]]]])
ARGUMENTS: Digit 指示小数点右侧显示位数的数值。默认值为 -1,指示使用的是
计算机的区域设置。; LeadingDigit i指示小数点右侧显示位数的数值。默认值为 -
1,指示使用的是计算机的区域设置。; Paren 指示小数点右侧显示位数的数值。默认
值为 -1,指示使用的是计算机的区域设置。; GroupDigit i指示小数点右侧显示位数
的数值。默认值为 -1,指示使用的是计算机的区域设置。.
EXAMPLE: < %=FormatNumber(45.324567, 3)%>
RESULT: 45.325

FormatPercent()
FUNCTION: 返回表达式,此表达式已被格式化为尾随有 % 符号的百分比(乘以
100 )。 (%)
SYNTAX: FormatPercent(Expression [, Digit ][, LeadingDigit ][, Paren ][,
GroupDigit]]]])
ARGUMENTS: 同上.
EXAMPLE: < %=FormatPercent(0.45267, 3)%>
RESULT: 45.267%

Hour()
FUNCTION: 以24时返回小时数.
SYNTAX: Hour(time)
ARGUMENTS:
EXAMPLE: < %=Hour(#4:45:34 PM#)%>
RESULT: 16
(Hour has been converted to 24-hour system)

Instr()
FUNCTION: 返回字符或字符串在另一个字符串中第一次出现的位置.
SYNTAX: Instr([start, ] strToBeSearched, strSearchFor [, compare])
ARGUMENTS: Start为搜索的起始值,strToBeSearched接受搜索的字符串
strSearchFor要搜索的字符.compare比较方式(详细见ASP常数)
EXAMPLE: < %
strText = "This is a test!!"
pos = Instr(strText, "a")
response.write pos
%>
RESULT: 9

InstrRev()
FUNCTION: 同上,只是从字符串的最后一个搜索起
SYNTAX: InstrRev([start, ] strToBeSearched, strSearchFor [, compare])
ARGUMENTS: 同上.
EXAMPLE: < %
strText = "This is a test!!"
pos = InstrRev(strText, "s")
response.write pos
%>
RESULT: 13

Int()
FUNCTION: 返回数值类型,不四舍五入,注意取值是不大于它的整数。
SYNTAX: Int(number)
ARGUMENTS:
EXAMPLE: < %=INT(32.89)%> < %=int(-3.33)%>
RESULT: 32 -4

IsArray()
FUNCTION: 判断一对象是否为数组,返回布尔值 .
SYNTAX: IsArray(name)
ARGUMENTS:
EXAMPLE: < %
strTest = "Test!"
response.write IsArray(strTest)
%>
RESULT: False

IsDate()
FUNCTION: 判断一对象是否为日期,返回布尔值
SYNTAX: IsDate(expression)
ARGUMENTS: expression is any valid expression.
EXAMPLE: < %
strTest = "8/4/99"
response.write IsDate(strTest)
%>
RESULT: True

IsEmpty()
FUNCTION: 判断一对象是否初始化,返回布尔值.
SYNTAX: IsEmpty(expression)
ARGUMENTS:
EXAMPLE: < %
Dim i
response.write IsEmpty(i)
%>
RESULT: True

IsNull()
FUNCTION: 判断一对象是否为空,返回布尔值.
SYNTAX: IsNull(expression)
ARGUMENTS:
EXAMPLE: < %
Dim i
response.write IsNull(i)
%>
RESULT: False

IsNumeric()
FUNCTION: 判断一对象是否为数字,返回布尔值.
SYNTAX: IsNumeric(expression)
ARGUMENTS:
EXAMPLE: < %
i = "345"
response.write IsNumeric(i)
%>
RESULT: True
就算数字加了引号,ASP还是认为它是数字。

IsObject()
FUNCTION: 判断一对象是否为对象,返回布尔值.
SYNTAX: IsObject(expression)
ARGUMENTS:
EXAMPLE: < %
Set con = Server.CreateObject("ADODB.Connection")
response.write IsObject(con)
%>
RESULT: True

LBound()
FUNCTION: 返回指定数组维的最小可用下标.
SYNTAX: Lbound(arrayname [, dimension])
ARGUMENTS: ; dimension 指明要返回哪一维下界的整数。使用 1 表示第一维,2
表示第二维,以此类推。如果省略 dimension 参数,默认值为 1.
EXAMPLE: < %
i = Array("Monday","Tuesday","Wednesday")
response.write LBound(i)
%>
RESULT: 0

LCase()
FUNCTION: 返回字符串的小写形式
SYNTAX: Lcase(string)
ARGUMENTS: string is any valid string expression.
EXAMPLE: < %
strTest = "This is a test!"
response.write LCase(strTest)
%>
RESULT: this is a test!

Left()
FUNCTION: 返回字符串左边第length个字符以前的字符(含第length个字符).
SYNTAX: Left(string, length)
ARGUMENTS:
EXAMPLE: < %
strTest = "This is a test!"
response.write Left(strTest, 3)
%>
RESULT: Thi

Len()
FUNCTION: 返回字符串的长度.
SYNTAX: Len(string | varName)
ARGUMENTS:
EXAMPLE: < %
strTest = "This is a test!"
response.write Len(strTest)
%>
RESULT: 15

LTrim()
FUNCTION: 去掉字符串左边的空格.
SYNTAX: LTrim(string)
ARGUMENTS:
EXAMPLE: < %
strTest = " This is a test!"
response.write LTrim(strTest)
%>
RESULT: This is a test!

Mid()
FUNCTION: 返回特定长度的字符串(从start开始,长度为length).
SYNTAX: Mid(string, start [, length])
ARGUMENTS:
EXAMPLE: < %
strTest = "This is a test! Today is Monday."
response.write Mid(strTest, 17, 5)
%>
RESULT: Today

Minute()
FUNCTION: 返回时间的分钏.
SYNTAX: Minute(time)
ARGUMENTS:
EXAMPLE: < %=Minute(#12:45:32 PM#)%>
RESULT: 45

Month()
FUNCTION: 返回日期.
SYNTAX: Month(date)
ARGUMENTS: date is any valid date expression.
EXAMPLE: < %=Month(#08/04/99#)%>
RESULT: 8

MonthName()
FUNCTION: Returns a string identifying the specified month.
SYNTAX: MonthName(month, [, Abb])
ARGUMENTS: month is the numeric representation for a given month; Abb
(optional) is a boolean value used to display month abbreviation. True
will display the abbreviated month name and False (default) will not show
the abbreviation.
EXAMPLE: < %=MonthName(Month(#08/04/99#))%>
RESULT: August

Now()
FUNCTION: Returns the current system date and time.
SYNTAX: Now()
ARGUMENTS: None
EXAMPLE: < %=Now%>
RESULT: 8/4/99 9:30:16 AM

Replace()
FUNCTION: Returns a string in which a specified sub-string has been
replaced with another substring a specified number of times.
SYNTAX: Replace(strToBeSearched, strSearchFor, strReplaceWith [, start
][, count ][, compare]]])
ARGUMENTS: strToBeSearched is a string expression containing a sub-
string to be replaced; strSearchFor is the string expression to search for
within strToBeSearched; strReplaceWith is the string expression to replace
sub-string strSearchFor; start (optional) is the numeric character
position to begin search; count (optional) is a value indicating the
comparision constant.
EXAMPLE: < %
strTest = "This is an apple!"
response.write Replace(strTest, "apple", "orange")
%>
RESULT: This is an orange!

Right()
FUNCTION: 返回字符串右边第length个字符以前的字符(含第length个字符).
SYNTAX: Right(string, length)
ARGUMENTS: .
EXAMPLE: < %
strTest = "This is an test!"
response.write Right(strTest, 3)
%>
RESULT: st!

Rnd()
FUNCTION: 产生一个随机数.
SYNTAX: Rnd [ (number) ]
ARGUMENTS:
EXAMPLE: < %
Randomize()
response.write RND()
%>
RESULT: 任何一个在0 到 1 之间的数

Round()
FUNCTION: 返回按指定位数进行四舍五入的数值.
SYNTAX: Round(expression [, numRight])
ARGUMENTS: numRight数字表明小数点右边有多少位进行四舍五入。如果省略,则
Round 函数返回整数.
EXAMPLE: < %
i = 32.45678
response.write Round(i)
%>
RESULT: 32

Rtrim()
FUNCTION: 去掉字符串右边的字符串.
SYNTAX: Rtrim(string)
ARGUMENTS:
EXAMPLE: < %
strTest = "This is a test!! "
response.write RTrim(strTest)
%>
RESULT: This is a test!!

Second()
FUNCTION: 返回秒.
SYNTAX: Second(time)
ARGUMENTS: .
EXAMPLE: < %=Second(#12:34:28 PM#)%>
RESULT: 28

StrReverse()
FUNCTION: 反排一字符串
SYNTAX: StrReverse(string)
ARGUMENTS:
EXAMPLE: < %
strTest = "This is a test!!"
response.write StrReverse(strTest)
%>
RESULT: !!tset a si sihT

Time()
FUNCTION: 返回系统时间.
SYNTAX: Time()
ARGUMENTS: .
EXAMPLE: < %=Time%>
RESULT: 9:58:28 AM

Trim()
FUNCTION: 去掉字符串左右的空格.
SYNTAX: Trim(string)
ARGUMENTS: string is any valid string expression.
EXAMPLE: < %
strTest = " This is a test!! "
response.write Trim(strTest)
%>
RESULT: This is a test!!

UBound()
FUNCTION: 返回指定数组维数的最大可用下标.
SYNTAX: Ubound(arrayname [, dimension])
ARGUMENTS: ; dimension (optional) 指定返回哪一维上界的整数。1 表示第一
维,2 表示第二维,以此类推。如果省略 dimension 参数,则默认值为 1.
EXAMPLE: < %
i = Array("Monday","Tuesday","Wednesday")
response.write UBound(i)
%>
RESULT: 2

UCase()
FUNCTION: 返回字符串的大写形式.
SYNTAX: UCase(string)
ARGUMENTS:
EXAMPLE: < %
strTest = "This is a test!!"
response.write UCase(strTest)
%>
RESULT: THIS IS A TEST!!

VarType()
FUNCTION: 返回指示变量子类型的值
SYNTAX: VarType(varName)
ARGUMENTS:
EXAMPLE: < %
i = 3
response.write varType(i)
%>
RESULT: 2(数字)详见"asp常数"

WeekDay()
FUNCTION: 返回在一周的第几天.
SYNTAX: WeekDay(date [, firstdayofweek])
ARGUMENTS: .
EXAMPLE: < %
d = #8/4/99#
response.write Weekday(d)
%>
RESULT: 4(星期三)

WeekDayName()
FUNCTION: 返回一周第几天的名字.
SYNTAX: WeekDayName(weekday [, Abb ][, firstdayofweek]])
ARGUMENTS: Abb可选。Boolean 值,指明是否缩写表示星期各天的名称。如果省
略, 默认值为 False,即不缩写星期各天的名称.firstdayofweek指明星期第一天的
数值
EXAMPLE: < %
d = #8/4/99#
response.write WeekdayName(Weekday(d))
%>
RESULT: Wednesday

Year()
FUNCTION: 返回当前的年份.
SYNTAX: Year(date)
ARGUMENTS:
EXAMPLE: < %=Year(#8/4/99#)%>
RESULT: 1999

本文来自: 参考资料之ASP函数

ASP编程常用的代码(一)

<Category: 技术回收站> 发表评论

1. ASP与Access数据库连接:

< %
dim conn,mdbfile
mdbfile=server.mappath("数据库名称.mdb")
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};uid=admin;pwd=数据库密码;dbq="&mdbfile
%>

2. ASP与SQL数据库连接:

< %
dim conn
set conn=server.createobject("ADODB.connection")
con.open "PROVIDER=SQLOLEDB;DATA SOURCE=SQL服务器名称或IP地址;UID=sa;PWD=数据库密码;DATABASE=数据库名称
%>

建立记录集对象:

set rs=server.createobject("adodb.recordset")
rs.open SQL语句,conn,3,2

3. SQL常用命令使用方法:

(1) 数据记录筛选:

sql="select * from 数据表 where 字段名=字段值 order by 字段名 "
sql="select * from 数据表 where 字段名 like ‘%字段值%‘ order by 字段名 "
sql="select top 10 * from 数据表 where 字段名 order by 字段名 "
sql="select * from 数据表 where 字段名 in (‘值1‘,‘值2‘,‘值3‘)"
sql="select * from 数据表 where 字段名 between 值1 and 值2"

(2) 更新数据记录:

sql="update 数据表 set 字段名=字段值 where 条件表达式"
sql="update 数据表 set 字段1=值1,字段2=值2 …… 字段n=值n where 条件表达式"

(3) 删除数据记录:

sql="delete from 数据表 where 条件表达式"
sql="delete from 数据表" (将数据表所有记录删除)

(4) 添加数据记录:

sql="insert into 数据表 (字段1,字段2,字段3 …) valuess (值1,值2,值3 …)"
sql="insert into 目标数据表 select * from 源数据表" (把源数据表的记录添加到目标数据表)

(5) 数据记录统计函数:

AVG(字段名) 得出一个表格栏平均值
COUNT(*|字段名) 对数据行数的统计或对某一栏有值的数据行数统计
MAX(字段名) 取得一个表格栏最大的值
MIN(字段名) 取得一个表格栏最小的值
SUM(字段名) 把数据栏的值相加

引用以上函数的方法:

sql="select sum(字段名) as 别名 from 数据表 where 条件表达式"
set rs=conn.excute(sql)

用 rs("别名") 获取统的计值,其它函数运用同上。

(5) 数据表的建立和删除:

Create TABLE 数据表名称(字段1 类型1(长度),字段2 类型2(长度) …… )

例:Create TABLE tab01(name varchar(50),datetime default now())

Drop TABLE 数据表名称 (永久性删除一个数据表)

(6) 记录集对象的方法:
rs.movenext 将记录指针从当前的位置向下移一行
rs.moveprevious 将记录指针从当前的位置向上移一行
rs.movefirst 将记录指针移到数据表第一行
rs.movelast 将记录指针移到数据表最后一行
rs.absoluteposition=N 将记录指针移到数据表第N行
rs.absolutepage=N 将记录指针移到第N页的第一行
rs.pagesize=N 设置每页为N条记录
rs.pagecount 根据 pagesize 的设置返回总页数
rs.recordcount 返回记录总数
rs.bof 返回记录指针是否超出数据表首端,true表示是,false为否
rs.eof 返回记录指针是否超出数据表末端,true表示是,false为否
rs.delete 删除当前记录,但记录指针不会向下移动
rs.addnew 添加记录到数据表末端
rs.update 更新数据表记录

判断所填数据是数字型

if not isNumeric(request("字段名称")) then
response.write "不是数字"
else
response.write "数字"
end if

本文来自: ASP编程常用的代码(一)

ASP连接数据库的全能代码

<Category: 技术回收站> 发表评论

以下可直接保存为.ASP文件使用

'解决了ACCESS数据库路径的问题!
'采用DBType=0或DBType=1来区分AC库还是MSSQL库
'具体采用AC库时应注意的事项,请看程序说明

——————————————————————————–
Dim DBType,Conn,StrConn
DBType=0 '0为Access数据库,1为MSSQL数据库

If(DBType=0) Then
'********************************ACCESS数据库*************************************
Dim DbFolderName,DbFolder_Path,SiteFolder
DbFolderName="ArticleData" '数据库所在文件夹名称
DbFolder_Path = Server.MapPath(DbFolderName) '数据库所在路径
SiteFolder="Article" '系统所在根目录名称

If Session("RootDir") = "" Then
Session("RootDir") = Mid(DbFolder_Path, 1, InStr(1,DbFolder_Path,SiteFolder,1) -1) & SiteFolder
End if
Set Conn = Server.CreateObject("Adodb.Connection")
StrConn = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Session("RootDir") & "\"& DbFolderName & "\Data.mdb" '连接到数据库
Conn.Open StrConn
'**********************************************************************************
ElseIf(DBType=1) Then
'*****************************MSSQL SERVER数据库*************************************
Dim DBUserID,DBPassWord,DBName,DBIP
'修改以下信息以适合你的网站
DBUserID="sa" '数据库登陆名
DBPassWord="" '数据库密码
DBName="dbname" '数据库名称
DBIP="local" '数据库所在地址,如果是本地数据库则为:(local)

Set Conn=Server.CreateObject("Adodb.Connection")
StrConn = "PROVIDER=SQLOLEDB.1;Data Source="&DBIP&";Initial Catalog="&DBName&";Persist Security Info=True;User ID="&DBUserID&";Password="&DBPassWord&";Connect Timeout=30"
Conn.Open StrConn
'**********************************************************************************
Else
'***********************数据库设置错误*************************************************
Response.Write"数据库设置错误,请联系管理员!"
Response.End
End If
'Response.Write StrConn

本文来自: ASP连接数据库的全能代码