<select>
 <option value="这里是实际上机器读到的值">这里是下拉框里显示的值</option>
 <option value=""></option>
 <option value=""></option>
  ......................
</select>

解决方案 »

  1.   

    conduit2000(坏小子):
    真够坏的!!!:)
      

  2.   

    <html><head>
    <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
    <meta name="GENERATOR" content="Microsoft FrontPage 4.0">
    <meta name="ProgId" content="FrontPage.Editor.Document">
    <title>菜单</title>
    </head><body>
    <!--主功能表-->
    <table width=100% border=0 cellspacing=0 height="31">
     <tr>
      <td bgcolor=navy style="font-size: 12; color: white" height="13">VBScript的網頁功能表製作</td>
     </tr>
     <tr>
      <td bgcolor=CFCFCF style="font-size: 12" height="14"><a href="#" id="lnk1" style="text-decoration:none;" onmouseover="CallMenu1()" onmouseout="CallMenu2()"> 檔案 </a</td>
        </a>
     </tr>
    </table><!--跳出式功能表-->
    <p id="menu1" style="position:absolute;left:10px;top:45px;visibility:hidden;" onmouseover="CallMenu1()" onmouseout="CallMenu2()">
    <table border=1 cellspacing=0>
    <tr><td bgcolor=yellow style="font-size:12;"><a href="../homepage.html" style="text-decoration:none;">  前往首頁  </a></td></tr>
    <tr><td bgcolor=yellow style="font-size:12;"><a href="../vbs/vbs.html" style="text-decoration:none;">  VBScript物件運用  </a></td></tr>
    <tr><td bgcolor=yellow style="font-size:12;"><a href="vbss.html" style="text-decoration:none;">  離開  </a></td></tr>
    </table><script language=vbscript>
     Sub CallMenu1()
      document.all("menu1").style.visibility = "" 
     End Sub
      Sub CallMenu2()
      document.all("menu1").style.visibility = "hidden" 
     End Sub
      
    </script>
    </body></html>