VBscript常用函数.docx
- 文档编号:16663177
- 上传时间:2023-07-16
- 格式:DOCX
- 页数:15
- 大小:23.80KB
VBscript常用函数.docx
《VBscript常用函数.docx》由会员分享,可在线阅读,更多相关《VBscript常用函数.docx(15页珍藏版)》请在冰点文库上搜索。
VBscript常用函数
VBscript常用函数[实用zz]
VBscript常用函数:
1.数值型函数:
abs(num):
返回绝对值
sgn(num):
num>01;num=00;num<0-1;判断数值正负
hex(num):
返回十六进制值直接表示:
&Hxx最大8位
oct(num):
返回八进制值直接表示:
&Oxx最大8位
sqr(num):
返回平方根num>0
int(num):
取整int(99.8)=99;int(-99.2)=100
fix(num):
取整fix(99.8)=99;fix(-99.2)=99
round(num,n):
四舍五入取小数位round(3.14159,3)=3.142中点数值四舍五入为近偶取整round(3.25,1)=3.2
log(num):
取以e为底的对数num>0
exp(n):
取e的n次幂通常用num^n
sin(num):
三角函数,以弧度为值计算(角度*Pai)/180=弧度con(num);tan(num);atn(num)
2.字符串函数:
len(str):
计算字符串长度中文字符长度也计为一!
mid(str,起始字符,[读取长度]):
截取字符串中间子字符串
left(str,nlen):
从左边起截取nlen长度子字符串
right(str,nlen):
从右边起截取nlen长度子字符串
Lcase(str):
字符串转成小写
Ucase(str):
字符串转成大写
trim(str):
去除字符串两端空格
Ltrim(str):
去除字符串左侧空格
Rtrim(str):
去除字符串右侧空格
replace(str,查找字符串,替代字符串,[起始字符,替代次数,比较方法]):
替换字符串
注:
默认值:
起始字符1;替代次数不限;比较方法区分大小写(0)
InStr([起始字符,]str,查找字符串[,比较方法]):
检测是否包含子字符串可选参数需同时选返回起始位置
InStrRev(str,查找字符串[,起始字符][,比较方法]):
反向检测是否包含子字符串返回起始位置
space(n):
构造n个空格的字符串
string(n,str):
构造由n个str第一个字符组成的字符串
StrReverse(str):
反转字符串
split(str,分割字符串[,次数][,比较方法]):
以分割字符串为分割标志将字符串转为字符数组可选参数需同时选
3.数据类型转换函数:
Cint(str):
转换正数True-1;False0;日期距离1899/12/31天数;时间上午段0;下午段1;
Cstr(str):
日期输出格式yyyy/mm/dd;时间输出格式Am/Pmhh:
mm:
ss
Clng(str):
与Cin()类似
Cbool(num):
num不为零True;反之False
Cdate(str):
转换日期格式0:
#Am12:
00:
00#;正数距离1899/12/31天数的日期;浮点数日期+小数时间
Cbyte(num):
num<255转换为字节
Csng(str):
转换为单精度数值
Cdbl(str):
转换为双精度数值
Ccur(str):
转换为现金格式
4.时间函数:
date:
取系统当前日期
time:
取系统当前时间
now:
取系统当前时间及日期值Datetime类型
timer:
取当前时间距离零点秒值,计时器,可计算时间差
DateAdd(间隔单位,间隔值,日期):
推算相邻日期
DateDiff(间隔单位,日期一,日期二):
计算时间差日期二-日期一
Datepart(间隔单位,日期):
计算日期的间隔单位值
Dateserial(date):
输出日期值(按序列计算)
Timeserial(time):
输出时间值(按序列计算)
DateValue(datetime):
取出字符串中日期值
Timevalue(datetime):
取出字符串中时间值
weekday(date):
计算星期几
MonthName(date):
输出月分名
year(datetime):
截取年份
month(datetime):
截取月份
day(datetime):
截取日
hour(datetime):
截取小时
minute(datetime):
截取分钟
second(datetime):
截取秒
5.其它函数:
Array(unit,..):
动态生成数组
Asc(str):
输出字符串第一个字符的ASCII码
Chr(asc):
转换ASCII为字符Enter:
Chr(13)&Chr(10)
Filter(数组名称,关键字符串,[,包含][,比较方法]):
将字符串数组中含有关键字符串的元素存成新的数组(默认)[包含]为false则取不包含的元素
Join(ArrayName):
将数组中元素连成字符串
Ubound(ArrayName[,维数]):
取得数组相应维数的上界
Lbound(ArrayName[,维数]):
取得数组相应维数的下界一般为0
Randmizen:
启动随机数种子
Rnd(n):
取得随机数,n>0或为空,取序列下一随机值,n<0,随机值相同,n=0,生产与上一随机值相同的数
取介于A和B之间的随机正数C,公式:
C=Int((B-A+1)*Rnd()+A)条件(B>A)
子程序和自定义函数
SubStrSubNameFunctionStrFunName(arg[1],..)
子程序体函数体
ExitSub中途跳出ExitFunction中途跳出
EndSubStrFunName=Value返回值
EndFunction
[call]StrSubName引用子程序Var=StrFunName(arg[1],..)引用函数
子程序和自定义函数可以递归调用;
ASP六大对象常用语句示范:
Response:
Response.writeStrVar/"String":
向网页写出参数值或字符串等同于在Html标记中嵌入<%=StrVar/"String"%>
Response.End:
停止页面编译,并将已经编译内容输出到浏览器
Response.Buffer=True|False:
页面编译时是否使用缓存的设置,一般在页面头部设置
Response.Flush:
强制输出页面已编译部分内容
Response.Clear:
将缓冲区内的数据清除
Response.RedirectURL:
停止页面编译或输出,转载指定所需页面
Response.IsClientConnected:
返回True|False,检测用户是否还处于连接状态
Response.Charset(CharsetName):
设置页面编码类型,即
Response.ContentType[=ContentType]:
设置页面文件类型,同上
Response.Expires[=number]:
设置页面失效时间,单位分钟
Response.ExpiresAbsolute[=[date][time]]:
设置页面失效的绝对时间
Response.Status=StatusDescription:
设置页面状态描述
Request:
Request("PassStrName"):
读取网页传递值,包括表单及以?
PassStrName=value&PassStrName_n=value_n形式
Request[.collection|property|method](variable)
Request.querystring("PassStrName"):
读取Get方法传递的表单值和?
PassStrName=value
Request.QueryString(Varible)[(Index).Count]
Request.form("PassStrName"):
读取Post方法传递的纯表单域的值
Request.Form(Parameter)[(Index).Count]
Request.ServerVaribles(ServerEnvironmentVariable):
读取客户端系统环境变量,详见参考
Request.BinaryRead(Count):
读取指定字节数的传送值
Request.TotalBytes:
查询体的长度,以字节为单位,只读
注:
同名表单如:
CheckBox如有多项值,传递形式如右,StrName=value1,value2,...需要用Split函数分割各项值
Multiple的Select表单与CheckBox类似,TextArea的值可包含换行字符,用Replace转为
,以满足格式需要
Session:
(用户全局变量)
Session("SesName")=value:
存储Session变量值,也可读取该值
Session("SesName")=Empty:
判断Session值是否存在的两种方法
IsEmpty(Session("SesName"))=True|False:
判断Session值是否存在的两种方法
Session.TimeOut=num:
设置Session变量的存在时效,单位分钟
Session.Abandon:
清除所有Session变量值
Session.SessionID:
Session变量的ID序列号,只读
Application:
(应用程序全局变量)
Application("AppName")=value:
存储Application变量值,也可读取该值
Application("AppName")=Empty:
判断Application值是否存在的两种方法
IsEmpty(Application("AppName"))=True|False:
判断Application值是否存在的两种方法
Application.Lock:
Application变量值锁定,防止同时更改变量值
Application.UnLock:
Application变量值解锁,允许更改变量值
注:
Session与Application变量都可以用来存储数组和系统对象,引用方法是变量名相当于数组名而已,
但不能直接改变其值,需要借助临时数组修改值后,再赋给Session与Application变量
Global.asa文件的结构:
<%@language="VBscript"%>
<%SubApplication_OnStart...EndSub
SubApplication_OnEnd...EndSub
SubSession_OnStart...EndSub
SubSession_OnEnd...EndSub%>
Server:
Server.MapPath("FileUrl"):
映射文件名的服务器站点绝对地址,Path=Server.MapPath(./)可以得到虚拟目录根路径
Server.HtmlEncode("string"):
转换为可以直接显示带Html格式的字符串,如:
<,>等
Server.URLEncode("string"):
转换为浏览器地址编码
setVar=Server.CreatObject("ObjName"):
创建对象变量
Server.ScriptTimeout=NumSeconds:
ASP程序页面执行时限,以秒为单位
Cookies:
存储在用户本机的临时变量,每个Cookie的最大字节4KB,最多可以有300个Cookie1.2MB
Response.cookies("StrCookieName")=value:
存储Cookie变量值,也可读取该值
Response.cookies("StrCookieName")="":
判断是否为空
Response.cookies("StrCookieName").Expires=Date:
变量有效期,以天为单位,小于当前时间立即失效
Response.Cookies(Cookie[(key).Attribute]):
标准语法
ObjectContext控制ASP的事务处理
ObjectContext.OnTransactionAbort:
由放弃的事务处理事件激发,在脚本完成处理后发生
ObjectContext.OnTransactionCommit:
由成功的事务处理事件激发,在脚本完成处理后发生
ObjectContext.SetAbort:
显式的放弃一次事务处理
ObjectContext.SetComplete:
覆盖前面任何调用ObjectContext.SetAbort方法的调用
Msgbox"string"/StrName:
VBscript提示框
表单的Onsubmit事件:
在同一页面写入FunctionFormName_onsubmit()..FormName_onsubmit=True/False..endFunction,
页面会在提交前先执行语句,并根据返回值判断是否完成提交任务。
数据库连接字符串举例:
Access2000:
conn.Open"Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&Server.MapPath("dbase\liuyan.mdb")
conn.Open"Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&Server.MapPath("dbase\liuyan.mdb")&";Password=admin"
Recordset.Open"数据表名",conn,2,2
SqlServer2000:
conn.Open"Provider=SQLOLEDB.1;UserID=sa;Password=admin;InitialCatalog=pubs;DataSource=server\garlmrm"
conn.Open"provider=SQLOLEDB;datasource=hyserver;uid=sa;pwd=;database=pubs"
Recordset.OpenStrSQL,conn,2,2
Dbase:
(?
)
connOpen"Driver={MicrosoftdBaseDriver};SourceType=DB;SourceDB="&Server.MapPath("目录名")
Recordset.OpenStrSQL,conn,2,2
FoxBase:
connOpen"Driver={MicrosoftVisualFoxProDriver};SourceType=DBF;SourceDB="&Server.MapPath("目录名")
Recordset.OpenDBF文件名或Select语句,conn,2,2
connOpen"Driver={MicrosoftVisualFoxProDriver};SourceType=DBC;SourceDB="&Server.MapPath("DBC数据库文件名")
Recordset.OpenDBF文件名或Select语句,conn,2,2
Excel:
connOpen"Driver={MicrosoftExcelDriver(*.xls)};DBQ="&Server.MapPath("XLS文件名")
Recordset.Open"Select*From["&sheet&"$]",conn,2,2
注:
使用DBF、DBC、Excel数据库,下面几点要注意:
Excel数据库只能读取、增加记录、修改记录,但不能删除记录;
DBF、DBC可以读取记录、增加记录、删除记录、修改记录,但是在增加记录时,任何一个字段值都不能为空,由此
可看出局限性很大,所以尽可能地用MDB或SQL数据库。
xmuer发表于2007-12-2912:
50
ASP之转换函数示例
ASP之转换函数示例
Variant变量一般会将其代表的数据子类型自动转换成合适的数据类型,但有时候,自动转换也会造成一些数据类型不匹配的错误.这时,可使用转换函数来强制转换数据的子类型.
函数功能
Asc函数返回与字符串的第一个字母对应的ANSI字符代码。
Chr函数返回与指定的ANSI字符代码相对应的字符
Hex函数返回表示十六进制数字值的字符串。
Oct函数返回表示数字八进制值的字符串。
CStr函数返回表达式,该表达式已被转换为字符串子类型。
CDate函数返回表达式,此表达式已被转换为日期子类型。
CInt函数返回表达式,此表达式已被转换为整数子类型。
CLng函数返回表达式,此表达式已被转换为长整数子类型
CSng函数返回表达式,该表达式已被转换为Single子类型
CDbl函数返回表达式,此表达式已被转换为Double子类型
CBool函数返回表达式,此表达式已转换为布尔子类型
1、Asc函数示例
下面例子中,Asc返回每一个字符串首字母的ANSI字符代码:
DimMyNumber
MyNumber=Asc("A")'返回65。
MyNumber=Asc("a")'返回97。
MyNumber=Asc("Apple")'返回65。
2、Chr函数示例
下面例子利用Chr函数返回与指定的字符代码相对应的字符:
DimMyChar
MyChar=Chr(65)'返回A。
MyChar=Chr(97)'返回a。
MyChar=Chr(62)'返回>。
MyChar=Chr(37)'返回%。
3、Hex函数示例
下面的示例利用Hex函数返回数字的十六进制数:
DimMyHex
MyHex=Hex(5)'返回5。
MyHex=Hex(10)'返回A。
MyHex=Hex(459)'返回1CB。
4、Oct函数示例
下面的示例利用Oct函数返回数值的八进制数:
DimMyOct
MyOct=Oct(4)'返回4。
MyOct=Oct(8)'返回10。
MyOct=Oct(459)'返回713。
5、CStr函数示例
<%num1=666StrWelcome="欢迎第"&CStr(num1)&"个来访者"%>
CStr将变量num1由整数子类型强制转换为字符串子类型
6、CDate函数示例
MyDate="October19,1962"'定义日期。
MyShortDate=CDate(MyDate)'转换为日期数据类型。
MyTime="4:
35:
47PM"'定义时间。
MyShortTime=CDate(MyTime)'转换为日期数据类型。
7、CInt函数示例
DimMyDouble,MyInt
MyDouble=2345.5678'MyDouble是Double。
MyInt=CInt(MyDouble)'MyInt包含2346。
8、CLng函数示例
DimMyVal1,MyVal2,MyLong1,MyLong2
MyVal1=25427.45:
MyVal2=25427.55'MyVal1,MyVal2是双精度值。
MyLong1=CLng(MyVal1)'MyLong125427。
MyLong2=CLng(MyVal2)'MyLong2包含25428。
9、CBool函数示例
DimA,B,Check
A=5:
B=5'初始化变量。
Check=CBool(A=B)'复选框设为True。
A=0'定义变量。
Check=CBool(A)'复选框设为False。
xmuer发表于2007-12-2912:
51
ASP之字符串函数示例
ASP之字符串函数示例
用字符串函数对字符串进行截头去尾、大小写替换等操作。
函数语法功能
LenLen(string|varname)返回字符串内字符的数目,或是存储一变量所需的字节数。
TrimTrim(string)将字符串前后的空格去掉
LtrimLtrim(string)将字符串前面的空格去掉
RtrimRtrim(string)将字符串后面的空格去掉
MidMid(string,start,length)从string字符串的start字符开始取得length长度的字符串,如果省略第三个参数表示从start字符开始到字符串结尾的字符串
LeftLeft(string,length)从string字符串的左边取得length长度的字符串
RightRight(string,length)从string字符串的右边取得length长度的字符串
LCaseLCase(string)将string字符串里的所有大写字母转化为小写字母
UCaseUCase(string)将string字符串里的所有大写字母转化为大写字母
StrCompStrComp(string1,string2[,compare])返回string1字符串与string2字符串的比较结果,如果两个字符串相同,则返回0,如果小于则返回-1,如果大于则返回1
InStrInStr(string1,string2[,compare])返回string1字符串在string2字符串中第一次出现的位置
SplitSplit(string1,delimiter[,count[,start]])将字符串根据delimiter拆分成一维数组,其中delimiter用于标识子字符串界限。
如果省略,使用空格("")作为分隔符。
count返回的子字符串数目,-1指示返回所有子字符串。
start为1执行文本比较;如果为0或者省略执行二进制比较。
ReplaceReplace(expression,find,replacewith[,compare[,count[,start]]])返回字符串,其中
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VBscript 常用 函数
![提示](https://static.bingdoc.com/images/bang_tan.gif)