以前没有研究过脚本的使用,所以昨天那个小问题可是让我费了好一番功夫,贴出代码给自己留个纪念!

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>test</title>
<SCRIPT LANGUAGE="VBScript"> 
<!--
Sub  change()
  Dim TheForm
  Set TheForm = Document.test
  TheForm.Text1.disabled = true 
End Sub
Sub  r_change()
  Dim TheForm
  Set TheForm = Document.test
  TheForm.Text1.disabled = false 
End Sub

-->
</SCRIPT>
</head>
<body>
  <form name = "test">
  <tr>
    <td>
      <input type =radio  value=radio1 name= "RADIO1" CHECKED = TRUE onchange = "r_change()"> yes</input>
      <input type =radio  value=radio2 name="RADIO1" onchange = "change()" > no</input>
    </td>
  </tr>
  <input type = text name = text1 > </input>   
</from> 
</body>
</html>

posted on 2004-09-16 13:13  dnddn  阅读(448)  评论(0)    收藏  举报

导航