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

<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  阅读(437)  评论(0编辑  收藏  举报

导航