[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
A.txt重复出现3J1J只有5次嘛
带内地用语或带里语的文章,在下读写总觉有点吃力;
如误解了各位意思的讲勿见怪   ^_^

TOP

本帖最后由 Taurus 于 2011-6-26 06:23 编辑

@echo off&setlocal enabledelayedexpansion
set/p var=string^=
for /f "delims=" %%i in (a.txt) do (
    set str=%%i
    set str=!str:-=,!
    for %%i in (!str!) do (
        if "%%i"=="!var!" set/a n+=1
    )
)
if !n! GEQ 6 (set/p=del) else (set/p=keep)
带内地用语或带里语的文章,在下读写总觉有点吃力;
如误解了各位意思的讲勿见怪   ^_^

TOP

本帖最后由 Taurus 于 2011-6-26 09:31 编辑
6# Taurus
貌似不行,set /p 是要求输入不同的是字符?问题是他随机产生数字和字母组合的,痛苦就痛苦这里。

还是感谢楼上提供的代码,我再研究试试看,希望能找到最后的答案。
playinthesky 发表于 2011-6-26 09:10

甚不行?大於或等於6顯示del,小等6顯示keep,這邊正常顯示
  1. @echo off&setlocal enabledelayedexpansion
  2. set var=3J1J
  3. for /f "delims=" %%i in (a.txt) do (
  4.     set str=%%i
  5.     set str=!str:-=,!
  6.     for %%i in (!str!) do (
  7.         if "%%i"=="!var!" set/a n+=1
  8.     )
  9. )
  10. if !n! GEQ 6 (set/p=del) else (set/p=keep)
复制代码
以上依這句解題:
文件 A.txt 内容:

Moves2D-2E1H-2H1A-0C7J-6H0A-1A6G-6F7A-6C1J-3J1J-0H8A-8B8J-8I0D-0E0J-1J1C-1H2J-4H8B-5B8I-3I5B-5E3I-3F7C-7B0G-0F0E-0F3F-0F1H-1E0F-5F7B-1B1J-2J1B-5B5F-3J1J-5E1E-5E2H-2E0C-1E3J-4I2A-4C2E-2F1A-0A0H-1F5B-1B1F-2H1E-3F4G-4F4D-4E4F-4E5E-5I6H-5F1B-4B2J-3J3F-5G7H-5H4B-4E5F-3E3A-4B3E-1D0A-2A3J-3B2A-3A3B-3A4A-3A2H-4G5I-7I2F-3F7I-7G3F-3E3A-4A1D-2B4A-3A4G-2F7G-7B2F-3D4B-3C3D-5E7B-3B3E-3B6C-4B2B-1J3I-0C3A-3B0C-2D3B-3A2D-3J1J-4E5G-4E5H-8H6D-6E8H-8D6E-6F4H-6F4C-6E8G-8F4B-3D5E-4G4E-5G8F-8E3D-4F2G-2F4F-5D8D-6D3C-4B6F-8H5D-4F8E-7E6E-4C4I-5H4F-5D7E-7D5G-4E6D-6I5D-3C4G-3E4E-3G5J-4I4C-2E2F-2E3C-2E8H-6F3A-3B6I-6A4B-3C6F-4H3G-4E6A-6I5A-4B4H-2F3B-3A7D-7C2E-1C6I-6E1C-3D7C-6C4B-5C6C-6B5C-4B2F-4H3D-1C3E-1D1C-3D6B-5B3D-4F6E-7E4B-5C7E-7D4E-2D4J-3J2D-1F4H-2F1F-2H3J-3I2H-1J3I-3J1J-2H3J-3I2H-1J3I-3J1J-2H3J-3I2H-1J3I-3J1J-2H-CommentsEnd

以上文件中 内容,最后一段有 3J1J 都重复出现了6次,如果出现了就此文件删除。
带内地用语或带里语的文章,在下读写总觉有点吃力;
如误解了各位意思的讲勿见怪   ^_^

TOP

返回列表