中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » [已结]批处理筛选保留文本指定内容

‹ « [1] [2] »

abcd
银牌会员

积分 1436
发帖 739
注册 2007-10-11
状态离线

『第 16 楼』:

在这里的大部分友人，学习或接触脚本

是为了给生活或工作带来效率。

这也是大部分脚本开发者的目的。

而有更好快捷高效的方法不用，而退而求其次，是否有些舍本求末？

2008-4-2 15:45

(470237592)

plp626
银牌会员

钻石会员

积分 2278
发帖 1020
注册 2007-11-19
状态离线

『第 17 楼』:

我是因为它好玩,简洁才学.不像其他高级语言还类了什么的,烦不烦,完成一个简单任务编译的文件妈的快1M了.
还有它很方便,会用记事本就可以了.

山外有山，人外有人；低调做人，努力做事。

进入网盘(各种工具)~~ 空间~~cmd学习

2008-4-2 16:29

w1314ich
中级用户

积分 234
发帖 119
注册 2007-4-22
状态离线

『第 18 楼』:

@echo off
for /f "delims=" %%i in ('findstr /i "\.asp" a.txt') do (
  set "var=%%i"
  setlocal enabledelayedexpansion
  set var=!var:"=!
  set var=!var:#=!
  set var=!var:"=!
  set var=!var:^>=!
  set var=!var:^<=!
  set var=!var:/==!
  set var=!var:.asp=#!
  call :loop
  endlocal
)
cd.>asp.txt
for /f "eol= delims=" %%i in (b.txt) do (
      findstr /xc:"%%i" asp.txt >nul 2>nul||echo %%i>>asp.txt
)
del b.txt
start asp.txt
exit
:loop
for /f "delims=#" %%a in ("!var!") do call :lis "%%a"
goto :eof
:lis
for /f "tokens=1* delims==" %%a in ("%~1") do (
  if not "%%b"=="" (call :lis "%%b") else >>b.txt echo %%a.asp
)
goto :eof

谢谢各位仁兄的慷慨相助互联网因为你们才变得精彩
以上我加入了剔除重复行的代码，实现了剔除重复行的
功能，不知道用什么方法能实现输出  a.asp|b.asp|c.asp...的结果

word

2008-4-2 20:57

netbenton
银牌会员

批处理编程迷

积分 1916
发帖 752
注册 2008-12-28
来自广西
状态离线

『第 19 楼』: 这样就全搞定了!

@echo off&setlocal enabledelayedexpansion
for /f "tokens=* delims=:" %%a in ('findstr /n ".asp" a.txt') do (

set var=%%a
set var=!var:/= !
set var=!var:"= !
set var=!var:?= !
set var=!var::= !
set var=!var:^>= !
set var=!var:^<= !

for %%i in (!var!) do (

set aaa=%%i
set aaa=!aaa:~-4!
if !aaa!==.asp set bbb=!bbb!^|%%i

)
)

set bbb=!bbb:~1!
echo =================================================================
echo !bbb!
echo =================================================================
pause

2009-1-2 01:04

(37659560)

‹ « [1] [2] »

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: