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

vbs读取两个文本文件之后,比较文本中的内容,相同的输出Y,不同的输出N。输出到excel中。1.txt 里面的内容是 aaa,bbb,ccc。2.txt里面的内容是aaa,ccc,eee,输出结果最后在exc如图所示el中图片说明

1个回答

用Scripting.FileSystemObject的IpenTextFile读取到字符串,然后循环比较,如果数据量不大,并且顺序不同,可以借助Dictionary

chedaodao
chedaodao 用Scripting.FileSystemObject的IpenTextFile读取到字符串,然后循环比较,如果数据量不大,并且顺序不同,可以借助Dictionary
接近 2 年之前 回复
qq_36944937
qq_36944937 回复qq_41930815: 什么
接近 2 年之前 回复
qq_41930815
qq_41930815 vfeavefvrefcsadcwe
接近 2 年之前 回复
qq_36944937
qq_36944937 回复caozhy: 我打字打错了,是dictionary啊。。。。您能帮我写一下吗???
接近 2 年之前 回复
caozhy
贵阳老马马善福专业维修游泳池堵漏防水工程 回复qq_36944937: Dictionary,请你看清楚了,你说的是directiory
接近 2 年之前 回复
qq_36944937
qq_36944937 我也是这么想的,就用directionary,但是比较那里我实在 写不出来,您能写一下吗
接近 2 年之前 回复
Csdn user default icon
上传中...
上传图片
插入图片
抄袭、复制答案,以达到刷声望分或其他目的的行为,在CSDN问答是严格禁止的,一经发现立刻封号。是时候展现真正的技术了!
其他相关推荐
VBS如何在文本文件中添加回车改变格式?
加入文本文件内的内容是 ******************** 我想通过vbs使其变成 ***** ***** ***** ***** ***** 并保存
VBS中如何替换文本文件中的部分字符?
例如文本文件中的字符为:****....11111 如何将上述文本中的“*”和“.“全部替换为0.求代码???
vbs 怎么对 txt文本进行读写操作?
想让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脚本发送文本到qq的问题
我想问一下就是利用vbs脚本将excel里面的单元格读出来发送到qq怎么实现,有没有大佬指教一下,最好带一下代码,刚开始接触vbs用起来不是很熟练,万分感谢
VBS脚本 任意输入两个整数,求两个整数之间所有整数的和
VBS脚本 任意输入两个整数,求两个整数之间所有整数的和 感谢!我自学玩,折腾了一晚上,
如何用vbs隐藏文件以及关闭显示隐藏文件?
想要在vbs脚本中添加一段代码,以实现取消显示隐藏文件,并把指定目录下的文件夹(文件夹内的子文件夹和文件不隐藏)和文件隐藏。如隐藏D盘根目录下的所有文件夹和文件,但文件夹里的内容不隐藏(太费时)。
用VBS脚本 任意输入两个整数,求这两个整数之间所有整数的和
用VBS脚本 写出任意输入两个整数,求这两个整数之间所有整数的和 没事自学写着玩的,折腾了一晚上,写不出来,大神帮帮忙吧
VBS如何修改文件的换行方式?
源文件中某一行的换行方式未知,但是在vbs中使用readline语句读取的时候会报错,readline中识别的换行符号是vbcrlf,怎么才能找到源文件中使用的换行符号,并给他替换成vbcrlf,求大神解答!!!!!
使用vbs隐藏可执行文件.exe的问题
DIM objShell set objShell = wscript.createObject("wscript.shell") iReturn = objShell.Run("cmd.exe /C C:\xx.exe", 0, TRUE) 我这个.exe文件执行的时候会弹出两个窗口,上用了上面的命令只能隐藏最开始打开的窗口,怎么把之后打开的窗口也隐藏起来?两个窗口相继打开的时间不到1秒
bat或者vbs实现 删除一个月之前的文件
文件目录为:\dir\11.11.11.63\name\2014-05-26 目标: 删除IP段 在63~85一个月之前文件。使用bat或者vbs都行
文本怎么导出来不含某些数字的行
有一个txt文件,很多行数字,每一行都是六个数字,数字之间都用逗号分开,能否写一个vbs,导出来不含某些特定数字的那些行,
vbs读取xml值失败,请问怎么处理.
我需要写一个VBS读取以下格式XML的内容,期中inum="846051000004226"处理不了,请问哪位朋友可以帮忙看一下. <results> <result inum="846051000004226"> <field name="startedat">2016-09-01T00:01:11.056</field> <field name="duration">23</field> <field name="otherparties">31642191, 39107</field> <field name="skills">39901</field> <field name="switchcallid">00001127871472659262</field> <field name="udfs"></field>< /result> <result inum="846051000004227"> <field name="startedat">2016-09-01T00:01:11.254</field> <field name="duration">27</field> <field name="otherparties">31642191, 39104</field> <field name="skills">39901</field> <field name="switchcallid">00001127881472659264</field> <field name="udfs"></field> </result> <result inum="846051000004228"> <field name="startedat">2016-09-01T00:01:22.233</field> <field name="duration">17</field> <field name="otherparties">31642191, 39105</field> <field name="skills">39901</field> <field name="switchcallid">00001127891472659279</field> <field name="udfs"></field> </result> </results> --------------------- msgbox GetXML("AA.xml") Function GetXml (ByVal strXmlFilePath) Dim xmlDoc,xmlRoot Dim num Set xmlDoc = CreateObject("Microsoft.XMLDOM") xmlDoc.async = False xmlDoc.load strXmlFilePath If xmlDoc.parseError.errorCode <> 0 Then GetXml "Error:" & Chr(13) & xmlDoc.parseError.reason Exit Function End If Set xmlRoot = xmlDoc.documentElement.selectSingleNode("//results") num=xmlRoot.childNodes.length-1 For i=0 To num tmpInum="" tmpStartedat=xmlRoot.childNodes.item(i).childNodes.item(0).text tmpDuration=xmlRoot.childNodes.item(i).childNodes.item(1).text tmpOtherparties=xmlRoot.childNodes.item(i).childNodes.item(2).text tmpSkills=xmlRoot.childNodes.item(i).childNodes.item(3).text tmpSwitchcallid=xmlRoot.childNodes.item(i).childNodes.item(4).text strXML=strXML & i & "," & tmpInum & "," & tmpStartedat & "," & tmpDuration & "," & tmpOtherparties & "," & tmpSkills & "," & tmpSwitchcallid & vbcrlf Next GetXml = strXML End Function
Advanced Installer 调用VBS问题
使用Advanced Installer 打包安装程序,安装程序需要使用VBS调用安装程序中的一个文件执行操作,这个VBS和执行文件都在安装程序中,请问怎么能成功调用这个VBS?
vs2010打包msi程序,如何在安装时自动一个vbs或者bat脚本文件
我写的Activex控件,在html调用的时候有的电脑会提示某些加载项无法运行,百度的解决方案是将Activex设置都启用,加信任站点,所以就写在了一个bat文件里,用vbs调用(因为bat文件会弹出黑框),vs2010打包msi程序,想要在安装时自动执行这个vbs运行文件,应该如何设置,急急急
求写个Ping的批处理或Vbs
最最近感觉网络不太好,所以想用ping命令来写个批。参考网上众多帖子,最终也没能写成。 求坛内高手帮写下。 要求: 1.一直ping某个地址,如果命令能执行,就一直ping。如果ping不了,就把ping不了的结果输出到文本,并且加上时间戳。 2.当ping命令不能执行的时候,尝试2到3个不同地址,所有不能执行ping命令的结果加上时间戳输出到文本。 3.除非手动结束批运行,否则批一直运行下去。
被vbs整死了电脑重启密码改了
help帮忙解答, 我的电脑打开一个vbs文件后立刻重启密码改了怎么办
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程序,第一个不执行 这几天也尝试了其他方法,但一直都是两个程序无法同时运行,想询问下各位大佬该怎么编写才能同时执行,谢谢
写火狐扩展,调用本地的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个 是弹窗口,一个是命令行闪过
Java学习的正确打开方式
在博主认为,对于入门级学习java的最佳学习方法莫过于视频+博客+书籍+总结,前三者博主将淋漓尽致地挥毫于这篇博客文章中,至于总结在于个人,实际上越到后面你会发现学习的最好方式就是阅读参考官方文档其次就是国内的书籍,博客次之,这又是一个层次了,这里暂时不提后面再谈。博主将为各位入门java保驾护航,各位只管冲鸭!!!上天是公平的,只要不辜负时间,时间自然不会辜负你。 何谓学习?博主所理解的学习,它是一个过程,是一个不断累积、不断沉淀、不断总结、善于传达自己的个人见解以及乐于分享的过程。
大学四年自学走来,这些私藏的实用工具/学习网站我贡献出来了
大学四年,看课本是不可能一直看课本的了,对于学习,特别是自学,善于搜索网上的一些资源来辅助,还是非常有必要的,下面我就把这几年私藏的各种资源,网站贡献出来给你们。主要有:电子书搜索、实用工具、在线视频学习网站、非视频学习网站、软件下载、面试/求职必备网站。 注意:文中提到的所有资源,文末我都给你整理好了,你们只管拿去,如果觉得不错,转发、分享就是最大的支持了。 一、电子书搜索 对于大部分程序员...
linux系列之常用运维命令整理笔录
本博客记录工作中需要的linux运维命令,大学时候开始接触linux,会一些基本操作,可是都没有整理起来,加上是做开发,不做运维,有些命令忘记了,所以现在整理成博客,当然vi,文件操作等就不介绍了,慢慢积累一些其它拓展的命令,博客不定时更新 free -m 其中:m表示兆,也可以用g,注意都要小写 Men:表示物理内存统计 total:表示物理内存总数(total=used+free) use...
Vue + Spring Boot 项目实战(十四):用户认证方案与完善的访问拦截
本篇文章主要讲解 token、session 等用户认证方案的区别并分析常见误区,以及如何通过前后端的配合实现完善的访问拦截,为下一步权限控制的实现打下基础。
比特币原理详解
一、什么是比特币 比特币是一种电子货币,是一种基于密码学的货币,在2008年11月1日由中本聪发表比特币白皮书,文中提出了一种去中心化的电子记账系统,我们平时的电子现金是银行来记账,因为银行的背后是国家信用。去中心化电子记账系统是参与者共同记账。比特币可以防止主权危机、信用风险。其好处不多做赘述,这一层面介绍的文章很多,本文主要从更深层的技术原理角度进行介绍。 二、问题引入 假设现有4个人...
程序员接私活怎样防止做完了不给钱?
首先跟大家说明一点,我们做 IT 类的外包开发,是非标品开发,所以很有可能在开发过程中会有这样那样的需求修改,而这种需求修改很容易造成扯皮,进而影响到费用支付,甚至出现做完了项目收不到钱的情况。 那么,怎么保证自己的薪酬安全呢? 我们在开工前,一定要做好一些证据方面的准备(也就是“讨薪”的理论依据),这其中最重要的就是需求文档和验收标准。一定要让需求方提供这两个文档资料作为开发的基础。之后开发...
网页实现一个简单的音乐播放器(大佬别看。(⊙﹏⊙))
今天闲着无事,就想写点东西。然后听了下歌,就打算写个播放器。 于是乎用h5 audio的加上js简单的播放器完工了。 演示地点演示 html代码如下` music 这个年纪 七月的风 音乐 ` 然后就是css`*{ margin: 0; padding: 0; text-decoration: none; list-...
Python十大装B语法
Python 是一种代表简单思想的语言,其语法相对简单,很容易上手。不过,如果就此小视 Python 语法的精妙和深邃,那就大错特错了。本文精心筛选了最能展现 Python 语法之精妙的十个知识点,并附上详细的实例代码。如能在实战中融会贯通、灵活使用,必将使代码更为精炼、高效,同时也会极大提升代码B格,使之看上去更老练,读起来更优雅。
数据库优化 - SQL优化
以实际SQL入手,带你一步一步走上SQL优化之路!
2019年11月中国大陆编程语言排行榜
2019年11月2日,我统计了某招聘网站,获得有效程序员招聘数据9万条。针对招聘信息,提取编程语言关键字,并统计如下: 编程语言比例 rank pl_ percentage 1 java 33.62% 2 cpp 16.42% 3 c_sharp 12.82% 4 javascript 12.31% 5 python 7.93% 6 go 7.25% 7 p...
通俗易懂地给女朋友讲:线程池的内部原理
餐盘在灯光的照耀下格外晶莹洁白,女朋友拿起红酒杯轻轻地抿了一小口,对我说:“经常听你说线程池,到底线程池到底是个什么原理?”
经典算法(5)杨辉三角
杨辉三角 是经典算法,这篇博客对它的算法思想进行了讲解,并有完整的代码实现。
腾讯算法面试题:64匹马8个跑道需要多少轮才能选出最快的四匹?
昨天,有网友私信我,说去阿里面试,彻底的被打击到了。问了为什么网上大量使用ThreadLocal的源码都会加上private static?他被难住了,因为他从来都没有考虑过这个问题。无独有偶,今天笔者又发现有网友吐槽了一道腾讯的面试题,我们一起来看看。 腾讯算法面试题:64匹马8个跑道需要多少轮才能选出最快的四匹? 在互联网职场论坛,一名程序员发帖求助到。二面腾讯,其中一个算法题:64匹...
面试官:你连RESTful都不知道我怎么敢要你?
干货,2019 RESTful最贱实践
SQL-小白最佳入门sql查询一
不要偷偷的查询我的个人资料,即使你再喜欢我,也不要这样,真的不好;
项目中的if else太多了,该怎么重构?
介绍 最近跟着公司的大佬开发了一款IM系统,类似QQ和微信哈,就是聊天软件。我们有一部分业务逻辑是这样的 if (msgType = "文本") { // dosomething } else if(msgType = "图片") { // doshomething } else if(msgType = "视频") { // doshomething } else { // doshom...
漫话:什么是平衡(AVL)树?这应该是把AVL树讲的最好的文章了
这篇文章通过对话的形式,由浅入深带你读懂 AVL 树,看完让你保证理解 AVL 树的各种操作,如果觉得不错,别吝啬你的赞哦。 1、若它的左子树不为空,则左子树上所有的节点值都小于它的根节点值。 2、若它的右子树不为空,则右子树上所有的节点值均大于它的根节点值。 3、它的左右子树也分别可以充当为二叉查找树。 例如: 例如,我现在想要查找数值为14的节点。由于二叉查找树的特性,我们可...
“狗屁不通文章生成器”登顶GitHub热榜,分分钟写出万字形式主义大作
一、垃圾文字生成器介绍 最近在浏览GitHub的时候,发现了这样一个骨骼清奇的雷人项目,而且热度还特别高。 项目中文名:狗屁不通文章生成器 项目英文名:BullshitGenerator 根据作者的介绍,他是偶尔需要一些中文文字用于GUI开发时测试文本渲染,因此开发了这个废话生成器。但由于生成的废话实在是太过富于哲理,所以最近已经被小伙伴们给玩坏了。 他的文风可能是这样的: 你发现,...
程序员:我终于知道post和get的区别
是一个老生常谈的话题,然而随着不断的学习,对于以前的认识有很多误区,所以还是需要不断地总结的,学而时习之,不亦说乎
《程序人生》系列-这个程序员只用了20行代码就拿了冠军
你知道的越多,你不知道的越多 点赞再看,养成习惯GitHub上已经开源https://github.com/JavaFamily,有一线大厂面试点脑图,欢迎Star和完善 前言 这一期不算《吊打面试官》系列的,所有没前言我直接开始。 絮叨 本来应该是没有这期的,看过我上期的小伙伴应该是知道的嘛,双十一比较忙嘛,要值班又要去帮忙拍摄年会的视频素材,还得搞个程序员一天的Vlog,还要写BU...
开源并不是你认为的那些事
点击上方蓝字 关注我们开源之道导读所以 ————想要理清开源是什么?先要厘清开源不是什么,名正言顺是句中国的古代成语,概念本身的理解非常之重要。大部分生物多样性的起源,...
加快推动区块链技术和产业创新发展,2019可信区块链峰会在京召开
11月8日,由中国信息通信研究院、中国通信标准化协会、中国互联网协会、可信区块链推进计划联合主办,科技行者协办的2019可信区块链峰会将在北京悠唐皇冠假日酒店开幕。   区块链技术被认为是继蒸汽机、电力、互联网之后,下一代颠覆性的核心技术。如果说蒸汽机释放了人类的生产力,电力解决了人类基本的生活需求,互联网彻底改变了信息传递的方式,区块链作为构造信任的技术有重要的价值。   1...
程序员把地府后台管理系统做出来了,还有3.0版本!12月7号最新消息:已在开发中有github地址
第一幕:缘起 听说阎王爷要做个生死簿后台管理系统,我们派去了一个程序员…… 996程序员做的梦: 第一场:团队招募 为了应对地府管理危机,阎王打算找“人”开发一套地府后台管理系统,于是就在地府总经办群中发了项目需求。 话说还是中国电信的信号好,地府都是满格,哈哈!!! 经常会有外行朋友问:看某网站做的不错,功能也简单,你帮忙做一下? 而这次,面对这样的需求,这个程序员...
网易云6亿用户音乐推荐算法
网易云音乐是音乐爱好者的集聚地,云音乐推荐系统致力于通过 AI 算法的落地,实现用户千人千面的个性化推荐,为用户带来不一样的听歌体验。 本次分享重点介绍 AI 算法在音乐推荐中的应用实践,以及在算法落地过程中遇到的挑战和解决方案。 将从如下两个部分展开: AI算法在音乐推荐中的应用 音乐场景下的 AI 思考 从 2013 年 4 月正式上线至今,网易云音乐平台持续提供着:乐屏社区、UGC...
【技巧总结】位运算装逼指南
位算法的效率有多快我就不说,不信你可以去用 10 亿个数据模拟一下,今天给大家讲一讲位运算的一些经典例子。不过,最重要的不是看懂了这些例子就好,而是要在以后多去运用位运算这些技巧,当然,采用位运算,也是可以装逼的,不信,你往下看。我会从最简单的讲起,一道比一道难度递增,不过居然是讲技巧,那么也不会太难,相信你分分钟看懂。 判断奇偶数 判断一个数是基于还是偶数,相信很多人都做过,一般的做法的代码如下...
《C++ Primer》学习笔记(六):C++模块设计——函数
专栏C++学习笔记 《C++ Primer》学习笔记/习题答案 总目录 https://blog.csdn.net/TeFuirnever/article/details/100700212 —————————————————————————————————————————————————————— 《C++ Primer》习题参考答案:第6章 - C++模块设计——函数 文章目录专栏C+...
8年经验面试官详解 Java 面试秘诀
作者 |胡书敏 责编 | 刘静 出品 | CSDN(ID:CSDNnews) 本人目前在一家知名外企担任架构师,而且最近八年来,在多家外企和互联网公司担任Java技术面试官,前后累计面试了有两三百位候选人。在本文里,就将结合本人的面试经验,针对Java初学者、Java初级开发和Java开发,给出若干准备简历和准备面试的建议。 Java程序员准备和投递简历的实...
面试官如何考察你的思维方式?
1.两种思维方式在求职面试中,经常会考察这种问题:北京有多少量特斯拉汽车?某胡同口的煎饼摊一年能卖出多少个煎饼?深圳有多少个产品经理?一辆公交车里能装下多少个乒乓球?一个正常成年人有多少根头发?这类估算问题,被称为费米问题,是以科学家费米命名的。为什么面试会问这种问题呢?这类问题能把两类人清楚地区分出来。一类是具有文科思维的人,擅长赞叹和模糊想象,它主要依靠的是人的第一反应和直觉,比如小孩...
so easy! 10行代码写个"狗屁不通"文章生成器
前几天,GitHub 有个开源项目特别火,只要输入标题就可以生成一篇长长的文章。 背后实现代码一定很复杂吧,里面一定有很多高深莫测的机器学习等复杂算法 不过,当我看了源代码之后 这程序不到50行 尽管我有多年的Python经验,但我竟然一时也没有看懂 当然啦,原作者也说了,这个代码也是在无聊中诞生的,平时撸码是不写中文变量名的, 中文...
知乎高赞:中国有什么拿得出手的开源软件产品?(整理自本人原创回答)
知乎高赞:中国有什么拿得出手的开源软件产品? 在知乎上,有个问题问“中国有什么拿得出手的开源软件产品(在 GitHub 等社区受欢迎度较好的)?” 事实上,还不少呢~ 本人于2019.7.6进行了较为全面的回答,对这些受欢迎的 Github 开源项目分类整理如下: 分布式计算、云平台相关工具类 1.SkyWalking,作者吴晟、刘浩杨 等等 仓库地址: apache/skywalking 更...
相关热词 c# 二进制截断字符串 c#实现窗体设计器 c#检测是否为微信 c# plc s1200 c#里氏转换原则 c# 主界面 c# do loop c#存为组套 模板 c# 停掉协程 c# rgb 读取图片
立即提问