ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
楼主: OKJSJSF

[求助] HTML文档的计算问题

[复制链接]

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-10-20 09:13 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
由于网页是固定的,搜索到匹配项后,可以直接写元素的各级父元素details展开的代码,由远及近,不必判断.

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-10-20 14:09 | 显示全部楼层
今天发现代码并未正确执行,只能搜索展开一个级别的菜单。昨晚示例因为二个级别内容有重复,搜索时二个级别都能展开。今于修改了内容,不能正常匹配展开。

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-10-20 14:11 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">

<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>百度AI折叠搜索示例</title>
</head>

<body>
<input type="text" id="search" placeholder="搜索...">
<details><summary>一级菜单1</summary>
<ul>
<li>项目一</li>
<details><summary>二级菜单1</summary>
<ul>
<li>项目三</li>
<li>项目四</li>
</ul>
</details>
</ul>
</details>

<details><summary>一级菜单2</summary>
<ul>
<li>项目二</li>
</ul>
</details>

</body>
<script>
document.getElementById('search').addEventListener('input',function(){
const query=this.value.trim().toLowerCase();
const lis=document.querySelectorAll('li');
const details=document.querySelectorAll('details');
details.forEach(detail=>detail.open=false);
if(query===''){return;}
lis.forEach(li=>{
if(li.textContent.toLowerCase().includes(query)){
let detail=li.closest('details');
while(detail){
detail.open=true;
detail=detail.closest('details');
}
}
});
});
</script>
</html>

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-10-20 14:13 | 显示全部楼层
上面百度示例并不能正常执行搜索,搜索时网页会假死,必须关闭才能重新使用。假死的原因是最后的while循环语句。

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-10-26 13:59 | 显示全部楼层
休息了几天没弄,今天搜索功能完成了。匹配到的项目的多级父元素的表达式不能用一个一个的点号层层扩展,必须采用类或其他标志一次性获取。
document.getElementById('search').addEventListener('input',myf2,false);
function myf2(){
document.querySelectorAll('details').forEach(details=>{details.open=false});
const searcht=this.value.trim().toLowerCase();
const lis=document.querySelectorAll('ol');
if(searcht === ''){return;}
lis.forEach(li => {
if(li.textContent.toLowerCase().includes(searcht)){
li.closest('details.closeopen').open=true;
li.closest('details.closeopen2').open=true;
li.closest('details').open=true;
}
});
};

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-11-1 21:47 | 显示全部楼层
员工电话簿(样式1菜单在左兄弟元素展开).rar (2.42 KB, 下载次数: 1) 请家人们多提意见。自我感觉在阅读时这种Html文件比PDF图片文件好得多。

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-11-3 16:17 | 显示全部楼层
今天把一个有多级标题与标标题多级编号的word文档传到手机微信,打开后选择适应屏幕,离开微信打开其它应用,即”QQ浏览器文件服务“,可以看到按原先设置的标题样式等显示的文档内容。滑动屏幕,会弹出”目录“按钮,点击目录按钮,弹出一个很大的目录窗口,面积超过屏幕一半以上,点击其中的各个标题,会跳转至对应内容。但这个目录不显示标题的多级编号。

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-11-8 22:32 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
我的手机上Word的目录是展开的,不能折叠。
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-21 16:47 , Processed in 0.027661 second(s), 7 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

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