如何用vbs隐藏文件以及关闭显示隐藏文件?

想要在vbs脚本中添加一段代码,以实现取消显示隐藏文件,并把指定目录下的文件夹(文件夹内的子文件夹和文件不隐藏)和文件隐藏。如隐藏D盘根目录下的所有文件夹和文件,但文件夹里的内容不隐藏(太费时)。

1个回答

 Set wshell=CreateObject("WScript.shell") 
wshell.run "attrib -h c:\xxx.xxx",0

wshell.run "attrib +h c:\xxx.xxx",0是增加隐藏属性,类似的还有+r +s等等
如果要循环遍历可以用 scripting.filesystemobject
Csdn user default icon
上传中...
上传图片
插入图片
抄袭、复制答案,以达到刷声望分或其他目的的行为,在CSDN问答是严格禁止的,一经发现立刻封号。是时候展现真正的技术了!
其他相关推荐
使用vbs隐藏可执行文件.exe的问题

DIM objShell set objShell = wscript.createObject("wscript.shell") iReturn = objShell.Run("cmd.exe /C C:\xx.exe", 0, TRUE) 我这个.exe文件执行的时候会弹出两个窗口,上用了上面的命令只能隐藏最开始打开的窗口,怎么把之后打开的窗口也隐藏起来?两个窗口相继打开的时间不到1秒

bat脚本文件执行不显示窗口问题

请问各位大神 bat脚本 里面有个执行jar文件的命令 怎么让执行这个脚本的时候 doc窗口不弹出 改成vbs试过 报文件未结束的错 还有什么其他好的办法么

运行VBS文件提示没有权限,求帮助

![图片说明](https://img-ask.csdn.net/upload/201711/01/1509527121_616880.png)这是代码:'on error resume next set sysenv1 = CreateObject("WScript.Shell") set sysenv=sysenv1.Environment("system") '系统环境变量的数组对象 thepath=sysenv("path") newpath=sysenv1.CurrentDirectory & "\Contents\Cygwin\Versions2.0.a9.oga.1\i686" if Instr(thepath,newpath)=0 then sysenv("path")=thepath & ";" & newpath '添加变量 end if thepath=sysenv("path") 'Wscript.echo(thepath) Wscript.echo 本人完全小白,安装软件最后一步不行,求解决方法

VBS如何修改文件的换行方式?

源文件中某一行的换行方式未知,但是在vbs中使用readline语句读取的时候会报错,readline中识别的换行符号是vbcrlf,怎么才能找到源文件中使用的换行符号,并给他替换成vbcrlf,求大神解答!!!!!

JAVA中运行.vbs文件,没反应,什么原因 ?

Runtime.getRuntime().exec("cscript E:\\w2_0_2\\bin\\stop-g.vbs"); 使用上面一句代码,调试程序也不报错,但没有起到双击运行stop-g.vbs的效果,什么原因? 请指点,多谢。 .vbs中的代码如下 set ws=WScript.CreateObject("WScript.Shell") ws.Run "E:\w2_0_2\\bin\stop-g.bat",0

VBS中如何替换文本文件中的部分字符?

例如文本文件中的字符为:****....11111 如何将上述文本中的“*”和“.“全部替换为0.求代码???

VBS如何在文本文件中添加回车改变格式?

加入文本文件内的内容是 ******************** 我想通过vbs使其变成 ***** ***** ***** ***** ***** 并保存

VBS修改xml文件????????、、、、?

![图片说明](https://img-ask.csdn.net/upload/201812/04/1543911508_818522.jpg) 我想将这个xml文件的第29行内容中的*号实现换行,即每隔20个*加一个回车,假设有10000个*,并保存,求代码啊

写火狐扩展,调用本地的vbs文件,报错错误:0x800700c1代码:800700c1源(null)

写火狐扩展,调用浏览器本地的vbs文件,报错错误:0x800700c1 代码:800700c1 源(null),但是直接鼠标双击打开正常,vbs文件的内容如下: createobject("wscript.shell").run "tortoiseProcScript.bat",0,true wscript 和cscript2种打开方式都试过,例如 用“C:\\Windows\\System32\\cscript.exe”调用 "e:\\tortoiseProcScript.vbs",都不能正常运行,只不过1个 是弹窗口,一个是命令行闪过

vs2010打包msi程序,如何在安装时自动一个vbs或者bat脚本文件

我写的Activex控件,在html调用的时候有的电脑会提示某些加载项无法运行,百度的解决方案是将Activex设置都启用,加信任站点,所以就写在了一个bat文件里,用vbs调用(因为bat文件会弹出黑框),vs2010打包msi程序,想要在安装时自动执行这个vbs运行文件,应该如何设置,急急急

VBS批量替换(转换)文本文件中的单位(求达人瞧一下)

需求:遍历文本文件,在里面找到像素单位(例:“100px”),替换成相对单位(例如:“3rem”);px与rem单位转换过程中是一个固定比例。 研究半天弄了下面一个脚本,但是不能替换到位。望大佬给个意见 ``` Dim regEx,Match,Matches Set regEx = New RegExp '创建一个正则表达式 regEx.Pattern = "^[1-9]\d*px$" '设置正则表达式的匹配模式 regEx.IgnoreCase = True '设置为不区分大小写 regEx.Global = True '设置为全局可用 dim fso, f set fso = CreateObject("Scripting.FileSystemObject") set f = fso.OpenTextFile("1.txt", 1, false) '第二个参数 1 表示只读打开,第三个参数表示目标文件不存在时是否创建 set e = fso.OpenTextFile("2.txt", 8, True) Do Until f.AtEndOfStream strLine = f.ReadLine() '从当前位置向后读取直到遇到换行符(不读取换行符),并将当前位置移动到下一行的第一个字符,注意:无参数 Set Matches = regEx.Execute(strLine) '执行搜索 For Each Match in Matches '遍历所有的匹配 x=Len(Match) n=Left(Match,x-2) ' 拆分去掉最后的px o = n/30 ' 换算。 p ="rem" replStr = o&p' 拼接。 MsgBox regEx.Peplace(strLine,replStr) Next e.WriteLine(strLine) Loop f.Close() e.Close() set f = nothing set fso = nothing ```

vbs文件 生成随机时间循环点击

小白 不知道怎么改 Set objShell = CreateObject("Wscript.Shell") Funtion GetRandomMath(m,n) Randomize GetRandomMath = Int(((n-m+1) * Rnd) + m) End Function do dim t t=GetRandomMath(200,300) //t取随机数 WScript.Sleep t //每隔t点击一次 objShell.SendKeys "{a}" WScript.Sleep t objShell.SendKeys "{a}" loop

vbs读取两个文本文件之后,比较文本中的内容,相同的输出Y

vbs读取两个文本文件之后,比较文本中的内容,相同的输出Y,不同的输出N。输出到excel中。1.txt 里面的内容是 aaa,bbb,ccc。2.txt里面的内容是aaa,ccc,eee,输出结果最后在exc如图所示el中![图片说明](https://img-ask.csdn.net/upload/201803/30/1522423097_373510.jpg)

bat或者vbs实现 删除一个月之前的文件

文件目录为:\dir\11.11.11.63\name\2014-05-26 目标: 删除IP段 在63~85一个月之前文件。使用bat或者vbs都行

我如何从PHP运行带有参数的.vbs文件

<div class="post-text" itemprop="text"> <p>I've tried</p> <pre><code>$WshShell = new COM("WScript.Shell"); $obj = $WshShell-&gt;Run("cscript ABSOLUTE/PATH/TO/my_vbs_code.vbs", 0, true); </code></pre> <p>and</p> <pre><code>exec('wscript "C:/path/to/script.vbs"'); </code></pre> <p>but neither of them work, i am using the latest PHP using IIS server on windows. My VBScript is used to send an email using Outlook 2015.</p> <p>To use these functions do i need to edit my php.ini or is there some other way of doing this?</p> </div>

Python调用多个VBS函数该如何操作?

初学Python,网上搜索说用这个方法 import subprocess subprocess.call ('cscript test1.vbs') 然后尝试 import subprocess subprocess.call ('cscript test1.vbs') subprocess.call ('cscript test2.vbs') 测试发现调用顺序为先执行第一个VBS程序,当程序执行完毕之后,再执行第二个VBS程序 之后又尝试将代码更改为 import subprocess subprocess.call ('cscript test1.vbs' and 'cscript test2.vbs) 但运行之后发现只运行第二个VBS程序,第一个不执行 这几天也尝试了其他方法,但一直都是两个程序无法同时运行,想询问下各位大佬该怎么编写才能同时执行,谢谢

Advanced Installer 调用VBS问题

使用Advanced Installer 打包安装程序,安装程序需要使用VBS调用安装程序中的一个文件执行操作,这个VBS和执行文件都在安装程序中,请问怎么能成功调用这个VBS?

是否可以在PHP中运行vbs文件

<div class="post-text" itemprop="text"> <pre><code>$WshShell = new COM("WScript.Shell"); $obj = $WshShell-&gt;Run("Test.vbs"); </code></pre> <p>I try run this command on php, but it does not work.</p> </div>

被vbs整死了电脑重启密码改了

help帮忙解答, 我的电脑打开一个vbs文件后立刻重启密码改了怎么办

在中国程序员是青春饭吗?

今年,我也32了 ,为了不给大家误导,咨询了猎头、圈内好友,以及年过35岁的几位老程序员……舍了老脸去揭人家伤疤……希望能给大家以帮助,记得帮我点赞哦。 目录: 你以为的人生 一次又一次的伤害 猎头界的真相 如何应对互联网行业的「中年危机」 一、你以为的人生 刚入行时,拿着傲人的工资,想着好好干,以为我们的人生是这样的: 等真到了那一天,你会发现,你的人生很可能是这样的: ...

程序员请照顾好自己,周末病魔差点一套带走我。

程序员在一个周末的时间,得了重病,差点当场去世,还好及时挽救回来了。

Java基础知识面试题(2020最新版)

文章目录Java概述何为编程什么是Javajdk1.5之后的三大版本JVM、JRE和JDK的关系什么是跨平台性?原理是什么Java语言有哪些特点什么是字节码?采用字节码的最大好处是什么什么是Java程序的主类?应用程序和小程序的主类有何不同?Java应用程序与小程序之间有那些差别?Java和C++的区别Oracle JDK 和 OpenJDK 的对比基础语法数据类型Java有哪些数据类型switc...

技术大佬:我去,你写的 switch 语句也太老土了吧

昨天早上通过远程的方式 review 了两名新来同事的代码,大部分代码都写得很漂亮,严谨的同时注释也很到位,这令我非常满意。但当我看到他们当中有一个人写的 switch 语句时,还是忍不住破口大骂:“我擦,小王,你丫写的 switch 语句也太老土了吧!” 来看看小王写的代码吧,看完不要骂我装逼啊。 private static String createPlayer(PlayerTypes p...

和黑客斗争的 6 天!

互联网公司工作,很难避免不和黑客们打交道,我呆过的两家互联网公司,几乎每月每天每分钟都有黑客在公司网站上扫描。有的是寻找 Sql 注入的缺口,有的是寻找线上服务器可能存在的漏洞,大部分都...

Intellij IDEA 实用插件安利

1. 前言从2020 年 JVM 生态报告解读 可以看出Intellij IDEA 目前已经稳坐 Java IDE 头把交椅。而且统计得出付费用户已经超过了八成(国外统计)。IDEA 的...

女程序员,为什么比男程序员少???

昨天看到一档综艺节目,讨论了两个话题:(1)中国学生的数学成绩,平均下来看,会比国外好?为什么?(2)男生的数学成绩,平均下来看,会比女生好?为什么?同时,我又联想到了一个技术圈经常讨...

总结了 150 余个神奇网站,你不来瞅瞅吗?

原博客再更新,可能就没了,之后将持续更新本篇博客。

副业收入是我做程序媛的3倍,工作外的B面人生是怎样的?

提到“程序员”,多数人脑海里首先想到的大约是:为人木讷、薪水超高、工作枯燥…… 然而,当离开工作岗位,撕去层层标签,脱下“程序员”这身外套,有的人生动又有趣,马上展现出了完全不同的A/B面人生! 不论是简单的爱好,还是正经的副业,他们都干得同样出色。偶尔,还能和程序员的特质结合,产生奇妙的“化学反应”。 @Charlotte:平日素颜示人,周末美妆博主 大家都以为程序媛也个个不修边幅,但我们也许...

MySQL数据库面试题(2020最新版)

文章目录数据库基础知识为什么要使用数据库什么是SQL?什么是MySQL?数据库三大范式是什么mysql有关权限的表都有哪几个MySQL的binlog有有几种录入格式?分别有什么区别?数据类型mysql有哪些数据类型引擎MySQL存储引擎MyISAM与InnoDB区别MyISAM索引与InnoDB索引的区别?InnoDB引擎的4大特性存储引擎选择索引什么是索引?索引有哪些优缺点?索引使用场景(重点)...

如果你是老板,你会不会踢了这样的员工?

有个好朋友ZS,是技术总监,昨天问我:“有一个老下属,跟了我很多年,做事勤勤恳恳,主动性也很好。但随着公司的发展,他的进步速度,跟不上团队的步伐了,有点...

我入职阿里后,才知道原来简历这么写

私下里,有不少读者问我:“二哥,如何才能写出一份专业的技术简历呢?我总感觉自己写的简历太烂了,所以投了无数份,都石沉大海了。”说实话,我自己好多年没有写过简历了,但我认识的一个同行,他在阿里,给我说了一些他当年写简历的方法论,我感觉太牛逼了,实在是忍不住,就分享了出来,希望能够帮助到你。 01、简历的本质 作为简历的撰写者,你必须要搞清楚一点,简历的本质是什么,它就是为了来销售你的价值主张的。往深...

魂迁光刻,梦绕芯片,中芯国际终获ASML大型光刻机

据羊城晚报报道,近日中芯国际从荷兰进口的一台大型光刻机,顺利通过深圳出口加工区场站两道闸口进入厂区,中芯国际发表公告称该光刻机并非此前盛传的EUV光刻机,主要用于企业复工复产后的生产线扩容。 我们知道EUV主要用于7nm及以下制程的芯片制造,光刻机作为集成电路制造中最关键的设备,对芯片制作工艺有着决定性的影响,被誉为“超精密制造技术皇冠上的明珠”,根据之前中芯国际的公报,目...

优雅的替换if-else语句

场景 日常开发,if-else语句写的不少吧??当逻辑分支非常多的时候,if-else套了一层又一层,虽然业务功能倒是实现了,但是看起来是真的很不优雅,尤其是对于我这种有强迫症的程序"猿",看到这么多if-else,脑袋瓜子就嗡嗡的,总想着解锁新姿势:干掉过多的if-else!!!本文将介绍三板斧手段: 优先判断条件,条件不满足的,逻辑及时中断返回; 采用策略模式+工厂模式; 结合注解,锦...

离职半年了,老东家又发 offer,回不回?

有小伙伴问松哥这个问题,他在上海某公司,在离职了几个月后,前公司的领导联系到他,希望他能够返聘回去,他很纠结要不要回去? 俗话说好马不吃回头草,但是这个小伙伴既然感到纠结了,我觉得至少说明了两个问题:1.曾经的公司还不错;2.现在的日子也不是很如意。否则应该就不会纠结了。 老实说,松哥之前也有过类似的经历,今天就来和小伙伴们聊聊回头草到底吃不吃。 首先一个基本观点,就是离职了也没必要和老东家弄的苦...

2020阿里全球数学大赛:3万名高手、4道题、2天2夜未交卷

阿里巴巴全球数学竞赛( Alibaba Global Mathematics Competition)由马云发起,由中国科学技术协会、阿里巴巴基金会、阿里巴巴达摩院共同举办。大赛不设报名门槛,全世界爱好数学的人都可参与,不论是否出身数学专业、是否投身数学研究。 2020年阿里巴巴达摩院邀请北京大学、剑桥大学、浙江大学等高校的顶尖数学教师组建了出题组。中科院院士、美国艺术与科学院院士、北京国际数学...

为什么你不想学习?只想玩?人是如何一步一步废掉的

不知道是不是只有我这样子,还是你们也有过类似的经历。 上学的时候总有很多光辉历史,学年名列前茅,或者单科目大佬,但是虽然慢慢地长大了,你开始懈怠了,开始废掉了。。。 什么?你说不知道具体的情况是怎么样的? 我来告诉你: 你常常潜意识里或者心理觉得,自己真正的生活或者奋斗还没有开始。总是幻想着自己还拥有大把时间,还有无限的可能,自己还能逆风翻盘,只不是自己还没开始罢了,自己以后肯定会变得特别厉害...

男生更看重女生的身材脸蛋,还是思想?

往往,我们看不进去大段大段的逻辑。深刻的哲理,往往短而精悍,一阵见血。问:产品经理挺漂亮的,有点心动,但不知道合不合得来。男生更看重女生的身材脸蛋,还是...

为什么程序员做外包会被瞧不起?

二哥,有个事想询问下您的意见,您觉得应届生值得去外包吗?公司虽然挺大的,中xx,但待遇感觉挺低,马上要报到,挺纠结的。

当HR压你价,说你只值7K,你该怎么回答?

当HR压你价,说你只值7K时,你可以流畅地回答,记住,是流畅,不能犹豫。 礼貌地说:“7K是吗?了解了。嗯~其实我对贵司的面试官印象很好。只不过,现在我的手头上已经有一份11K的offer。来面试,主要也是自己对贵司挺有兴趣的,所以过来看看……”(未完) 这段话主要是陪HR互诈的同时,从公司兴趣,公司职员印象上,都给予对方正面的肯定,既能提升HR的好感度,又能让谈判气氛融洽,为后面的发挥留足空间。...

面试:第十六章:Java中级开发

HashMap底层实现原理,红黑树,B+树,B树的结构原理 Spring的AOP和IOC是什么?它们常见的使用场景有哪些?Spring事务,事务的属性,传播行为,数据库隔离级别 Spring和SpringMVC,MyBatis以及SpringBoot的注解分别有哪些?SpringMVC的工作原理,SpringBoot框架的优点,MyBatis框架的优点 SpringCould组件有哪些,他们...

面试阿里p7,被按在地上摩擦,鬼知道我经历了什么?

面试阿里p7被问到的问题(当时我只知道第一个):@Conditional是做什么的?@Conditional多个条件是什么逻辑关系?条件判断在什么时候执...

Python爬虫,高清美图我全都要(彼岸桌面壁纸)

爬取彼岸桌面网站较为简单,用到了requests、lxml、Beautiful Soup4

差点跪了...

最近微信又搞出了一个大利器,甚至都上了热搜,当然消息最敏捷的自媒体人,纷纷都开通了自己的视频号。01 视频号是什么呢?视频号是微信体系内的短视频,它不同...

面试了一个 31 岁程序员,让我有所触动,30岁以上的程序员该何去何从?

最近面试了一个31岁8年经验的程序猿,让我有点感慨,大龄程序猿该何去何从。

Vue回炉重造之router路由(更新中)

你好,我是Vam的金豆之路,可以叫我豆哥。2019年年度博客之星、技术领域博客专家。主要领域:前端开发。我的微信是 maomin9761,有什么疑问可以加我哦,自己创建了一个微信技术交流群,可以加我邀请你一起交流学习。最后自己也创建了一个微信公众号,里面的文章是我自己精挑细选的文章,主要介绍各种IT新技术。欢迎关注哦,微信搜索:臻美IT,等你来。 欢迎阅读本博文,本博文主要讲述【】,文字通...

大三实习生,字节跳动面经分享,已拿Offer

说实话,自己的算法,我一个不会,太难了吧

程序员垃圾简历长什么样?

已经连续五年参加大厂校招、社招的技术面试工作,简历看的不下于万份 这篇文章会用实例告诉你,什么是差的程序员简历! 疫情快要结束了,各个公司也都开始春招了,作为即将红遍大江南北的新晋UP主,那当然要为小伙伴们做点事(手动狗头)。 就在公众号里公开征简历,义务帮大家看,并一一点评。《启舰:春招在即,义务帮大家看看简历吧》 一石激起千层浪,三天收到两百多封简历。 花光了两个星期的所有空闲时...

Java岗开发3年,公司临时抽查算法,离职后这几题我记一辈子

前几天我们公司做了一件蠢事,非常非常愚蠢的事情。我原以为从学校出来之后,除了找工作有测试外,不会有任何与考试有关的事儿。 但是,天有不测风云,公司技术总监、人事总监两位大佬突然降临到我们事业线,叫上我老大,给我们组织了一场别开生面的“考试”。 那是一个风和日丽的下午,我翘着二郎腿,左手端着一杯卡布奇诺,右手抓着我的罗技鼠标,滚动着轮轴,穿梭在头条热点之间。 “淡黄的长裙~蓬松的头发...

大胆预测下未来5年的Web开发

在2019年的ReactiveConf 上,《Elm in Action》的作者Richard Feldman对未来5年Web开发的发展做了预测,很有意思,分享给大家。如果你有机会从头...

立即提问
相关内容推荐