kafka UI工具
摘要：
项目地址： https://github.com/Bronya0/Kafka-King 优点：中文，免费，功能多样，多平台支持 阅读全文
posted @ 2024-06-21 22:41 狂自私 阅读(1) 评论(0) 推荐(0) 编辑
2024年6月21日 #
2024年6月13日 #
granfana 两种方式创建多折线图
摘要：
a56爆大奖在线娱乐个人经常使用granfana的折线图，但是以前a56爆大奖在线娱乐只知道第a56爆大奖在线娱乐办法来创建，这种方法很不够灵活。 a56爆大奖在线娱乐使用mysql作为数据源。 一、使用【列】来创建折线图 然后对应的查询语句是这样的： SELECT `023001`.report_time, `023001`.在线率 as '金属氧化物避雷器绝缘监测 阅读全文
posted @ 2024-06-13 11:30 狂自私 阅读(2) 评论(0) 推荐(0) 编辑
2024年6月3日 #
删除连续的空行
摘要：
Sub DeleteConsecutiveEmptyParagraphs() paraCount = ActiveDocument.Paragraphs.Count idx = 2 Do While idx < paraCount forward_Paragraph = Replace(Replac 阅读全文
posted @ 2024-06-03 17:06 狂自私 阅读(2) 评论(0) 推荐(0) 编辑
2024年5月26日 #
nginx-端口复用，不同域名映射到不同服务中
摘要：
a56爆大奖在线娱乐使用docker容器运行NGINX，并将主机的80端口映射到容器的8080端口中。 [root@harbor 20240526]# docker ps CONTAINER ID IMAGE COMMAND CREATED STATUS PORTS NAMES 2e110b2f2572 goharb 阅读全文
posted @ 2024-05-26 11:09 狂自私 阅读(20) 评论(0) 推荐(0) 编辑
select_range
摘要：
Function select_range(start_title_str As String, end_title_str As String, Optional style_str As String = "标题 1") As Boolean '选择范围，通过指定本标题字符串（start_tit 阅读全文
posted @ 2024-05-26 08:47 狂自私 阅读(4) 评论(0) 推荐(0) 编辑
创建超链接
摘要：
Sub 创建超链接() ' ' 创建超链接 宏 ' 为所选择的表格的第一列的cmdlet命令创建对应的超链接（前提是已经存在对应的命令说明内容） ' 只处理第一个表格 ' Application.ScreenUpdating = False '关闭同步调整更新 Dim my_table As Tab 阅读全文
posted @ 2024-05-26 08:47 狂自私 阅读(2) 评论(0) 推荐(0) 编辑
标题查询
摘要：
Sub 标题查询() ' ' 标题查询 宏 ' 用来查询样式为标题n（1≤n≤9）的标题 ' Dim title_n Dim find_str As String find_str = InputBox("请输入要查找的内容：", "标题内容查询：输入查询内容") '做简单的合法性判断 If (Le 阅读全文
posted @ 2024-05-26 08:47 狂自私 阅读(8) 评论(0) 推荐(0) 编辑
cmdlet_命令查询
摘要：
Sub cmdlet_命令查询() ' ' 查找 宏 ' ' Result = select_range("cmdlet 命令", "Server 2016 core") Selection.Find.ClearFormatting Selection.Find.Style = ActiveDocu 阅读全文
posted @ 2024-05-26 08:46 狂自私 阅读(4) 评论(0) 推荐(0) 编辑
调整cmdlet命令的顺序
摘要：
Sub 调整cmdlet命令的顺序() ' ' 调整about标题的顺序 宏 ' ' Result = select_range("cmdlet 命令", "Server 2016 core") If (Result) Then Selection.SortByHeadings wdSortFiel 阅读全文
posted @ 2024-05-26 08:45 狂自私 阅读(1) 评论(0) 推荐(0) 编辑
调整about标题的顺序
摘要：
Sub 调整about标题的顺序() ' ' 调整about标题的顺序 宏 ' ' Result = select_range("about配置文件", "实战：远程巡检希沃一体机的运行信息") If (Result) Then Selection.SortByHeadings wdSortFiel 阅读全文
posted @ 2024-05-26 08:44 狂自私 阅读(2) 评论(0) 推荐(0) 编辑