载入中。。。 'S bLog
 
载入中。。。
 
载入中。。。
载入中。。。
载入中。。。
载入中。。。
载入中。。。
 
填写您的邮件地址,订阅我们的精彩内容:


 
贴一段目录树展开和关闭的js代码,供以后待查。
[ 2008/4/23 13:18:00 | By: 梦翔儿 ]
 

<html>

<head>
<title>影片分类浏览</title>
</head>

<body>

<table bgcolor=#88ddff width=18% border=0 cellspacing=0>
<tr><td align=middle>分类浏览
<tr><td>

<table width=100% bgcolor=white>
<tr><td>

<tr onClick="SwitchShow(document.all.where, document.all.image1)">
    <td style="color:blue;cursor:hand" align=middle>
    <img src="/blog/images"\dec.gif id=image1> 按影片产地分
   
<tr><td align=middle>
   
    <table id=where>
   
    <tr><td><img src="/blog/images"\dot.gif> 大陆
    </table>

<tr><td bgcolor=white>
 
<tr onClick="SwitchShow(document.all.type, document.all.image2)">
    <td style="color:blue;cursor:hand" align=middle>
    <img src="/blog/images"\dec.gif id=image2> 按影片类型分
      
<tr><td align=middle>

    <table id=type align=middle>
      
    <tr><td><img src="/blog/images"\dot.gif> 爱情
    <tr><td><img src="/blog/images"\dot.gif> 搞笑
    </table>
<tr><td> 
</table>

<script language=VBScript>

Sub SwitchShow(eo1, eo2)

   If eo1.style.display="none" Then
      eo1.style.display="block"
      eo2.src="images\dec.gif"
   Else
      eo1.style.display="none"
      eo2.src="images\add.gif"
   End If
  
End Sub

</script>

</body>
</html>

 
 
  • 标签:目录树 展开 关闭 
  • 发表评论:
    载入中。。。

     
     
     

    梦翔儿网站 梦飞翔的地方 http://www.dreamflier.net
    中华人民共和国信息产业部TCP/IP系统 备案序号:辽ICP备09000550号

    Powered by Oblog.