鼠標懸移到鏈接文字後出現跑馬燈式樣的說明文字

- 中國WEB開發者網絡 (http://www.webasp.net)
-- 網頁特效 (http://www.webasp.net/javascript/)
--- 鼠標懸移到鏈接文字後出現跑馬燈式樣的說明文字 (http://www.webasp.net/javascript/1/103.htm)
-- 發佈日期: 2004-06-02
<!-- 網頁特效代碼由[中國WEB開發者網絡:http://www.ChinaWebDev.com]提供! -->
<!-- 要實現此效果需要 1 個步驟: -->

<!-- 第 1 步: -->
<!-- 把下面的代碼加到<BODY></BODY>區域中: -->

<SCRIPT LANGUAGE="JavaScript">
<!-- Begin
window.onerror = null;
var bName = navigator.appName;
var bVer = parseInt(navigator.appVersion);
var NS4 = (bName == "Netscape" && bVer >= 4);
var IE4 = (bName == "Microsoft Internet Explorer"
&& bVer >= 4);
var NS3 = (bName == "Netscape" && bVer < 4);
var IE3 = (bName == "Microsoft Internet Explorer"
&& bVer < 4);
var scroll_length = 150;
var time_length =50;
var begin_pos = 200;
var i;
var j;
if (NS4 || IE4) {
if (navigator.appName == "Netscape") {
layerStyleRef="layer.";
layerRef="document.layers";
styleSwitch="";
}else{
layerStyleRef="layer.style.";
layerRef="document.all";
styleSwitch=".style";
}
}
//SCROLL
function Scroll(layerName){
if (NS4 || IE4) {
if (NS4 || IE4) {
if(i<(begin_pos+scroll_length)){
eval(layerRef+'["'+layerName+'"]'+
styleSwitch+'.visibility="visible"');
eval(layerRef+'["'+layerName+'"]'+
styleSwitch+'.left="'+i+'"');
i++;
j++;
if(i==j){
setTimeout("Scroll('"+layerName+"')",time_length);}
}
}
}
}
function StopScroll(layerName)
{
i=begin_pos+scroll_length;
eval(layerRef+'["'+layerName+'"]'+
styleSwitch+'.left="'+i+'"');
hideLayer(layerName);
}
function reset()
{
i=begin_pos;
j=i;
}
function hideLayer(layerName){
if (NS4 || IE4) {
eval(layerRef+'["'+layerName+'"]'+
styleSwitch+'.visibility="hidden"');
}
}
// End -->
</script>
<center>
<a href="#" class="link" onmouseover="javascript:reset();Scroll('prem_hint');" onmouseout="javascript:StopScroll('prem_hint');">鼠標移到此鏈接上,看看效果。</a>
</center>
<div id="prem_hint" style="position:relative; visibility:hidden;color:FF9900" class="prem_hint">
在這裡放上對鏈接的文字說明,效果是不是很不錯呢!
</div>


webasp.net