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

Rank: 1

帖子
4 
积分
24 
技术
0  
捐助
0  
注册时间
2011-3-11 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2011-3-11 12:56 | 只看该作者

[文件操作] 批处理怎样将网页中包含指定字符串之外的删除实现批量下载？

将网页中包含*.swf之外的全部删除 然后将有用地址保存到URL.LST中
@echo off
setlocal enabledelayedexpansion
for/f "delims="%%a in('dir/b*.shtml') do(
for/f "tokens=2 delims="%%i in(%%a) do(
set str=%%i
set str=!str:"=!
set str =!str:*http=http!
if "!str:~-3!"=="swf"(echo!str!>>url.lst)
)
)
pause
这是我在网上找的一段代码 请大家帮忙看看 双击之后没有任何反应
网页是shtml格式的

[ 本帖最后由 SEAL618 于 2011-3-11 13:12 编辑 ]
1

评分人数

    • Batcher: 请编辑自己的帖子，把代码放到code标签里面 ...PB -2
收藏 分享

CrLf

Rank: 8Rank: 8

帖子
6388 
积分
18837 
技术
980  
捐助
100  
注册时间
2010-10-9 
2楼
发表于 2011-3-11 13:18 | 只看该作者
有捷径不用，吃力不讨好
  1. @echo off

  2. findstr>url.list /m ".*\.swf" *.shtml

  3. for /f "delims=" %%a in ('dir /b *.txt^|findstr /v /g:1.txt') do del "%%a"
复制代码
链接：在线第三方命令行工具下载   bat、vbs、js 原生混编

TOP

SEAL618

Rank: 1

帖子
4 
积分
24 
技术
0  
捐助
0  
注册时间
2011-3-11 
3楼
发表于 2011-3-11 13:40 | 只看该作者

回复 2楼 的帖子

你好 我将您提供的代码弄了一个BAT 结果是
1.shtml
10.shtml
11.shtml
12.shtml
13.shtml
14.shtml
2.shtml
3.shtml
4.shtml
5.shtml
6.shtml
7.shtml
8.shtml
9.shtml
而我是想将每一个网页中包含http://images.enet.com.cn/eschool/vb/73192.swf 这部分提取出来地址放到url.lst中

TOP

SEAL618

Rank: 1

帖子
4 
积分
24 
技术
0  
捐助
0  
注册时间
2011-3-11 
4楼
发表于 2011-3-11 14:43 | 只看该作者
各位朋友帮忙看看吧

TOP

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14798 
积分
45973 
技术
847  
捐助
745  
注册时间
2008-6-9 
5楼
发表于 2011-3-11 19:32 | 只看该作者
能否选一个网页文件以附件的形式上传到顶楼？以便他人测试
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

SEAL618

Rank: 1

帖子
4 
积分
24 
技术
0  
捐助
0  
注册时间
2011-3-11 
6楼
发表于 2011-3-13 11:30 | 只看该作者
上传不了RAR的附件啊 管理员

TOP

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14798 
积分
45973 
技术
847  
捐助
745  
注册时间
2008-6-9 
7楼
发表于 2011-3-13 11:39 | 只看该作者

回复 6楼 的帖子

改个后缀名很困难么？
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表