📄 5_5.asp

📁 《asp网页设计》作者沈才梁源代码,共十章

💻 ASP

字号:

<%
Option Explicit
Dim Sex,Hobby
Sex=Request("Sex")
Hobby=Request("C1")
%>
<html><head><title>复选框和单选按钮提交后选中自己的方法</title></head>
<body>
【5_5.asp】：复选框和单选按钮提交后选中自己的方法
<form method="POST" action="5_5.asp" name="form1">
  <p>性别：
  <input type="radio" name="Sex" value="男" <%If Sex="男" then response.write "checked" End if%> >男  
   <input type="radio" name="Sex" value="女" <%If Sex="女" then response.write "checked" End if%> >女</p>
  <p>爱好：
     <input type="checkbox" name="C1" value="体育" <%If Instr(Hobby,"体育")>0 then response.write "checked" End if%> >体育 
     <input type="checkbox" name="C1" value="看书" <%If Instr(Hobby,"看书")>0 then response.write "checked" End if%> >看书  
     <input type="checkbox" name="C1" value="看电影" <%If Instr(Hobby,"看电影")>0  then response.write "checked" End if%> >看电影 
     <input type="checkbox" name="C1" value="旅游" <%If Instr(Hobby,"旅游")>0 then response.write "checked" End if%> >旅游</p>
     <p><input type="submit" value="提交" name="B1">
     <input type="reset" value="全部重写" name="B2"></p>
</form><hr>
<p>性别：<%=Request("Sex")%></p>
<p>爱好：<%=Request("C1")%></p>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -