设为首页收藏本站

 找回密码
 立即注册
搜索
查看: 13|回复: 9

公众号文章下载工具

[复制链接]
累计签到:10 天
连续签到:1 天
灌水成绩
9
10
1736
主题
帖子
积分

等级头衔

ID : 693

测量学徒

积分成就 测量币 : 1736
在线时间 : 0 小时
注册时间 : 2026-4-6
最后登录 : 2026-5-8

勋章
UID勋章测量学徒测量员
联系方式
发表于 2025-11-28 12:02:00 来自手机 | 显示全部楼层 |阅读模式 IP:香港
公众号文章下载工具升级 2026.03.15

去除功能
  1 文件类型转换
  2 界面精简

功能添加
  1 支持win,linux,平台使用,先发布win平台测试
  2 在set.dat中添加用户名,密码参数支持邮件分发收藏功能,填写EmailTcc支持抄送到邮箱功能
  3 支持邮件内容点击收藏,自动导入软件功能
  4 支持图片格式文章下载
  5 添加cvs数据支持,汗青记录可保持
  6 添加l18n语言切换功能

已知问题
  1 不支持https://mp.weixin.qq.com/s?__biz=文章下载
  2 图片格式文章显示未排版

下载:下载:https://wwbvg.lanzoue.com/iDTs93ksdqef 密码:52pj
实现原理:
     就是一个页面下载工具,然后对网页源码进行截取、替换的过程,你可以用F12打开源码,然后搜索jsdecode,然后前面有nick_name的是标题,create_date就是发布日期,content这个是网页真实源码,把真实源码里面的%3C这些替换一下就成,要替换的字符列表就是jsdecode里面的东西,最后加上html的头,就是正常文章页面。下面的源码就是截取,替换过程使用delphi的实现。


    核心源码:
[mw_shl_code=delphi,true]  with idhtp do
  begin
  aTitle := Get(edtUrl.text);
  aContent := aTitle;
  aNick := aTitle;
  aDate := aTitle;

  System.delete(aTitle, 1, pos('title: JsDecode(', aTitle) + 16);
  System.delete(aTitle, pos('''),', aTitle), Length(aTitle));
  aTitle := aTitle.Replace('|', '_');

  System.delete(aDate, 1, pos('create_time: JsDecode(', aDate) + 22);
  System.delete(aDate, pos(' ', aDate), Length(aDate));

  System.delete(aNick, 1, pos('nick_name: JsDecode(', aNick) + 20);
  System.delete(aNick, pos('''),', aNick), Length(aNick));
  Self.Caption := aNick + '  ' + aTitle;

  System.delete(aContent, 1, pos('content_noencode: JsDecode(', aContent) + 27);
  System.delete(aContent, pos('''),', aContent), Length(aContent));
  aContent := aContent.replace('\x5c', '\').replace('\x0d', '\r').replace('\x22','"').replace('\x26', '&').replace('\x27', '\').replace('\x3c', '').replace('\x0a', '\n').replace('data-src', 'src').replace('max-width: 100%;width: 100%;box-sizing: border-box;height: auto !important;','width:500px');

  mmoContent.Text :='' +aTitle + '' + aContent + '';
  aPath := format('%s\%s\%s\%s.%s', [ExtractFilePath(ParamStr(0)), aNick,aDate, aTitle, 'html']);
  ForceDirectories(ExtractFilePath(aPath));
  mmoContent.Lines.SaveToFile(aPath);


  1复制链接
     
   

    2自动下载
      


   3 邮件吸收点击收藏自动下载下载
   


    4下载结果显示
精密测量技术论坛免责声明
重要声明:以上内容仅代表该作者观点,不代表本站精密测量技术论坛立场。
如有涉及侵权请尽快告知,我们将会在第一时间处理。作者原创内容未经允许不得转载!
站长联系邮箱:1339305021@qq.com
站长联系微信:dddnnbbb
累计签到:6 天
连续签到:2 天
灌水成绩
2
112
490
主题
帖子
积分

等级头衔

ID : 877

测量员

积分成就 测量币 : 490
在线时间 : 0 小时
注册时间 : 2026-4-6
最后登录 : 2026-5-9

勋章
UID勋章测量学徒测量员
联系方式
发表于 2025-11-29 10:35:00 | 显示全部楼层 IP:香港
弄清楚了,是因为文章标题是“权威发布 | 中央和国家机关工委印发《关于加强中央和国家机关部门机关党委建设的意见》”,里面带了“ |”,所以导致无法生成。建议楼主可以增加“修改文件名”功能。
回复

使用道具 举报

累计签到:4 天
连续签到:1 天
灌水成绩
1
116
347
主题
帖子
积分

等级头衔

ID : 841

测量员

积分成就 测量币 : 347
在线时间 : 0 小时
注册时间 : 2026-4-6
最后登录 : 2026-5-9

勋章
UID勋章测量学徒测量员
联系方式
发表于 2025-11-28 12:24:00 | 显示全部楼层 IP:香港
感谢分享,下载要CB最好说明一下哦
回复

使用道具 举报

累计签到:8 天
连续签到:3 天
灌水成绩
3
127
708
主题
帖子
积分

等级头衔

ID : 897

测量学徒

积分成就 测量币 : 708
在线时间 : 0 小时
注册时间 : 2026-4-6
最后登录 : 2026-5-9

勋章
UID勋章测量学徒测量员
联系方式
发表于 2025-12-1 22:29:00 | 显示全部楼层 IP:香港
整个页面是包括在微信的页面里面的,可以在源文件里面查nickname,微信的公众号,发布时间,显示内容都是json的值,通过解码后添加到页面上的。
里面的图片是放在一个data-src中的,直接替换data-src为src就可以显示图片了。
回复

使用道具 举报

累计签到:6 天
连续签到:2 天
灌水成绩
3
100
600
主题
帖子
积分

等级头衔

ID : 823

测量学徒

积分成就 测量币 : 600
在线时间 : 0 小时
注册时间 : 2026-4-6
最后登录 : 2026-5-9

勋章
UID勋章测量学徒测量员
联系方式
发表于 2025-11-28 13:29:00 | 显示全部楼层 IP:香港
很实用,能不能批量下载某博主的文章
回复

使用道具 举报

累计签到:7 天
连续签到:1 天
灌水成绩
1
108
294
主题
帖子
积分

等级头衔

ID : 886

测量员

积分成就 测量币 : 294
在线时间 : 0 小时
注册时间 : 2026-4-6
最后登录 : 2026-5-9

勋章
UID勋章测量学徒测量员
联系方式
发表于 2025-11-28 12:54:00 | 显示全部楼层 IP:香港
楼主大大,能加个能下载公众号视频的吗
回复

使用道具 举报

累计签到:8 天
连续签到:2 天
灌水成绩
4
116
744
主题
帖子
积分

等级头衔

ID : 874

测量学徒

积分成就 测量币 : 744
在线时间 : 0 小时
注册时间 : 2026-4-6
最后登录 : 2026-5-9

勋章
UID勋章测量学徒测量员
联系方式
发表于 2025-11-28 12:29:00 | 显示全部楼层 IP:香港
下载试试
回复

使用道具 举报

累计签到:6 天
连续签到:1 天
灌水成绩
2
96
591
主题
帖子
积分

等级头衔

ID : 815

测量学徒

积分成就 测量币 : 591
在线时间 : 0 小时
注册时间 : 2026-4-6
最后登录 : 2026-5-9

勋章
UID勋章测量学徒测量员
联系方式
发表于 2025-11-28 12:33:00 | 显示全部楼层 IP:香港
CB是系统收的,我没有要CB
回复

使用道具 举报

累计签到:9 天
连续签到:1 天
灌水成绩
2
112
244
主题
帖子
积分

等级头衔

ID : 883

测量员

积分成就 测量币 : 244
在线时间 : 0 小时
注册时间 : 2026-4-6
最后登录 : 2026-5-9

勋章
UID勋章测量学徒测量员
联系方式
发表于 2025-11-28 12:35:00 | 显示全部楼层 IP:香港
能不能加个公众号的视频也能下载下来呢
回复

使用道具 举报

累计签到:6 天
连续签到:1 天
灌水成绩
2
128
667
主题
帖子
积分

等级头衔

ID : 887

测量学徒

积分成就 测量币 : 667
在线时间 : 0 小时
注册时间 : 2026-4-6
最后登录 : 2026-5-9

勋章
UID勋章测量学徒测量员
联系方式
发表于 2025-11-28 12:38:00 | 显示全部楼层 IP:香港
能不能下载付费的
回复

使用道具 举报

快速回复换一批
感谢楼主,好人一生平安
遇见神贴岂能不顶
路过留名
强无敌
楼主好人一生平安
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|精密测量技术论坛 ( 桂ICP备2026007449号-1 )|网站地图

GMT+8, 2026-5-9 15:48 , Processed in 0.120760 second(s), 31 queries .

快速回复 返回顶部 返回列表