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

Rank: 1

帖子
6 
积分
21 
技术
0  
捐助
0  
注册时间
2019-3-31 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2019-4-6 01:37 | 只看该作者

[文本处理] [己解决]批处理修改文本内容添加HTML标签

本帖最后由 18938530517 于 2019-4-9 16:20 编辑

请教：

将文本：
1.mp4
下载1
2.mp4
下载2
3.mp4
下载3


修改为：
<body><a href="下载1">1.mp4</a></body></html>
<body><a href="下载2">2.mp4</a></body></html>
<body><a href="下载3">3.mp4</a></body></html>
1

评分人数

    • Batcher: 感谢给帖子标题标注[已解决]字样PB + 2
收藏 分享

codegay

Rank: 6Rank: 6

帖子
1266 
积分
1775 
技术
162  
捐助
0  
注册时间
2015-12-12 
2楼
发表于 2019-4-6 02:46 | 只看该作者 
  1. 列1 列2

  2. 下1 1.mp3
复制代码
输入文件改成类似CSV格式的文件这样更好，对于代码逻辑更好处理。
去学去写去用才有进步。安装python3代码存为xx.py 双击运行或右键用IDLE打开按F5运行

TOP

18938530517

Rank: 1

帖子
6 
积分
21 
技术
0  
捐助
0  
注册时间
2019-3-31 
3楼
发表于 2019-4-6 02:54 | 只看该作者
正在找奇偶互换的代码

TOP

yhcfsr

Rank: 5Rank: 5

帖子
635 
积分
969 
技术
107  
捐助
0  
注册时间
2017-11-23 
4楼
发表于 2019-4-6 10:22 | 只看该作者
powershell
  1. $text=gc tt.txt -ReadCount 0;

  2. $count=$text.Count;

  3. [System.Collections.ArrayList] $result=@();

  4. for($i=1;$i -lt $count;$i+=2)

  5. {

  6.     [void] $result.Add('<body><a href="'+$text[$i]+'">'+$text[$i-1]+'</a></body></html>')

  7. }

  8. [io.file]::WriteAllLines('结果.txt',$result,[text.encoding]::Default)
复制代码
QQ 33892006

TOP

zaqmlp

Rank: 5Rank: 5

帖子
961 
积分
1259 
技术
93  
捐助
0  
注册时间
2017-10-30 
5楼
发表于 2019-4-6 11:31 | 只看该作者 
  1. @echo off

  2. set info=互助互利,支付宝扫码头像,感谢赞助

  3. rem 有问题,可加QQ956535081及时沟通

  4. title %info%

  5. start mshta VBScript:Execute("msgbox(""%info%""):close")

  6. cd /d "%~dp0"

  7. set "入=1.txt"

  8. set "出=2.txt"

  9. cd.>"%出%"

  10. for /f "delims=" %%a in ('type "%入%"') do (

  11.     if defined line (

  12.         >>"%出%" echo;^<body^>^<a href="%%a"^>!line!^</a^>^</body^>^</html^>

  13.         endlocal&set "line="

  14.     ) else (

  15.         set "line=%%a"

  16.         setlocal enabledelayedexpansion

  17.     )

  18. )

  19. type "%出%"

  20. pause
复制代码
提供bat代写，为你省时省力省事，支付宝扫码头像支付
微信: unique2random

TOP

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14770 
积分
45944 
技术
847  
捐助
745  
注册时间
2008-6-9 
6楼
发表于 2019-4-8 17:28 | 只看该作者 
  1. @echo off

  2. setlocal enabledelayedexpansion

  3. set "n=0"

  4. (for /f "delims=" %%i in ('type "1.txt"') do (

  5.     set /a n+=1

  6.     set /a m=n%%2

  7.     if !m! equ 1 (

  8.         set str=%%i^</a^>^</body^>^</html^>

  9.     ) else (

  10.         echo ^<body^>^<a href="%%i"^>!str!

  11.     )

  12. ))>"2.txt"
复制代码
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

18938530517

Rank: 1

帖子
6 
积分
21 
技术
0  
捐助
0  
注册时间
2019-3-31 
7楼
发表于 2019-4-9 16:12 | 只看该作者

RE: (已解决)求助：批处理修改文本内容添加HTML标签

本帖最后由 18938530517 于 2019-4-9 16:23 编辑

回复 6# Batcher
感谢老大提供的思路，方法和技巧
这几天，for的我都有点晕了，看了老大的代码才有点思绪，专业的就是专业，我一定好好学一下
还有，如此认真的回帖，真的是值得让人尊敬！

再次感谢，所有热心回复的朋友，祝你们心想事成！！！！

TOP

返回列表