select 表单变化更改图片

来源:互联网 发布:win7查找网络打印机 编辑:程序博客网 时间:2024/05/17 09:29
  1. <table width="84%" height="125" border="0" cellpadding="0" cellspacing="1" bgcolor="#333333">
  2.                         <tr> 
  3.                           <td align="center" bgcolor="#FFFFFF"><font class=cha2><img src="../images/Visualize_Image/001.gif"  alt=个人形象代表 id=MyImage ></font></td>
  4.                         </tr>
  5.                       </table>
  6. <select name=selMyImage class=editbox1  onChange="document.images['MyImage'].src=options[selectedIndex].value;" size=1 >
  7.                         <%
  8.                   for i = 1 to 24
  9.                     m_MyImage = right("00"&cstr(i),3)
  10.                     Response.Write "<OPTION value=../images/Visualize_Image/"&m_MyImage&".gif>虚拟形像:"&m_MyImage&"</OPTION>"
  11.                   next
  12.                   %>
  13.                       </select>