当电脑打开显示每日新闻联播主要内容

偶然间看了下新闻联播，发现有些信息还挺有用的，就做了个exe，让电脑任务计划程序每天打开电脑就自动记事本弹出咋天播放过的新闻内容

Maven

<!-- https://mvnrepository.com/artifact/org.jsoup/jsoup --><dependency><groupId>org.jsoup</groupId><artifactId>jsoup</artifactId><version>1.13.1</version></dependency><!-- https://mvnrepository.com/artifact/net.java.dev.jna/jna-platform --><dependency><groupId>net.java.dev.jna</groupId><artifactId>jna-platform</artifactId><version>5.8.0</version></dependency><!-- https://mvnrepository.com/artifact/net.java.dev.jna/jna --><dependency><groupId>net.java.dev.jna</groupId><artifactId>jna</artifactId><version>5.8.0</version></dependency>

MainController

import com.sun.jna.platform.win32.User32;
import com.sun.jna.platform.win32.WinDef;
import org.jsoup.Connection;
import org.jsoup.Jsoup;
import org.jsoup.nodes.Document;
import org.jsoup.nodes.Element;
import org.jsoup.select.Elements;import java.awt.*;
import java.awt.datatransfer.Clipboard;
import java.awt.datatransfer.StringSelection;
import java.awt.datatransfer.Transferable;
import java.awt.event.KeyEvent;
import java.io.IOException;
import java.util.Calendar;/*** @author YuLF* @version 1.0* @date 2021/5/11 22:33*/
public class MainController {private static final String EVERYDAY_NEWS = "http://mrxwlb.com/%s/";/*** 以文本模式获取每天的新闻联播主要播放内容*/public static void main(String[] args) throws Exception {//1.获得咋天新闻的URLString yesterdayNewsAddr = String.format(EVERYDAY_NEWS, getYesterdayNews());//2.获得DOMDocument dom = getDom(yesterdayNewsAddr);//3.获得标题内容assert dom != null;String newsContent = resolverContent(dom);//4.调用记事本显示callWindow(newsContent);}/*** 把文本设置到剪贴板（复制）*/public static void setClipboardString(String text) {/* 获取系统剪贴板 */Clipboard clipboard = Toolkit.getDefaultToolkit().getSystemClipboard();/* 封装文本内容 */Transferable trans = new StringSelection(text);/* 把文本内容设置到系统剪贴板 */clipboard.setContents(trans, null);}/*** 显示记事本窗口** @param displayContent 显示内容*/public static void callWindow(String displayContent) throws Exception {setClipboardString(displayContent);Runtime run = Runtime.getRuntime();//打开记事本程序Process exec = run.exec("notepad.exe");WinDef.HWND hwnd = User32.INSTANCE.FindWindow(null, "Untitled - Notepad");//显示记事本窗口User32.INSTANCE.ShowWindow(hwnd, 9);User32.INSTANCE.SetForegroundWindow(hwnd);Robot r = new Robot();//Ctrl+vr.setAutoWaitForIdle(true);r.keyPress(17);r.keyPress(KeyEvent.VK_V);r.keyRelease(KeyEvent.VK_V);r.keyRelease(17);//等待30秒自动关闭记事本窗口/*r.delay(30000);exec.destroy();*/}/*** 解析获得的新闻内容** @param dom 网页dom*/private static String resolverContent(Document dom) {Elements elements = dom.select(".entry-content ul li");StringBuilder sb = new StringBuilder();String newsTitle = dom.select(".entry-content p").get(0).select("strong").text();sb.append("【").append(newsTitle).append("】").append("\r\n");int count = 0;for (Element e : elements) {sb.append((++count)).append(".").append(e.text()).append("\r\n");}return sb.toString();}private static String getYesterdayNews() {Calendar c = Calendar.getInstance();return String.format("%s年%s月%s日新闻联播文字版", c.getWeekYear(), c.get(Calendar.MONTH) + 1, c.get(Calendar.DAY_OF_MONTH) - 1);}/*** 获得Dom** @param url 网页URL* @return 返回网页DOM*/public static Document getDom(String url) {Connection conn;conn = Jsoup.connect(url).timeout(80000);//模拟客户端请求头conn.header("Accept", "text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8");conn.header("Accept-Encoding", "gzip, deflate, sdch");conn.header("Accept-Language", "zh-CN,zh;q=0.8");conn.header("User-Agent", "Mozilla/5.0 (Windows NT 10.0; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/55.0.2883.87 Safari/537.36");try {return conn.get();} catch (IOException e) {e.printStackTrace();}return null;}}

exe(需要装java)
https://download.csdn.net/download/qq_42235984/18610660

当电脑打开显示每日新闻联播主要内容相关推荐

matlab免安装版电脑打开黑屏,电脑打开显示模拟黑屏如何解决
电脑显示器打开之后黑屏,可以按照以下操作进行故障排查和修复: 1.开机显示屏黑屏,仅指示灯亮,主机没任何反映.手伸主机背后感觉不到风扇在转.测各路电压皆无.拆下检查电源调整管是否正常,有问题更换即可. ...
计算机word文档无法预览,电脑打开Word文档内容显示不全或显示空白怎么解决
很多用户会在电脑中使用必装的Microsoft Office系列软件.有用户在电脑中打开Word文档,发现内容显示不全,有时候显示空白,那么应该怎么解决这一问题?对此,大家可以参考本教程提供的方法. ...
计算机word显示不全,win7系统电脑打开Word文档内容显示不全或显示空白的解决方法...
很多小伙伴都遇到过win7系统电脑打开Word文档内容显示不全或显示空白的困惑吧,一些朋友看过网上零散的win7系统电脑打开Word文档内容显示不全或显示空白的处理方法,并没有完完全全明白win7系统 ...
台式计算机软件打不开,电脑打开软件显示乱码的解决方法电脑点击软件没反应怎么办...
经常使用电脑的我们,难免会遇到各种各样的问题,比如说打开软件时显示乱码打不开,又或是打开软件没反应,虽然这都是小问题,该怎么解决呢?其实很简单,小编在这里为大家带来有效的解决方法,大家可以学习下. 电 ...
eml html显示工具,电脑打开eml文件的三种方法【图文教程】
EML是电子邮件格式文件,一般可以用Outlook打开,电脑接收到eml文件,但发现这个文件复制到电脑上不能正常打开,这是什么情况?要打开这种文件其实也没有那么麻烦,日常用的工具就可以了,接下来和大家 ...
沙盘正在注销进程start_电脑打开输入密码后老显示正在注销怎么办 - 卡饭网
怎么解决Excel表格单元格输入0后不显示0的问题怎么解决Excel表格单元格输入0后不显示0的问题今天,小编给大家介绍解决Excel表格单元格输入0后不显示0问题的方法,希望对大家有所帮助.具体 ...
打开html文件原理,为什么一个html文件在别人的电脑上显示这样的？
为什么一个html文件在别人的电脑上显示这样的?以下文字资料是由(历史新知网www.lishixinzhi.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! 为什么一个文件在别人的电 ...
设备里面台式计算机感叹号,电脑打开设备管理器光驱显示黄色感叹号怎么处理...
一般来说,光驱程序不仅在台式电脑中有,在笔记本电脑中也是存在的,光驱用来读写光碟内容的机器,也是常见的一个部件.很多用户在遭遇系统混乱的时候,如果有光驱的话,就可以直接使用光盘重装系统( 光盘安装XP ...
Mac电脑打开Word、PPT 、Excel显示VB运行时错误53，怎么解决
mac电脑在打开Word.PPT .Excel显示VB运行时错误53,点击结束还会跳出来.多点几次就没了,但是下次新打开一个文档,还会弹出这个窗口.怎么解决这个问题呢?这些问题的出现可能是Window ...
打开Visual Studio 2010，左下角显示加载工具箱内容
打开Visual Studio 2010,左下角显示加载工具箱内容不知何时起,每次打开Visual Studio2010时在左下角显示加载工具箱内容,这个过程简直就是煎熬. 于是开始在网上查找解决办 ...

当电脑打开显示每日新闻联播主要内容

当电脑打开显示每日新闻联播主要内容相关推荐

最新文章

热门文章