Recommended: Cool Right Button Menu _ typical special effects

Source: Internet
Author: User

Copy Code code as follows:
<!--++++++++++++++++++++++++++++++ Enter the following code between <body></body> ++++++++++++++++++++++++++++++++-->
Click the right button to see!
<style>
body,td,a {Font-size:9pt;color:black}
. None{border:black 1px Solid;background:d9d9d9;padding-top:2}
. Over {border:black 1px solid;background:707888;color:white;padding-top:2}
</style>
<body oncontextmenu= "return false" >
<div style= "Position:absolute; left:100; Top:100;cursor:hand;display= ' None '; Id=plane
Onmousedown= "Down=true;divleft=event.clientx-parseint (Plane.style.left);
Divtop=event.clienty-parseint (plane.style.top) "onmouseup=" Down=false ">
<div align=center style= "Position:absolute; left:150px; top:33px; width:100px;
height:19px; Z-index:1;color:white;background:707888;cursor:default; "class=" None "
Onmouseover= "Menuin (); init ()" > Right-click menu </div>
<div align=center id= "item1" style= "Position:absolute"; left:50px; top:55px; width:99px;
height:19px; Z-index:2; Filter:alpha (opacity=0) "onmouseover=" this.classname= ' over '; Menuin () "
Onmouseout= "This.classname= ' None"; "Class=" None "
><a href=http://www.pcedu.com.cn> Network College </a></div>
<div align=center id= "item2" style= "Position:absolute"; left:250px; top:77px; width:99px; height:19px; Z-index:3;filter:alpha (opacity=0) "
Class=none onmouseover= "this.classname= ' over"; Menuin () "
Onmouseout= "This.classname= ' none ';" ><a href=#> menu item two </a></div>
<div align=center id= "Item3" style= "Position:absolute"; left:50px; top:99px; width:99px; height:19px; Z-index:4; Filter:alpha (opacity=0) "
Class=none onmouseover= "this.classname= ' over"; Menuin () "
Onmouseout= "This.classname= ' none ';" > menu item Three </div>
<div align=center id= "item4" style= "Position:absolute"; left:250px; top:121px; width:99px; height:19px; Z-index:5;filter:alpha (opacity=0) "
Class=none onmouseover= "this.classname= ' over"; Menuin () "
Onmouseout= "This.classname= ' none ';" > menu item Four </div> <div align=center id= "ITEM5" style= "Position:absolute"; left:50px; top:143px; width:99px; height:19px; Z-index:6; Filter:alpha (opacity=0) "
Class=none onmouseover= "this.classname= ' over"; Menuin () "
Onmouseout= "This.classname= ' none ';" > menu item Five </div>
</div>
<script language= "vbs" >
Dim down,divleft,divtop,timelinestart,timelinestop,tidone,tidtwo,tidtree
Down=false
Timelinestart=0
Timelinestop=0
Sub Document_onmousedown
If Window.event.button=2 Then
Plane.style.display= ""
plane.style.left=window.event.clientx-153
Plane.style.top=window.event.clienty-35
End If
End Sub
Sub Document_onmousemove
If Down then
Plane.style.left=window.event.clientx-divleft
Plane.style.top=window.event.clienty-divtop
End If
End Sub
Sub Document_ondargstart
Window.event.returnvalue=false
End Sub
function Menuin ()
Cleartimeout (Tidtree)
End Function
Sub Document_onclick
Tidtree=settimeout ("Outit ()", 200)
End Sub
function init ()
If Timelinestart<>5 Then
Cleartimeout (Tidtwo)
Item1.style.pixelleft=item1.style.pixelleft+20
Item1.filters.alpha.opacity=item1.filters.alpha.opacity+20
Item2.style.pixelleft=item2.style.pixelleft-20
Item2.filters.alpha.opacity=item2.filters.alpha.opacity+20
Item3.style.pixelleft=item3.style.pixelleft+20
Item3.filters.alpha.opacity=item3.filters.alpha.opacity+20
Item4.style.pixelleft=item4.style.pixelleft-20
Item4.filters.alpha.opacity=item4.filters.alpha.opacity+20
Item5.style.pixelleft=item5.style.pixelleft+20
Item5.filters.alpha.opacity=item5.filters.alpha.opacity+20
Timelinestart=timelinestart+1
Else
Cleartimeout (Tidone)
End If
Tidone=settimeout ("Init ()", 1)
End Function
function Outit ()
If Timelinestart<>0 Then
Cleartimeout (Tidone)
Item1.style.pixelleft=item1.style.pixelleft-20
Item1.filters.alpha.opacity=item1.filters.alpha.opacity-20
Item2.style.pixelleft=item2.style.pixelleft+20
Item2.filters.alpha.opacity=item2.filters.alpha.opacity-20
Item3.style.pixelleft=item3.style.pixelleft-20
Item3.filters.alpha.opacity=item3.filters.alpha.opacity-20
Item4.style.pixelleft=item4.style.pixelleft+20
Item4.filters.alpha.opacity=item4.filters.alpha.opacity-20
Item5.style.pixelleft=item5.style.pixelleft-20
Item5.filters.alpha.opacity=item5.filters.alpha.opacity-20
Timelinestart=timelinestart-1
Else
Cleartimeout (Tidtwo)
Plane.style.display= "None"
Exit function
End If
Tidtwo=settimeout ("Outit ()", 1)
End Function
</script>

Contact Us

The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion; products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the content of the page makes you feel confusing, please write us an email, we will handle the problem within 5 days after receiving your email.

If you find any instances of plagiarism from the community, please send an email to: info-contact@alibabacloud.com and provide relevant evidence. A staff member will contact you within 5 working days.

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.