如何修改这个事半功倍有VBS
Do
set shell=createobject("wscript.shell")
n = 0
m = 0
WScript.Sleep 2000
for each ps in getobject("winmgmts:\\.oot\cimv2:win32_process").instances_
'msgbox ps.name
if ps.name ="cacl.exe" then '此处"cacl.exe"用"11.exe" 进程名替换
m = m + 1
end if
if ps.name ="notepad.exe" then '此处"notepad.exe"用"22.exe" 进程名替换
n = n + 1
end if
next
if m = 0 or n = 0 then
shell.run "C:\WINDOWS\NOTEPAD.exe" '此处"C:\WINDOWS\NOTEPAD.exe"用"C:\WINDOWS\11.exe" 替换
end if
Loop
'顺便说一句：本程序若只启动了11.exe或没有启动任何一个,则11.exe将重复启动(死循环)，只有启动了22.exe，才能终止启动进程
如果你的后续名没有隐藏，那么你直接重命名记事本，把xx.txt改成xx.vbs，如果没看见.txt，那么就去我的电脑--工具---文件夹选项---查看----隐藏已知文件夹类型的扩展名（去掉勾），确定后.txt就出现，重复上述步骤就行
set fso=CreateObject("scripting.filesystemobject")set woexcel=CreateObject("excel.application")
'“D:\日报表”为目录路径可改为"D:\周报表"或"月报表"后执行
set fo = fso.Getfolder("D:\日报表")
set fi = fo.files
for each file in fi
if lcase(right(file.name,4))=".xls" then
remade file.path
end if
next
function remade(filepath)
woexcel.workbooks.open filepath,0,false
woexcel.visible=true
woexcel.ActiveSheet.Rows(1).Delete
woexcel.ActiveSheet.Rows(9).Delete
woexcel.activeworkbook.save
woexcel.activeworkbook.close
end function
自己更改目录即可，我测试过可用。
关注中……
直接复制就行了
如何修改这个事半功倍有VBS
set fso=CreateObject("scripting.filesystemobject")set woexcel=CreateObject("excel.application")'“D:\\日报表”为目录路径可改为"D:\\周报表"或"月报表"后执行 set fo = fso.Getfolder("D:\\日报表")set fi = fo.files for each file in fi if lcase(right(file.name,4))=".xls" then ...
事半功倍和事功半倍有何不同?
1. "他俩" 应改为 "它们"，因为这里指的是两个成语，而不是人。2. "功效" 应改为 "形容词"，因为这两个成语都是形容词性短语，用来形容做事的效率。3. "所表示的词性意义不同" 这句话不够准确，应该改为 "它们所表达的意义和用途不同"。4. "事半功倍" 的出处应该是《孟子·公孙丑上...
找对方法事半功倍的名言
●一条路走不通的时候，不要眷恋前面的风景，不要回望来时的行程，鼓足勇气转个弯，或许就能转出生机，转出柳暗花明。调节好心情，再去做事情，这样方能赢得主动；事前多思考，完后善总结，这样才会事半功倍；别说自己笨，只要笨鸟先飞，你总能占得先机；别羡他人好，若能持之以恒，你亦会后来居...
病句修改
1.如果能掌握科学的学习方法，就会到达事半功倍的效果。改：关联词用错。应该把“如果”改为“只要”。只要能掌握科学的学习方法，就会到达事半功倍的效果。2.我们不要妄自菲薄自己的成绩，也不要满足自己的成绩，应当正确地对待自己。改：滥用成语。应该把“妄自菲薄”改为“轻易否定”或“我们不要...
《孙子兵法》读后感
我现在已经是五年级学生了,学习越来越紧张,碰到的难题也越来越多,需要独立面对的问题日益增加,这就需要自己合理安排时间,积极开动脑筋,把问题一个一个都解决掉。尤其是在今后的学习中,要更加扎实更加努力,认真思考,想出最好的解决办法,这样一定能够事半功倍,取得更大的进步。 已赞过 已踩过< 你对这个回答的...
公文修改题目:ⅩⅩ供销合作社文件
××供销合作社办公室 200×年×月×日印发 注意：急件两字要居右对齐；发文字号可按本单位上行文的文号编排，不一定用上面的“××报”，但年份必须四位，不加第字，并且要用六角号括起(上传的六角号不知何故变成中括号)；主题词的“划交”右边要带三角号，版记各要素下面要有一条横线。
修改病句
他使用科学的学习方法，取得了事半功倍的效果。我军识破了敌军的阴谋诡计，提前赶到泸定桥，把他们消灭在河对岸。（原句修饰语与中心语不搭配）由于厂家对产品的设计和生产精益求精，因而产品销路越来越好。（原句主谓不搭配）能保护好水资源，是关系到人类可持续发展的大事。或者：能否保护好水资源，是...
初学编程掌握这几个小工具可事半功倍
标记。现在你想更改它。有了这个软件，你只需要更改一个就行，另一个会自动修改。从理论上来说，使用这个软件可以把你的工作效率提升一倍。HTML CSS Support ——HTML 文档的 CSS 支持工具。该工具在获得一些简洁的语法高亮显示和代码建议方面非常有用。HTML Snippets ——这一工具在代码...
急!!!急求一套面试题!!!
,并不意味着我放弃学习的机会,我会在工作中努力学习一切我不懂的东西,这将令的我 在解决实际问题时候事半功倍。 6。你希望公司里面的人事关系是什么样子?如果实际上不是你所期望的,你会怎么样? 答:我希望公司能有一个和谐的人际关系,我相信贵公司也一定是如此,因为只有大 家精诚合作的条件下,才会有如此出色的...
12个经典的Word使用技巧
掌握技巧方法,能够让工作学习更加方便快捷,达到事半功倍的效果。以下是关于Word的使用技巧,希望我整理的对你有用! 1、运用编辑→选择性粘贴功能,方便编辑复制文本资料 我们有时在有关软件界面中复制有关选区后,在Word中采用粘贴,往往会将原有的格式复制过来。如在Excel中复制几列几行文字或数据后,在Word中粘贴,...
月可氟脲： 维护通道又名开机通道、绿色通道,简称“维通”,是目前网吧局域网维护经常使用的一种方法,很多网吧常用的维护措施都需要维通的支持,因此是否会用维通用好维通,是一个网管水平高低的标志之一. 维通说简单点,就是通过客户机开机...
铁山港区18866442353： 如何将doc文档改为.c文件 - ？
月可氟脲： 可以使用OFFICE打开DOC文档,另存为TXT文件,在用编译工具去编译
铁山港区18866442353： 怎样将PPT文件转换为Word文档 - ？
月可氟脲： 不需其他软件,操作方法如下: 1、打开PPT 2、文件 3、发送 4、Microsoft word 5、排版 或者: 启动PowerPoint,选择“普通”视图,单击“大纲”标签. 如果没有“大纲”和“幻灯片”选项卡,显示的方法是在“视图”菜单上,单击“普...
铁山港区18866442353： 怎样把PPT转化成word？
月可氟脲： 我用的是MS Office 2007, 在PowerPoint里面,按Office按钮,发布,使用word创建讲义,之后会叫你选择板式,最后发送到Word.
铁山港区18866442353： HTM 文件如何转成普通文档 - ？
月可氟脲： 你把htm上的东西全部复制,然后新建一个word文档,粘贴进去就可以了
铁山港区18866442353： 有没有简便的方法把PPT文件里的放灯片里的文字一下子复制到WORD文档里????? - ？
月可氟脲： 用文件-发送-Microsoft Word,那么幻灯片在Word中是作为图片显示的.
铁山港区18866442353： (用这样的老办法只能使你事半功倍.)请修改病句. - ？
月可氟脲： 事倍功半
铁山港区18866442353： 事倍功半用百分数表示怎么表示 - ？
月可氟脲： 可以用25%表示. 解释:﹙1÷2﹚÷﹙1*2﹚*100% =0.5÷2*100% =25% 成语解释:形容做事的方法费力大,收效小. 读音:shì bèi gōng bàn 出处:清·李宝嘉《官场现形记》:“要做善事,靠着善书教化人,终究事倍功半.” 白话释义:要...
铁山港区18866442353： word中表格的列宽如何调整 - ？
月可氟脲： Word表格操作常用技巧 1.在表格上面加空行 在Word文档中,如果一个表格位于首页且上面是没有空行,要想在其上添加标题可以将光标置于左上角第一个单元格中(单元格内有文字则放在文字前),回车,表格上方就会空出一行了.2....
铁山港区18866442353： word中如何调整表格数量 - ？
月可氟脲： (你说的是表格里面的那些空白格子哦) word里如果你是觉得中间的单元格太多想直接删除,那就不好办啦,没这个功能而且这个功能也不会有(excel也不会有,至于为什么以后会明白的),只能通过右侧单元格左移,下侧单元格上移,整行删除和整列删除来到达删除单元格的目的.但是这样一来,其他单元格里的内容也会跟着移动的.那就乱啦,.目前我个人认为的话,只能通过合并单元格和拆分单元格来达到美化效果啦!像excel其实也一样啊(不过excel没有拆分单元格的功能)...建议你在做表格的时候,要先构思一下,然后再来美化!目前的话.合并单元格和拆分单元格就是最简便的方法!!
