public Function SaveText(filePath,content)set fso=createobject("scripting.filesystemobject") Set f = fso.CreateTextFile(filePath,True)f.write(content)f.closeEnd Function Function copy(value,objShell) 'replace_str=""&chr(34)'Set reg…

set WshShell=WScript.CreateObject("WScript.Shell") Const user = "hugetech2" Const pwd = "huge204204" " Const mobilePwd = "basketball123" Dim userToken Dim mobile Dim identify identify = " '登陆api网站,获取用户toke…

最近新加入,把自己一些有意思的小东西分享给大家,我是一个学生,代码写得少,哪里不规范,希望大家见谅. 这事我封装好的一个类,可以直接实例化对象之后,调用"对象.Talk()"方法,让机器读出你传递进去的字符串. 这个程序原理很简单,就是创建文件读写流,在D:\Alarm下创建一个sys.vbs文件,里面写入CreateObject("SAPI.SpVoice").Speak "你的字符串",然后执行这个vbs,就可以让你的电脑发声啦,听说Wind…

在项目中需要在一定条件满足时,保存一些数据到数据库中,并可根据条件查询.考虑到WinCC6.2以后采用的就是SQL Server2005数据库,所以直接利用该数据库即可,通过SQL Server Management Studio(SSMS)可以创建自己的数据库,并安要求创建好表. 一.数据库连接 在SQL Server Management Studio(SSMS)中创建名为evcp的数据库,再创建名为evcp的表,然后根据需要创建Columns,在本项目中创建了norder(流水号).pil…

使用vbs脚本进行批量编码转换 最近需要使用SourceInsight查看分析在Linux系统下开发的项目代码,我们知道Linux系统中文本文件默认编码格式是UTF-8,而Windows中文系统中的默认编码格式是Gb2312.系统内的编码格式有所区别倒无伤大雅,关键的是SourceInsight竟不支持UTF-8,导致项目代码内的中文注释全部乱码! 既然SourceInsight不支持UTF-8编码的文件,那我们就得想办法将UTF-8的代码文件转化为GB2312编码的.首先想到的是到网上搜一下“…

Dim vbs1 'set vbs1 = WScript.CreateObject("WScript.Shell") set vbs1 = WScript.CreateObject("SAPI.SpVoice") '语言的改变 在 Win+R中 输入 sapi.cpl 那里有 如 Microsoft Lili 的显示 ) vbs1.Rate = '速度-10,10 vbs1.Volume= '音量 0,100 vbs1.Speak "wjshan0808&…

1.概述 Windows Script Host除了提供一个对象模型之外,还提供了一种脚本框架,这就是WSF脚本.通过WSF约定的标记元素,可以将多种脚本语言写的代码块组合起来,完成任务.除此之外,还可以实现一些DOS没有的命令功能,通过CScript xxx.wsf /?来查看帮助文档,帮助文档由WSF声明并由解释器动态生成完整的文档.再联合使用WshEnvironment对象,即可对DOS命令,随心所欲的提供增量功能实现了. 2.WSF标记 元素 语法 属性 备注 <?job?> <…

1.概述 HTA全称Html Application,在Windows中由mshta.exe加载执行,是一种本地程序.可使用html元素来构建界面,用JS或VBS来构建执行逻辑,从而强化Windows脚本的交互能力与友好性.只要将Html文件扩展名改为.hta即可将html当做一个hta程序来运行. 2.<HTA:APPLICATION>元素 <HTA:APPLICATION>元素必须全大写,其中的APPLICATION不可少:它拥有一些属性[它们是只读的],用以来控制HTA进程和…

vbs 字符串包含中文字符,文件以UTF-8无BOM格式保存,就会出现“编译器错误: 未结束的字符串常量”错误,改以ANSI保存就没有这个问题…

回想90年代,我们在DOS下使用各种命令链对操作进行简化和自动化,如DOS 5.0添加的DosKey,利用管道和重定向对多组命令进行链式操作.后来使用了Ubuntu和其它Linux发型版后,bash下对命令的链式操作则更加强大,并可以和其它编程语言协作,不过复杂度也有所提升.现在Windows下利用自带的bat/vbs也可以满足大多数简化操作的需求,虽然这些技巧大多是10-20年前的老古董了. 快捷键 把常用程序的快捷方式拖到开始菜单目录下,添加快捷键,Ctrl+Alt+* 呼出. 为bat添加…