在R中如何根据用户输入匹配并打开对应日期命名的HTML文件

核心逻辑统一为：提取所有HTML文件的日期标识→接收用户输入的日期→格式校验后匹配对应文件→触发打开/跳转操作。下面提供两种常用场景的可运行实现：

本地Python脚本实现（适合个人本地使用） #

无需搭建服务，全平台通用，运行后选择/输入日期即可自动打开对应文件：

1. 先安装依赖（如需图形化日期选择器，纯输入版可跳过此步）：
   pip install tkcalendar
2. 将以下脚本存为打开日期HTML.py，放在所有HTML文件的根目录下运行：

import os
import re
import webbrowser
import tkinter as tk
from tkinter import messagebox
# 如需日期选择控件取消注释下一行
# from tkcalendar import DateEntry

# 遍历目录提取所有带日期的HTML文件
html_date_map = {}
date_pattern = re.compile(r'(\d{8})') # 匹配8位连续数字作为日期
for filename in os.listdir('.'):
    if filename.lower().endswith('.html'):
        match_res = date_pattern.search(filename)
        if match_res:
            date_str = match_res.group(1)
            html_date_map[date_str] = os.path.abspath(filename)

# 初始化窗口
root = tk.Tk()
root.title("选择日期打开HTML")
root.geometry("300x150")

tk.Label(root, text="请输入8位日期(YYYYMMDD):").pack(pady=10)
date_input = tk.Entry(root)
date_input.pack(pady=5)
# 如需图形化日期选择器，替换上面两行输入框代码为：
# date_input = DateEntry(root, date_pattern='yymmdd')
# date_input.pack(pady=5)

def open_html():
    input_date = date_input.get().strip()
    # 日期选择器版需要转格式：input_date = date_input.get_date().strftime('%Y%m%d')
    if input_date in html_date_map:
        webbrowser.open_new(html_date_map[input_date])
    else:
        messagebox.showerror("错误", f"未找到日期为{input_date}的HTML文件")

tk.Button(root, text="打开文件", command=open_html).pack(pady=20)
root.mainloop()

Web端JS实现（适合多用户访问使用） #

只需部署静态web服务，用户通过浏览器访问即可使用：
将以下代码存为index.html，和所有带日期的HTML文件放在同一目录下，部署到web服务即可：

<!DOCTYPE html>
<html lang="zh-CN">
<head>
    <meta charset="UTF-8">
    <title>按日期打开HTML</title>
</head>
<body style="max-width: 500px; margin: 100px auto;">
    <h3>请选择或输入要查询的日期</h3>
    <input type="date" id="datePicker" style="padding: 8px; margin: 20px 0; width: 200px;">
    <button onclick="openHtml()" style="padding: 8px 20px;">打开对应HTML</button>
    <p id="tip" style="color: red; margin-top: 20px;"></p>

    <script>
        // 可提前预存所有HTML文件的日期列表，避免404
        const validDates = []
        // 自动提取当前目录下所有HTML的日期（仅支持同域名下部署，需开启目录索引）
        // 如不想开启目录索引，可手动把所有日期字符串填入上面的validDates数组即可
        async function loadValidDates() {
            const res = await fetch('./')
            const text = await res.text()
            const htmlReg = /[a-zA-Z0-9]+(\d{8})\.html/g
            let match
            while((match = htmlReg.exec(text)) !== null) {
                validDates.push(match[1])
            }
        }
        loadValidDates()

        function openHtml() {
            const dateVal = document.getElementById('datePicker').value
            // 转成YYYYMMDD格式
            const dateStr = dateVal.replace(/-/g, '')
            if(validDates.includes(dateStr)) {
                // 可根据自己的文件名前缀修改拼接规则
                window.open(`filename${dateStr}.html`, '_blank')
            } else {
                document.getElementById('tip').innerText = `未找到日期为${dateStr}的HTML文件`
            }
        }
    </script>
</body>
</html>

• 如果文件名前缀不统一，可修改匹配逻辑，匹配到同日期多个文件时弹出列表供用户选择
• 日期格式强制统一为8位纯数字YYYYMMDD格式，可避免99%的匹配错误
• 若文件存在子目录，可修改遍历逻辑为递归遍历所有子目录的HTML文件

内容的提问来源于stack exchange，提问作者Nathan Drake