| 在网页的 <head></head> 之间加入以下 VbScript 脚本即可： <Script language="vbscript"> msg="十万个为什么-计算机应用技巧大全" l=len(msg) i=l-3 sub movetitle() title=right(msg,l-i)+left(msg,i) top.document.title=title i=(i+1) mod l end sub speed = 10 '毫秒 a=setInterval("movetitle()",speed) </Script> |
