网络编程建立推拉门式菜单的

====1、将以下代码加入到HEML的head/head之间：

style type=\"text/css\"

!nk \\{

color : #000000;

text-decoration : none;

}nk:hover \\{

color : red;

}nk:active \\{

color : #000000;

text-decoration : none;

}//--

/style

style type=\"text/css\"

!--

#slidemenubar2\\{position:absolute;left:-110pt;width:120pt;top:100pt;border:1.5pt solid black;

background-color:#ffffff;layer-background-color:#ffffff;font: 9pt/20pt \"宋体\";}

body \\{ font-size: 9pt; margin: 0pt}

#slidemenubar \\{ position:absolute;

left:-110pt;width:120pt;top:100pt;border:1.5pt black solid;background-color:#F3F3F3;layer-background-color:lightyellow;

font: 9pt/20pt \"宋体\"; }

//--

市场定位;第三 /style

====2、将以下代码加入到HEML的body/body之间：

script language=\"JavaScript1.2\"

if (l)

ite(‘div id=\"slidemenubar2\" style=\"left:-100\" onMouseover=\"pull()\" onMouseout=\"draw()\"‘)

/script layer id=\"slidemenubar\" onMouseover=\"pull()\" onMouseout=\"draw()\" script language=\"JavaScript1.2\"

var sitems=new Array()

var sitemlinks=new Array()

//以下是菜单内容，自由设置；

sitems[0]=\"本站首页\"

sitems[1]=\"最新更新\"

sitems[2]=\"梦想软件\"

sitems[3]=\"其它栏目\"

sitems[4]=\"桌面壁纸\"

sitems[5]=\"给我留言\"

sitems[6]=\"下载特区\"

sitems[7]=\"Email Me\"

sitems[8]=\"我的简介\"

//菜单项目连接

sitemlinks[0]=\"\"

sitemlinks[1]=\"\"

sitemlinks[2]=\"\"

sitemlinks[3]=\"../m\"

sitemlinks[4]=\"../jsschool/m\"

sitemlinks[5]=\"../../../m\"

sitemlinks[6]=\"../../../perl/m\"

sitemlinks[7]=\"mailto:qdjacky@\"

sitemlinks[8]=\"\"

for (i=0;i=ngth-1;i++)

ite(‘a href=‘+sitemlinks[i]+‘‘+sitems[i]+‘/abr‘)

/script /layer

script language=\"JavaScript1.2\"

function regenerate()\\{

load()

}function regenerate2()\\{

if (yers)

setTimeout(\"resize=regenerate\",400)

}load=regenerate2

if (l)\\{

ite(‘/div‘)

themenu=yle

rightboundary=0

leftboundary=-150

}else\\{

themenu=idemenubar

rightboundary=150

leftboundary=10

}function pull()\\{

if (awit)

clearInterval(drawit)

pullit=setInterval(\"pullengine()\",50)

}function draw()\\{

clearInterval(pullit)

drawit=setInterval(\"drawengine()\",50)

}function pullengine()\\{

if (xelLeftrightboundary)

xelLeft+=5

else if(ftrightboundary)

ft+=5

else if (llit)

clearInterval(pullit)

}function drawengine()\\{

if (xelLeftleftboundary)

xelLeft-=5

else if(ftleftboundary)

ft-=5

else if (awit)

clearInterval(drawit)

}/script 查看本文来源