ASP常用函數(shù)收藏

2012/7/22 16:32:191073 閱讀

幾年前收集，沒(méi)有測(cè)試，使用者自己驗(yàn)證
1.函數(shù)array()
功能:創(chuàng)建一個(gè)數(shù)組變量
格式:array(list)
參數(shù):list 為數(shù)組變量中的每個(gè)數(shù)值列,中間用逗號(hào)間隔
例子:

<% i = array (“1”,”2”,”3”) %> 

結(jié)果: i 被賦予為數(shù)組

2.函數(shù)Cint()
功能:將一表達(dá)式/其它類(lèi)型的變量轉(zhuǎn)換成整數(shù)類(lèi)型(int)
格式:Cint(expression)
參數(shù):expression 是任何有效的表達(dá)式/其它類(lèi)型的變量
例子:

<% f = ”234” response.write cINT(f) + 2 %> 

結(jié)果: 236

函數(shù)Cint()將字符”234”轉(zhuǎn)換 成整數(shù)234.如果表達(dá)式為空, 或者無(wú)效時(shí),返回值為0;
3.函數(shù):Creatobject()
功能:創(chuàng)建及返回一個(gè)ActiveX對(duì)象.
格式:Creatobject(obname)
參數(shù)bname 是對(duì)象的名稱(chēng)
例子:

<% Set con = Server.CreateObject(“ADODB.Connection”) %> 

結(jié)果:

4.函數(shù)Cstr()
功能:將一表達(dá)式/其它類(lèi)型的變量轉(zhuǎn)換成字符類(lèi)型(string)
格式:Cstr(expression)
參數(shù):expression是任何有效的表達(dá)式/其它類(lèi)型的變量
例子:

<% s = 3 + 2 response.write ”The result is: ”& cStr(s) %> 

結(jié)果:函數(shù)Cstr()將整數(shù) 5 轉(zhuǎn)換 成字符”5”.

5.函數(shù)Date()
功能:返回當(dāng)前系統(tǒng)(server端)的日期
格式: Date()
參數(shù):無(wú)
例子

<% date () %> 

結(jié)果:05/10/00
6.函數(shù)Dateadd()
功能:計(jì)算某個(gè)指定的時(shí)間和
格式: dateadd(timeinterval,number,date)
參數(shù):timeinterval是時(shí)間單位(月,日..); number是時(shí)間間隔值,date是時(shí)間始點(diǎn).
例子:

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

結(jié)果:

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

7.函數(shù)Datediff()
功能:計(jì)算某量個(gè)指定的時(shí)間差
格式: datediff(timeinterval,date1,date2[,firstdayofweek[,firstdayofyear]])
參數(shù): timeinterval 是時(shí)間單位; date1,date2是有效的日期表達(dá)式,firstdayofweek,firstdayofyear 是任意選項(xiàng).
例子:

fromDate = #8/4/99#
toDate = #1/1/2000#
response.write ”There are ”& _
DateDiff(“d”,fromDate,toDate)& _
"days to millenium from 8/4/99."

結(jié)果:There are 150 days to millenium from 8/4/99.
8.函數(shù)day()
功能:返回一個(gè)整數(shù)值,對(duì)應(yīng)于某月的某日
格式: day(date)
參數(shù): date是一個(gè)有效的日期表達(dá)式;


例子

<% =date(#8/4/99#) %>

結(jié)果:4

9.函數(shù)formatcurrency()
功能:轉(zhuǎn)換成貨幣格式
格式: formatcurrency(expression [,digit[,leadingdigit[,paren[,groupdigit]]]])
參數(shù): expression 是有效的數(shù)字表達(dá)式;digit表示小數(shù)點(diǎn)后的位數(shù);leadingdigit,paren,groupdigit是任意選項(xiàng).


例子<%=FormatCurrency(34.3456)%>
結(jié)果34.35

10.函數(shù)Formatdatetime()
功能:格式化日期表達(dá)式/變量
格式: formatdatetime(date[,nameformat])
參數(shù): date為有效的日期表達(dá)式/變量;nameformat是指定的日期格式常量名稱(chēng).


例子formatdatetime(“08/04/99”,vblongdate) 
結(jié)果:Wednesday,August 04,1999

說(shuō)明:
描述:返回表達(dá)式，此表達(dá)式已被格式化為日期或時(shí)間。
語(yǔ)法
FormatDateTime(Date[, NamedFormat])
FormatDateTime 函數(shù)的語(yǔ)法有以下參數(shù)：
參數(shù) 描述
Date 必選項(xiàng)。要被格式化的日期表達(dá)式。
NamedFormat 可選項(xiàng)。指示所使用的日期/時(shí)間格式的數(shù)值，如果省略，則使用 vbGeneralDate。
設(shè)置
NamedFormat 參數(shù)可以有以下值：
常數(shù) 值 描述
vbGeneralDate 0 顯示日期和/或時(shí)間。如果有日期部分，則將該部分顯示為短日期格式。如果有時(shí)間部分，則將該部分顯示為長(zhǎng)時(shí)間格式。如果都存在，則顯示所有部分。
vbLongDate 1 使用計(jì)算機(jī)區(qū)域設(shè)置中指定的長(zhǎng)日期格式顯示日期。
vbShortDate 2 使用計(jì)算機(jī)區(qū)域設(shè)置中指定的短日期格式顯示日期。
vbLongTime 3 使用計(jì)算機(jī)區(qū)域設(shè)置中指定的時(shí)間格式顯示時(shí)間。
vbShortTime 4 使用 24 小時(shí)格式 (hh:mm) 顯示時(shí)間。
說(shuō)明
下面例子利用 FormatDateTime 函數(shù)把表達(dá)式格式化為長(zhǎng)日期型并且把它賦給 MyDateTime:


Function GetCurrentDate
'FormatDateTime 把日期型格式化為長(zhǎng)日期型。
GetCurrentDate = FormatDateTime(Date, 1)
End Function

11.函數(shù)Isnumeric()
功能:返回一個(gè)布爾值,判斷變量是否為數(shù)字變量,或者是可以轉(zhuǎn)換成數(shù)字的其它變量.
格式:isnumeric(expression)
參數(shù):expression 是任意的變量.
例子:

i="234"
response.write isnumeric(i)

結(jié)果: true.

12.函數(shù)Isobject()
功能:返回一個(gè)布爾值,判斷變量是否為對(duì)象的變量,
格式: isobject(expression)
參數(shù): expression 是任意的變量.
例子:

set con =server.creatobject(“adodb.connection”)
response.write isobject(con)

結(jié)果: true

13.函數(shù):Lbound()
功能:返回一個(gè)數(shù)組的下界.
格式:Lbound(arrayname[,dimension])
參數(shù):arrayname 是數(shù)組變量,dimension 是任意項(xiàng)
例子:

i = array(“1”,”2”,”3”)
response.write lbound(i)

結(jié)果:0

14.函數(shù)Lcase()
功能:將一字符類(lèi)型變量的字符全部變換小寫(xiě)字符.
格式:Lcase(string)
參數(shù):string是字符串變量
例子:

str=“THIS is Lcase!”
response.write Lcase(str)

結(jié)果:this is lcase!

15.函數(shù)left()
功能:截取一個(gè)字符串的前部分;
格式:left(string,length)
參數(shù):string字符串,length截取的長(zhǎng)度.


例子:

left("this is a test!",6) 

結(jié)果:this i

16.函數(shù)len()
功能:返回字符串長(zhǎng)度或者變量的字節(jié)長(zhǎng)度
格式:len(string *varname)
參數(shù):string字符串;varname任意的變量名稱(chēng)
例子:


strtest="this is a test!"
response.write left(strtest)

結(jié)果:15
17.函數(shù)ltrim()
功能:去掉字符串前的空格.
格式:ltrim(string)
參數(shù):string 字符串.


例子: 




ltrim ("this is a test!")

結(jié)果:this is a test!

18.函數(shù)Mid()
功能:從字符串中截取字符串.
格式:mid(string,start [,length])
參數(shù):string字符串,start截取的起點(diǎn),length要截取的長(zhǎng)度.
例子:

strtest=“this is a test, Today is Monday!”
response.write mid(strtest,17,5)

結(jié)果:Today

19.函數(shù)minute()
功能:返回一數(shù)值, 表示分鐘
格式:minute(time)
參數(shù): time是時(shí)間變量


例子

=minute(#12:23:34#)

結(jié)果:23

20.函數(shù)month()
功能:返回一數(shù)值, 表示月份
格式:month(time)
參數(shù):time是日期變量


例子

=month(#08/09/99) 

結(jié)果:9

21.函數(shù)monthname()
功能:返回月份的字符串(名稱(chēng)).
格式:Monthname(date [,abb])
參數(shù): date是日期變量,abb=true時(shí) 則月份的縮寫(xiě),
例子:





monthname(#4/5/99#)




結(jié)果:April
22.函數(shù)Now()
功能:返回系統(tǒng)的當(dāng)前時(shí)間和日期.
格式:now()
參數(shù):無(wú)
例子:


=now() 

結(jié)果: 05/10/00 8:45:32 pm

23.函數(shù):replace()
功能:在字符串中查找,替代指定的字符串.
格式:replace(strtobesearched,strsearchfor,strreplacewith [,start[,count[,compare]]])
參數(shù):strtobesearched是字符串; strsearchfor是被查找的子字符串;strreplacewith 是用來(lái)替代的子字符串.start,count,compare 是任意選項(xiàng).
例子:

strtest=“this is an apple.”
response.write replace(strtest,”apple”,”orange”)

24.函數(shù)right()

功能:截取一個(gè)字符串的后部分
格式:right(string,length)
參數(shù):string字符串,length截取的長(zhǎng)度.
例子:

strtest=“this is a test!”
response.write right(strtest,3)

結(jié)果:st!

25.函數(shù)rnd()
功能:返回一個(gè)隨機(jī)數(shù)值
格式:rnd[(number)]
參數(shù):number是任意數(shù)值.
例子:

randomize()
response.write rnd()

結(jié)果:0/1數(shù)值之一,無(wú)randomize(), 則不能產(chǎn)生隨機(jī)數(shù).

26.函數(shù)round()
功能:完整數(shù)值
格式:round(expression[,numright])
參數(shù):expression數(shù)字表達(dá)式;numright任意選項(xiàng).
例子:

i=12.33654
response.write round(i)

結(jié)果: 12

27.函數(shù)rtrim()
功能:去掉字符串后的空格.
格式:rtrim(string)
參數(shù):string 是字符串
例子:


response.write rtrim(“this is a test! ”)

結(jié)果:this is a test!
28.函數(shù)second()
功能:返回一個(gè)整數(shù)值.
格式:second(time)
參數(shù):time是一個(gè)有效的時(shí)間表達(dá)式;
例子lt;% =second(# 12:28:30#) %>
結(jié)果:30
29.函數(shù)strReverse()
功能:返回與原字符串排列逆向的字符串.
格式:strreverse(string)
參數(shù):string是字符串
例子<% =strreverse(“this is a test!”)
結(jié)果:!tset a si siht
30.函數(shù)time()
功能:返回當(dāng)前系統(tǒng)的時(shí)間值.
格式:time()
參數(shù):無(wú)
結(jié)果:9:58:28 Am
31.函數(shù)trim()
功能:刪去字符串前,后的空格.
格式:trim(string)
參數(shù):string 字符串.
例子:
 

strtest="this is a test!"
response.write trim(strtest)

結(jié)果:this is a test!
32.函數(shù)UBound()
功能:返回一個(gè)數(shù)組的上界.
格式:Ubound(expression [,dimension])
參數(shù):expression 是數(shù)組表達(dá)式/數(shù)組變量,dimension 是任意項(xiàng)
例子:


i = array(“1”,”2”,”3”)
response.write ubound(i)

結(jié)果: 2
33.函數(shù):UCase()
功能:將一字符類(lèi)型變量的字符全部變換成大寫(xiě)字符.
格式:Ucase(string)
參數(shù):string是字符串變量
例子:
<%
str=“THIS is Lcase!”
response.write Lcase(str)
%>
結(jié)果:THIS IS LCASE!
34.函數(shù)Vartype()
功能:返回變量的常量代碼(整數(shù))
格式:Vartype(varname)
參數(shù):varname是任何類(lèi)型的變量名稱(chēng).
例子:
<%
i=5
response.write vartype(i)
%>
結(jié)果:2 (2表示整數(shù),須要參考ASP常量代碼.)
35.函數(shù)Weekday()
功能:返回一個(gè)整數(shù),對(duì)應(yīng)一周中的第幾天.
格式:Weekday(date [,firstofweek])
參數(shù): date為日期變量,firstofweek為任選項(xiàng).
例子:
<%
d= # 5/9/00 #
response.write weekday(d) %>
結(jié)果:3(3 表示是星期二)
36.函數(shù)weekdayname()
功能:返回字符串,對(duì)應(yīng)星期幾.
格式:weekdayname(weekday[,abb[,firstdayofweek]])
參數(shù):weekday為日期變量,abb,firstdayofweek為任選項(xiàng).
例子:
<%
d = #8/4/99#
response.write weekdayname(d)
%>
結(jié)果: Wednesday
37.函數(shù)year()
功能:返回日期表達(dá)式所在的年份.
格式:year(date)
參數(shù): date是有效的日期表達(dá)式
例子:
<% =year(#8/9/99#) %>
結(jié)果:1999
38.函數(shù)Mod()功能:取余數(shù).
例子:3 Mod 2
結(jié)果:1
常用函數(shù):
*******************************************************************
'取得IP地址
'*******************************************************************


Function Userip()
Dim GetClientIP
'如果客戶端用了代理服務(wù)器，則應(yīng)該用ServerVariables("HTTP_X_FORWARDED_FOR")方法
GetClientIP = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If GetClientIP = "" or isnull(GetClientIP) or isempty(GetClientIP)
Then
'如果客戶端沒(méi)用代理，應(yīng)該用Request.ServerVariables("REMOTE_ADDR")方法
GetClientIP = Request.ServerVariables("REMOTE_ADDR")
end if
Userip = GetClientIP
End function



'*******************************************************************
'轉(zhuǎn)換IP地址
'*******************************************************************


function cip(sip)
tip=cstr(sip)
sip1=left(tip,cint(instr(tip,".")-1))
tip=mid(tip,cint(instr(tip,".")+1))
sip2=left(tip,cint(instr(tip,".")-1))
tip=mid(tip,cint(instr(tip,".")+1))
sip3=left(tip,cint(instr(tip,".")-1))
sip4=mid(tip,cint(instr(tip,".")+1))
cip=cint(sip1)*256*256*256+cint(sip2)*256*256+cint(sip3)*256+cint(sip4)
end function

'*******************************************************************
' 彈出對(duì)話框
'*******************************************************************
Sub alert(message)
message = replace(message,"'","\'")
Response.Write ("

<ruby id="elckf"><tbody id="elckf"></tbody></ruby>