自定义的Title(VBS版本)

最新推荐文章于 2024-10-15 12:25:36 发布

lovingkiss

最新推荐文章于 2024-10-15 12:25:36 发布

阅读量2.7k

点赞数

分类专栏：技术帖子文章标签： vbscript function htc div table class

本文链接：https://blog.youkuaiyun.com/lovingkiss/article/details/652518

版权

这篇博客介绍了一种使用VBS脚本实现的标题特效，包括虑镜切换和鼠标交互功能，旨在替代对系统压力大的HTC版本。作者提供了VBS代码示例，包括创建动态标题表格和响应鼠标事件的函数。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

可以学习到各种虑镜的切换效果，外观还是不错的。
由于优快云上的圪圪朋友说HTC版本，对系统压力大。改成了VBS版
嘘——这家伙打击偶，嘿嘿~~
复制过来，竟然没有了Tab，竟然都对齐了，郁闷阿，没有上传空间，没法子看，呵呵~

共有三个文件：
Title.css：
.TitleTable {filter:progid:DXImageTransform.Microsoft.DropShadow(color=#CECFCD,offX=3,offY=3);BORDER-RIGHT: #669900 1px solid; BORDER-TOP: #669900 1px solid; BORDER-LEFT: #669900 1px solid; BORDER-BOTTOM: #669900 1px solid; BACKGROUND-COLOR: #fff}
.TitleContent {LINE-HEIGHT: normal; BACKGROUND-COLOR: #ffffff;FONT-SIZE: 11px; LINE-HEIGHT: 18px; FONT-FAMILY: verdana, 宋体, fantasy}

Title.Vbs：
'*********************************************************************
'说明：蒋玉龙编写于2006年4月
'Email:loving-kiss@163.com
'Tel:保密
'QQ:66840199 转载请保留信息
'版本：1.02
'//JS版本改编By小虫虫,QQ:38477904 蒋玉龙改编为VBS版本
'不使用Htc的原因是因为如果效果文本太多，会造成加载速度极慢
'=====================================================================
Dim TitleName,TopicNowrap,ContentNowrap
TitleName="食品集团有限公司" 'Title：默认题头
TopicNowrap="Nowrap" '默认标题栏不换行
ContentNowrap="" '默认内容换行
'=====================================================================
window.attachEvent "onlo

最低0.47元/天解锁文章