[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
lfoqtal

Rank: 2

帖子
63 
积分
112 
技术
5  
捐助
0  
注册时间
2011-7-29 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2011-8-19 08:48 | 只看该作者

[文本处理] [已解决]批处理如何快速去除重复与非法字符？

本帖最后由 lfoqtal 于 2011-8-20 12:25 编辑

1）不论你输入什么只保留1~7的数字
2）保留中数字不重复
3）在10句以内的代码
4）可以较易扩展成其他规则，如保留：成、文

例：
输入：nqwec78411633
输出:74163
输入：9hqw要121q2563
输出：12563
收藏 分享
通用简洁实用就是批处理精神

ArdentMan

Rank: 5Rank: 5

帖子
288 
积分
924 
技术
70  
捐助
0  
注册时间
2011-7-1 
2楼
发表于 2011-8-19 10:43 | 只看该作者 
  1. @Echo Off&SetLocal EnableDelayedExpansion

  2. Set "Code=1 2 3 4 5 6 7"

  3. Set /P Str=请输入：

  4. For %%i In (%Code%) Do Set "Str=!Str:%%i= %%i !"

  5. For %%i In (%Str%) Do (

  6.   For %%j In (%Code%) Do (

  7.    If %%i EQU %%j If Not Defined _%%i Set "Var=!Var!%%i"&Set "_%%i=a"

  8.   )

  9. )

  10. Echo %Var%

  11. Pause>nul
复制代码
1

评分人数

一路飘过的鸟~~~

TOP

mxxcgzxxx

Rank: 5Rank: 5

帖子
327 
积分
755 
技术
38  
捐助
0  
注册时间
2011-3-17 
3楼
发表于 2011-8-19 15:46 | 只看该作者 
  1. @echo off&setlocal enabledelayedexpansion

  2. set /p p=请输入：

  3. set "a="

  4. echo %p%|findstr "[1-7]">nul||goto :zdms

  5. for /l %%i in (1 1 7) do set p=!p:%%i= %%i !

  6. for %%i in (%p%) do (echo %%i|findstr "^[1-7]$">nul && (echo !a! |findstr "%%i">nul || set "a=!a!%%i"))

  7. echo.有较数字=%a%

  8. pause>nul
复制代码
世界上没有学不会的知识,也没有想得到却做不到的事!

TOP

batman

Rank: 8Rank: 8

帖子
2702 
积分
14562 
技术
177  
捐助
630  
注册时间
2008-6-16 
4楼
发表于 2011-8-19 20:00 | 只看该作者
回复 4# mxxcgzxxx
管道复管道，楼上的代码可有效率？
＊＊＊共同提高＊＊＊

TOP

mxxcgzxxx

Rank: 5Rank: 5

帖子
327 
积分
755 
技术
38  
捐助
0  
注册时间
2011-3-17 
5楼
发表于 2011-8-20 05:43 | 只看该作者
回复 5# batman


    很没效率，只是一个思路呵
世界上没有学不会的知识,也没有想得到却做不到的事!

TOP

lfoqtal

Rank: 2

帖子
63 
积分
112 
技术
5  
捐助
0  
注册时间
2011-7-29 
6楼
发表于 2011-8-20 12:25 | 只看该作者
感谢大家啊，4楼的没法评分了，代码很好就是慢点
通用简洁实用就是批处理精神

TOP

返回列表