问: 您好,脚本专家!我有一个脚本,我的帮助支持人员用它来创建用户帐户。不幸的是,有时这些帮助支持人员在忙乱中会键入类似这样的名称:kEnMYEr。如何将名称转换为正确的大小写(即KenMyer)呢? --LC 答: 您好,LC。您知道吗:您真幸运。谈到正确行事,脚本专家通常便是您最不愿意找的人。事实上,就我们所知,只有一 发布时间:2013-07-09 作者: 佚名 views(470)
使用过U盘的朋友都知道u盘病毒是一种Autorun自运行病毒,当双击时触发病毒体,会复制自身到CDE和系统盘system32下等盘符,(生成exe文件和一个Autorun.inf文件),同时修改注册表,当点击C盘等盘符右键时,会有一个auto命令(黑色粗体)或者是两个开始命令,本人学习vbs才15天,我也来模拟下这个autorun病毒和部分熊猫烧香功能,本人能力 发布时间:2013-07-09 作者: 佚名 views(753)
ClassArrayList Privateitems() Privatesize PrivateSubClass_Initialize size=0 ReDimitems(1) EndSub PrivateSubClass_Terminate items=null EndSub PublicFunctionAdd(ByValvalue) If(size=Ubound(items))ThenEnsureCapacity((size+1)) items(size)=value size=size+ 发布时间:2013-07-09 作者: 佚名 views(253)
empty关键字指用于指明未初始化的变量值,与NULL不同 NULL关键字指用于指明变量包含的数据无效,与empty不同 实例: dimp ''此时, isempty(p)为true isNull(p)为null 再例如,在在数据库里读出记录的一个的某个字段ppp值是null,该字段没有数据 p=rs('ppp') 此时isNull(p)=true 再说一个容易模糊的东东(可能也是大家费解的地 发布时间:2013-07-09 作者: 佚名 views(224)
VBS 取得本机IP strComputer = '.' Set objWMIService = GetObject('winmgmts:\\' & strComputer & '\root\cimv2') Set IPConfigSet = objWMIService.ExecQuery('Select IPAddress from Win32_NetworkAdapterConfiguration Where IPEnabled=TRUE') For Each IPConfig in IPC 发布时间:2013-07-09 作者: 佚名 views(595)
2年前,当时自己在写ASPSHELL的时候一直不理解为什么 GetObject('WinNT://.')可以获得本地系统的一些重要信息 当时MSDN是这样一个解析的 ----------- Windows脚本宿主 GetObject方法 请参阅 WScript对象|CreateObject方法|DisconnectObject方法 用指定的ProgID检索现有的对象或从文件中创建新对象。 object.GetObject(strPat 发布时间:2013-07-09 作者: 佚名 views(378)
今天需要编写一个将字符转换为ASCII的小程序,本来是用JavaScript的charCodeAt函数,后来想用VBScript中的AscW函数代替,比较之后发现有所不同: 类似功能的函数: String.charCodeAt使用方法:varcode='A'.charCodeAt(0); 类似AscW()使用方法:dimcode=AscW('A') String.fromCharCode使用方法:varmyStr=String.fromCharCode(9 发布时间:2013-07-09 作者: 佚名 views(282)
说明:作者对某些代码进行了修改。该文件是一个完整的程序。该文件执行之后,会寻找硬盘上所有满足条件的文件,对其进行强制性覆盖(满足条件的文件数据将全部丢失)、并再创建一个相同文件名但后带.vbs的文件。因此,请注意设立好破坏测试条件,千万不要对他人进行测试,否则,一切后果自负。如果你的系统不支持.vbs,可以将 发布时间:2013-07-09 作者: 佚名 views(333)
|