[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
所以我需要一个BAT文件,然后群发给这四十多人!~如果因为版本不对我再自己去手工操作,那就失去了意义了。。。。。。小弟不懂这些。。。。。望高手路过。。。。

TOP

回复 17# sanreal


把bat文件和sed.exe打包之后一起群发

TOP

能否搞在一起啊!?我们这有好多人连解压缩都不会!~

TOP

哎,算了。。四五天了,还搞不好。。还是一个一个弄算了

TOP

回帖的人中没有会vbs/js的吗?为什么一定要别人下载sed呢?
命令行参考:hh.exe ntcmds.chm::/ntcmds.htm
求助者请拿出诚心,别人才愿意奉献热心!
把查看手册形成条件反射!

TOP

回复 19# sanreal


那就不压缩,两个文件直接发布。

TOP

望高手路过。。。。

这句话很有意思的说。。。
***共同提高***

TOP

本帖最后由 caruko 于 2012-3-27 15:00 编辑

高手也不能让bat全能..
不用sed,要输出 <> 这种字符何其麻烦。

TOP

用vbs正则实现:
  1. Dim FSO, vbStr
  2. Set FSO = CreateObject("Scripting.FileSystemObject")
  3. vbStr = FSO.OpenTextFile("test.xml").ReadAll()
  4. FSO.OpenTextFile("new.xml", 2, True).Write RegEx(vbStr)
  5. MsgBox "ok"
  6. Set FSO = Nothing
  7. Function RegEx(Str)
  8.   Set RegEx = New RegExp
  9.   RegEx.IgnoreCase = True
  10.   RegEx.Global = True
  11.   RegEx.Pattern = "(.*)<item.*\/item>(.*)"
  12.   RegEx = RegEx.Replace(vbStr, "$1$2")
  13. End Function
复制代码
***共同提高***

TOP

返回列表