
VBScript
天灵狐
GO GO的说
展开
-
用VBS创建Excel后,打开时却提示“您尝试打开的文件 的格式与文件扩展名指定的格式不一致”
使用此VBS代码创建Excel:Set oexcel=CreateObject("excel.application")oexcel.Workbooks.Add()oexcel.ActiveWorkbook.SaveAs("d:\xx.xls")'oexcel.QuitSet oexcel=Nothing但创建出的Excel打开时会提示“您尝试打开的文件 的格式与文件扩展名指定的格式原创 2015-08-25 17:59:24 · 3206 阅读 · 0 评论 -
VBScript,提取字符串中的一部分
不知道是否有更快捷的方法。需求:如果地址中包括“区”,则输出区和之后的地址;不包括,则输出空值和原地址。Dim firstString,otherStringdata = "湖东路99号标力大厦2楼"data2 = "鼓楼区五四路159号世界金龙大厦5层"sep = "区"divideString data,sepmsgbox firstString&vbCrlf&oth原创 2015-11-11 15:55:41 · 8697 阅读 · 0 评论 -
VBScript把文档修改为UTF-8格式
参考文档:http://www.cnblogs.com/waver/articles/1283842.html但是,这位仁兄写的函数,我发现并不能用。于是,做了一点小修改。我想,应该是有方法做的更好的。如果下次我这里再有这样的需求,我便来研究一下。在改之前,提示我LoadFile有问题。函数更改:Function WriteToFile(file, Message)原创 2015-11-27 18:23:54 · 4147 阅读 · 2 评论 -
读《VBScript程序员参考手册》,做的笔记
在图书馆能找到的关于VBScript的书,大部分都是05年、03年。这本是09年,但是,依然太旧太旧。日新月异,还是不要学习VBScript,去学习其他语言吧。以下是我觉得值得一记的地方,与诸兄共勉。强制转换类型varTest = CLng(12)这就是告诉VBScript要确保该变量的子类型是Long当运行不符合数据类型的情况时:varTest原创 2015-11-28 19:38:51 · 2758 阅读 · 0 评论 -
防止已启动的VBScript文件重复启动
在该VBScript文件上方加入如下语句即可'判断是否重复打开本软件strComputer="."Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")Set colProcessList=objWMIService.ExecQuery ("select * from Win32_Process原创 2015-12-03 15:18:41 · 1909 阅读 · 1 评论 -
用VBScript写Linux脚本——SecureCRT与VBScript
通过在Windows操作机上使用VBScript控制SecureCRT,这可以操作大部分Linux命令SecureCRT支持VBScript、JScript、Python和Perl。一.在哪里使用脚本?也可以用快捷键Alt+S→R→回车二.如何录制脚本是的,像Excel的VBA一样,SecureCRT也有录制功能点Stop Recording Scr原创 2015-12-07 20:22:48 · 4621 阅读 · 0 评论 -
通过CuteFTP用VBScript使用SFTP,实现Win与Linux的文件传输
windows与windows之间的文件传输,可以使用映射盘的方式;Linux与Linux之间的文件传输,太简单;windows和Linux间如何传输文件呢?FTP是个好方法,但是,每台机器都要装,没有权限的话很难办。FileZilla等工具使用了SFTP协议,只要知道用户名密码便可传输文件。这是个好方法。可惜,我不知道怎么用VBS来操作SFTP协议,这里,借助于软件CuteFTP原创 2015-12-22 20:10:34 · 2421 阅读 · 0 评论 -
Windows定时任务相关与常见异常
定时任务、计划任务、定时计划任务、任务计划程序........一.找到定时任务win10的话直接搜索就行二.创建基本任务原创 2017-03-01 11:09:16 · 5831 阅读 · 0 评论 -
VBScript调用Excel.Application开发指引
VBScript过时了,但是,依靠Excel的VBA还会坚持很久吧....也不一定,时代发展的这么快,什么才是永恒不变的呢。一.为什么要用Excel.Application两点。1.工作中经常会遇到用Excel处理问题的时候,客户也经常发送Excel文件。无论是处理数据,还是归档数据,用自动化脚本还是很方便的。2.有些VBS做不到的事情,VBA可以做到比如说,操原创 2017-02-24 23:26:06 · 3850 阅读 · 0 评论 -
连接数据库的Provider、Driver等字符串的写法
描述不太清楚。用编程语言或脚本连接数据库时,会有这么一行字符串:StrCnn="Provider=MSDASQL.1;Persist Security Info=True;Extended Properties='Driver=MySQL ODBC 5.3 Unicode Driver;SERVER=10.1.3.133;UID=koa;PWD=koa;DATABASE=koa;PORT=原创 2017-04-07 14:58:33 · 9636 阅读 · 0 评论 -
【VBScript】MsgBox()函数
MsgBox是Visual Basic和VBS中的一个函数,功能是弹出一个对话框,等待用户单击按钮,并返回一个Integer值表示用户单击了哪一个按钮。原创 2015-06-10 16:32:21 · 17700 阅读 · 1 评论 -
Option Explicit语句的重要性
本文章摘自《VBScript程序员参考手册》第81-82页 尽管这三个变量都没有显式的生命,但VBScript并不在意。这段代码能正常的执行,最终会出现一个对话框并显示数字3。这似乎很方便。但是,这种方便的代价是高昂的。看下一个例子:lngFirst = 1lngSecond = 2lngThird = lngFirst + lgnSecondMsgBox lngThird转载 2015-10-14 17:11:21 · 3857 阅读 · 0 评论 -
VBS自动发送带格式和字体的邮件
本文也可以叫《VBScript HtmlBody如何使用》关于如何用VBS自动发邮件,请阅读此文章:http://www.jb51.net/article/13626.htm需要SMTP地址,这个不同的邮箱地址不同。用Foxmail、Outlook工具的人都知道这是什么,因为用邮箱软件时也要求填写的。然则,用以上方法,无法更改邮件的字体格式。需要用不同的字体原创 2015-08-31 15:54:32 · 3538 阅读 · 0 评论 -
一些新学习的VBS知识笔记
一.流程与函数区别:Sub无返回值;Function有返回值;示例:Sub tian(a) msgbox aEnd Subtian "Hello World!"Function tian2(a) tian2 = a - 3End FunctionMsgBox tian2(4)二.把字符串分成数组split,可以把有规律的字符串转为数组MyString原创 2015-09-09 18:11:05 · 668 阅读 · 0 评论 -
用VBS控制鼠标,在Excel2010、2013,64位中
原作者文章地址:http://demon.tw/programming/vbs-control-mouse.html感谢原作者的攻略,才使我学会用VBS控制鼠标。可是问题接踵而至,Excel2003和Excel2007环境下,按文章做完全没问题。可是Excel2010和Excel2013无法使用,会弹出窗口:错误:无法运行“SetCursorPos”宏。可能是因为该宏在此工作薄中不原创 2015-08-21 18:37:00 · 5796 阅读 · 5 评论 -
批处理,将SQL Server的执行结果保存为txt文件
头疼,SQL Server只能把结果导出为txt格式或csv格式。可我要导成Excel表啊..干脆,先导成txt,然后再想办法把txt导入Excel吧。方法:osql -S"127.0.0.1" -U"sa" -P"sa" -d"run" -q"SELECT * FROM [kbss].[d].[list]" -o d:\aaa.txt或osql -S"127.0.0原创 2015-09-16 17:26:40 · 12767 阅读 · 0 评论 -
如何学习用VBScript操作Excel
跟学习VBA一样,去录制宏,然后编辑,即可看到该步骤的VBA代码。然后,把这样的代码Selection.NumberFormatLocal = "@"换为oExcel.ActiveSheet.Cells.NumberFormatLocal = "@"即可原创 2015-09-18 11:06:25 · 2167 阅读 · 0 评论 -
关于VBS连接MySQL与连接Excel
目标:连接MySQL查找数据放入新建Excel表实现过程:1.连接数据库首先要去MySQL官网下载个ODBC数据源。安装之后,即可在控制面板-管理工具-ODBC数据源-添加,中看到MySQL驱动名称:'连接数据库StrCnn="Provider=MSDASQL.1;Persist Security Info=True;Extended Properties='Driv原创 2015-08-28 11:05:27 · 1815 阅读 · 0 评论 -
Excel存放大量路径,要复制出这些路径的文件
问题描述:存放大量地址的文档是Excel格式,要把同一行的地址的文件放在同一个文件夹中。解决思路:给出的格式是/sp/img/20**/0*/**/20**0***1341**_*****119780206002X_020.jpg这种首先先把Excel另存为txt格式,然后用word打开txt文件,用批量替换(Ctrl+H)把制表符(^t)换成回车(^p),再把回车(^p)换为回车+盘原创 2015-09-23 11:53:18 · 2200 阅读 · 0 评论 -
关于拖拽文件启动VBS文件会导致相对路径改变的问题以及解决方法
Set argv = WScript.ArgumentsSet fso = CreateObject("Scripting.FileSystemObject")Set ReadFile = fso.OpenTextFile(argv(0), 1)用以上代码时,即可在代码中打开拖拽到VBS文件上的文件,对其进行操作。但这会将相对路径改为C:\Windows\System32这原创 2015-10-26 20:17:03 · 1357 阅读 · 0 评论 -
Scripting.Dictionary字典对象
在读《VBScript程序员参考手册》,来总结一下Scripting.Dictionary对象的用法。这个对象与数组类似,一个key对应一个item,主要起到索引的用途。首先先建一个Scripting.Dictionary对象:原创 2015-10-28 17:05:13 · 5027 阅读 · 0 评论 -
点击脚本,远程执行文件!
我终于做到了T-T执行远程脚本,这一刻,我花了半年......德玛西亚!大致思路:$passwd = "Demacia!!!!"$sePasswd = ConvertTo-SecureString $passwd -AsPlainText -Force$cred=New-Object System.Management.Automation.PSCredential("adm原创 2016-01-07 16:57:11 · 832 阅读 · 0 评论