脚本专栏 第351页
VBS基础篇 - wscript 对象详解
一、wscript对象描述:提供对Windows脚本宿主对象模型根对象的访问。详述:WScript对象是Windows脚本宿主对象模型层次结构的根对象。它可在任何脚本文件中使用,不需
VBS基础篇 - VBScript过程(使用sub 与 Function定义函数)
我们一般都是在重复使用一些功能的时候,例如循环输出内容、分页的时候都会使用过程函数Sub过程Sub过程是包含在Sub和EndSub语句之间的一组VBScript语句。如果Sub过
VBS基础篇 - vbscript常用函数及功能
vbs常用函数函数名语法功能AbsAbs(number)返回一个数的绝对值SqrSqr(number)返回一个数的平方根SinSin(number)返回角度的正玄值CosCos(number)返回角度的余玄值T
VBS基础篇 - vbscript class类的定义与使用
从网上看到一个vbs中使用class的例子,转出来,共同学习!Class语句:声明一个类的名称,以及组成该类的变量、属性和方法的定义。vbs类的使用方法类的结构:class类名称
vbs操作txt文本文件常用方法与函数代码
'creatby席飞剑(小席老师)'操作文本文件,操作fso对象(文件对象操作)函数代码创建文件dimfso,fsetfso=server.CreateObject("Scripting.FileSystemObject")setf=fs
VBS基础篇 - vbscript Dictionary对象
Dictionary是存储数据键和项目对的对象,其主要属性有Count、Item、Key,主要方法有Add、Exists、Items、Keys、Remove、RemoveAll。创建Dictionary对象'定义并创建
VBS数组函数学习实例分析
Array函数返回包含数组的Variant。Array(arglist)参数:arglist是赋给包含在Variant中的数组元素的值的列表(用逗号分隔)。如果没有指定此参数,则将会创建零长度的
VBS基础篇 - vbscript TextStream对象
TextStream对象是用于访问文本文件的对象,它是FileSystemObject一个独立的附属对象,但在使用TextStream对象时,我们仍要借助FileSystemObject对象或其附属对象来创
VBS基础篇 vbscript Sendkeys模拟键盘操作
模拟键盘操作,将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行其使用格式为:object.SendKeys(string)object:表示WshShell对象string:表示要发送的
15分钟学会vbscript中的正则表达式
vbs中的正则表达式假定要搜索的字符串是str="helloworldHelloWorld"1--规则基本与dos中的findstr类似。有细微的差别。如果对规则有困惑的,可以在cmd中看看findst
在vbscript中判断COM类是否存在的实现代码
该文章由老刘原创,转载需注明原作者昵称。在VBS中,我们有时需要判断一个COM类是否存在,以便执行不同的操作。这里介绍2种基本的方法,其函数的返回值为Bool值,为真
vbs-toolkit VBSEdit 提供 免费的COM组件
VBSCRIPT语法简单强大但是功能上明显不足需要第三方的控制e.g.COM组件来扩展其功能.VBSEDIT安装完之后就可以在安装目录下发现免费提供的COM组件vbstoolkit.下载V
抖音vbs表白代码大全 抖音vbscript表白代码使用方法
当然斗音很热,这篇文章也有蹭热度的嫌疑。脚本之家以前就收录了类似这样的属于恶作剧的代码,其实就是判读如果不是你想要的结果就是死循环。抖音vbs表白代码制作教
VBS脚本实现遍历批量替换多目录多文件内容的代码
有时候我们需要将一个目录与子目录中的多个htm网页文件实现批量替换,这里就为大家分享一下将以下代码复制到一个文本文档中,并将文本文档的后缀修改为.vbs,直接运
VBS中FileSystemObject对象详解(完整版)
FSO是FileSystemObject或Scripting.FileSystemObject的缩写,为IIS内置组件,用于操作磁盘、文件夹或文本文件。FSO的对象、方法和属性非常的多,这里用示例的方式列
vbs 获取字符串(截取字串)
实例代码x="脚本之家是什么样的网站"y=right(x,len(x)-1)'获取第一字字符之后的所有字符字符msgboxy代码中的使用到的函数介绍left函数可以获取字符串左边的字符x
VBS中常见字符串操作函数
1.Split(expression,delimiter,count,compare)返回基于0的一维数组,其中包含指定数目的子字符串。expression:必选。字符串表达式,包含子字符串和分隔符。如果exp
vbs 自制数字益智游戏实现代码
在看vb开发,看到二维数组时突发奇想用二维数组作为游戏关卡;1.选择操作:游戏开始时会提示选择注册,登录,退出三种选项,2.注册:注册成功会将用户账户与密码存入用户
Vbs备份指定文件到指定目录并且以日期重命名的实现代码
说到备份,相信大家都会想到的第一个方法就是通过windows系统自带的windowbackup功能进行数据备份。后来微软又出了systemcentere产品后,就出现了一个新的备份产品
vbs实现的tasklist效果代码
ThisshortscriptusesWMItodisplaythesameinformationthaninthetool"tasklist",butdumpingtheresultontheconsole.Itcandumpremotetask
VBS递归创建多级目录文件夹的方法
核心代码CreateFolders"d:\jb51test\1\2\3\4\5"FunctionCreateFolders(path)Setfso=CreateObject("scripting.filesystemobject")CreateFolderExfso,pathsetf
用vbs脚本获取网卡MAC,CPUID,硬盘序列号的实现代码
这里先给大家分享一个分配静态ip地址的代码'AssignaStaticIPAddressstrComputer="."SetobjWMIService=GetObject("winmgmts:"_&"{impersonationLevel=impersonate
VBS日期(时间)格式化函数代码
核心代码currentTimeStr1=CStr(Year(Now()))&"-"&Right("0"&Month(Now()),2)&"-"&Right("0"&Day(Now()),2)&""&Right("0"&Hour(Now()),2)&":"&Right("0"&Minute(N
VBS读取配置文件配置项的实现代码
以下是一个读取配置文件的函数:本函数仅适用于以下格式的配置文件(.ini,.txt,.inf):key1=key1valuekey2=key2value........key1=key1valuekey2=key2value核心代码
用vbs实现文本循环读取
因为测试中需要读取一批URL数据进行浏览,其实使用QTP本身的table能实现多种读取方式,但是因为需要tabel是使用excel保存的,在没有安装excel的机器或者vsita机器上
使用VBS实现Hosts文件一键配置实现代码
先说一下怎么样进入hosts文件,Windows环境(我用的是一个32位的Win7)下hosts文件在计算机中的位置,在目录%windir%\System32\drivers\etc\,文件名为hosts,没有扩展
磁盘IO利用率监控VBS脚本(windows)
核心代码'程序名称:btlwchk_DiskIO.vbs'版权信息:Copyright(c)2011guangzhoubluetechtechnologyIncorporated.Allrightsreserved'程序用途:监测window
VBS一键配置VOIP脚本代码
代码比较长,对vbs感兴趣的朋友可以参考一下Dimws,fso,IESetIE=WScript.createobject("InternetExplorer.Application")Setws=WScript.CreateObject("WSCript.shel
监测windows主机网络接口利用率的vbs代码
btlwchk_netinterface.vbs'程序名称:btlwchk_netinterface.vbs'版权信息:Copyright(c)2011guangzhoubluetechtechnologyIncorporated.Allrightsrese
使用vbs脚本实现自动打字祝福与搞笑实现代码
概述听说抖音上流行一种用代码做程序表白的东西,,,,当然我也不是要表白,,,,但是好像蛮有意思的,,,,于是,又学了一下vbs脚本,做了几个很不错的祝福脚本,不懂代码的
vbs定期监控 值个班,定期瞄一下
系统:Windows7引言有些时候需要定期去执行一段程序,怎么办?这里提供一个方法,虽然有点绕,但效果还不错时间控制部分使用vbs实现思考:实验设计目标:定期执行一个Py
VBS批量重命名文件并且操作前备份原有文件
核心函数'==========================================================================''VBScriptSourceFile--CreatedwithSAPIENTechnologiesPrimalScr
VBS怎么获取指定目录下的文件列表
VBS肿么获取某目录下的文件列表dimFileName,fs,foldernamefoldername=InputBox("请输入想要在哪个文件夹查找","VBS查找文件")Iffoldername=""Thenwscript.quitEn
WINDOWS特有的消息常量标识符(vb,vbs常用)
'========================================'WINDOWS特有的消息常量标识符'========================================PublicConstWM_NULL=&H0&PublicConstWM_CRE
运行vbs脚本报错无效字符、中文乱码的解决方法(编码问题)
代码没有问题,总是报这样的错误。测试代码msgbox"脚本之家"很简单的代码,但如果编码不对问题就很多中文乱码问题运行图因为使用了utf8编码导致,因为我先用的记事本
vbs 复制指定文件到指定目录下
复制指定文件到指定目录下核心代码Setfso=CreateObject("Scripting.filesystemobject")FunctionCopyFileToPath()SrcPATH=createobject("Scripting.FileSystemObj
VBS打开当前脚本所在文件夹
方法一:Wscript.ScriptFullName'创建一个Wscript.Shell对象的实例,稍后会使用这个对象启动Windows资源管理器SetobjShell=CreateObject("Wscript.Shell")'获取脚本
vbs 读写注册表之系统启动项添加与删除
核心vbs代码'变量定义DimwriteName,writeValue,fileName,regLoaction,regApp'创建注册表编辑器对象SetregApp=WScript.CreateObject("WScript.Shell")'配置文件名
VBS定时执行idea程序的Testng文件的方法
背景:Windows环境cmd命令行执行TestNG文件,会报一些jar包路径问题,所以改用vbs打开idea程序的通过点击快捷键执行testng.xml文件。vbs代码如下:'第一部分:定义变量
拖拽文件显示文件路径的vbs代码
下面两段原理都是一样的,大家可以看下代码一Ifwscript.Arguments.count=0thenmsgbox"拖拽文件到本vbs文件",0,"提示"Endifforjb=0towscript.Arguments.count-1str
Office 批量激活的命令工具 ospp详解
Office软件保护平台脚本(ospp.vbs)使你能够配置Office产品(包括Project和Visio)的批量许可版本。ospp.vbs脚本opss.vbs脚本位于ProgramFiles\MicrosoftOffice\Off
VBS遍历Excel工作表的实现代码
核心代码'******************************************'拖拽文件,获取文件路径'******************************************Ifwscript.Arguments.count=0thenmsg
简单用VBS调用企业微信机器人发定时消息的方法
去年在企业微信群当中突然看到多了一个叫多群机器人的东西:企业微信群机器人以为是升级了什么黑科技,看了下说明,原来目前功能是一个接收自定义消息的Webhook接口
使用VBS浏览本地文件的3种方式,获取完整路径
因为系统组件差异,所以代码也有不同文章最后脚本之家给出一个通用的代码XP下:FunctionBrowseForFile()'SelectFiledialogbasedonascriptbyMayayana'Knownissues:'
allfiles.vbs 显示子目录下的所有文件的修改时间、大小、文件名
有的时候将子目录下的所有文件的修改时间、大小、全限定名等信息导出到Excel表格中。尝试过命令行,但不太好用——1.对于“dir/s>1.txt”,当前目录与文件列表是分
VBS进程判断代码
vbs核心代码OptionExplicitDimobjWMIService,colProcessList,strComputerstrComputer="."SetobjWMIService=GetObject("winmgmts:{impersonationLevel=impe
自动以管理员身份运行批处理bat文件(vbs与bat两种方法)
但是,批处理脚本不会默认已管理员身份运行,一般情况下,我会将脚本命名为"XXXXXX(请右键点击,用管理员身份运行!).bat",但总有些用户会忽略这条提示,直接运行,此时
VBS遍历文件或文件夹路径输入文件的所有绝对路径(附源码)
源码如下:FunctionlistFilesPath(filepath)t1=Timer()Debug.WriteLine"****现在开始执行计数,用时:"+CStr(t1)Setfso=CreateObject("scripting.filesystemobject"
vbs提示没有在该机执行windows脚本宿主的权限。请与系统管理员
最近在项目中使用VBS来实现图片的批量删除和批量导入功能,但不知道为什么,只要在我机器上一运行VBS文件就提示“没有在该机执行windows脚本宿主的权限。请与系统管
ActiveX部件不能创建对象:dm.dmsoft代码:800A01AD
vbs调用插件报:ActiveX部件不能创建对象,代码:800A01AD报错如下图:解决方法需要两步:第一步改注册表:HKEY_CLASSES_ROOT\VBSFile\Shell\Open|\Command将“%System
vbs源码之的IIS日志分析工具
为什么要开发vbs写的IIS日志分析工具?在网上找了很多IIS日志分析工具,功能实在太有限,有的仅能分析百度、谷歌等搜索引擎爬虫的来访次数,远远达不到我们的用户的需
vbs ping实现的两种方式
对于vbs中ping的实现可以通过两种方式:1、调用系统ping命令;2、使用wmi查询pingstate类处理。1、调用系统ping命令Setwshell=CreateObject("WScript.Shell")wshel
vbs获取操作系统及其版本号
vbs获取操作系统及其版本号'**************************************'*byr05e'*操作系统及其版本号'**************************************strComputer="."Seto
vbs小程序图标更改方法的实现
1.首先将vbs小程序放在一个自定义文件夹下,然后在此文件夹下生成vbs小程序的快捷方式2.将你想要换成的图片(图片像素要低)也放入此文件夹下,并改成bmp格式3.右击v
vbs查询局域网内电脑的软件和硬件列表清单
下面的代码在windows下容易报毒大家可以放心使用'==========================================================================''Date:2009/3/19'Name:查询软件
VBScript 动态 Array 的实现代码
记录一个小方法,关于VBScript中,动态Array的实现,也适用于VBA,在很久以前,写VBA的时候,就觉得使用Array和不方便,因为大小固定,当时想的是,要是Array可以像Python
如何用VBS脚本收集远程计算机或本地计算机安装的软件
目标用VBS脚本收集域中远程计算机或本地计算机安装的软件,Windows版本。并将收集的结果保存到计算机名为文件名的文本文件中。文本文件可以保存到网络路径中或当前
P70系列延期,华为新旗舰将在下月发布
3月20日消息,近期博主@数码闲聊站 透露,原定三月份发布的华为新旗舰P70系列延期发布,预计4月份上市。
而博主@定焦数码 爆料,华为的P70系列在定位上已经超过了Mate60,成为了重要的旗舰系列之一。它肩负着重返影像领域顶尖的使命。那么这次P70会带来哪些令人惊艳的创新呢?
根据目前爆料的消息来看,华为P70系列将推出三个版本,其中P70和P70 Pro采用了三角形的摄像头模组设计,而P70 Art则采用了与上一代P60 Art相似的不规则形状设计。这样的外观是否好看见仁见智,但辨识度绝对拉满。
更新日志
2026年01月08日
2026年01月08日
- 小骆驼-《草原狼2(蓝光CD)》[原抓WAV+CUE]
- 群星《欢迎来到我身边 电影原声专辑》[320K/MP3][105.02MB]
- 群星《欢迎来到我身边 电影原声专辑》[FLAC/分轨][480.9MB]
- 雷婷《梦里蓝天HQⅡ》 2023头版限量编号低速原抓[WAV+CUE][463M]
- 群星《2024好听新歌42》AI调整音效【WAV分轨】
- 王思雨-《思念陪着鸿雁飞》WAV
- 王思雨《喜马拉雅HQ》头版限量编号[WAV+CUE]
- 李健《无时无刻》[WAV+CUE][590M]
- 陈奕迅《酝酿》[WAV分轨][502M]
- 卓依婷《化蝶》2CD[WAV+CUE][1.1G]
- 群星《吉他王(黑胶CD)》[WAV+CUE]
- 齐秦《穿乐(穿越)》[WAV+CUE]
- 发烧珍品《数位CD音响测试-动向效果(九)》【WAV+CUE】
- 邝美云《邝美云精装歌集》[DSF][1.6G]
- 吕方《爱一回伤一回》[WAV+CUE][454M]