您的位置:首页 > 编程语言 > ASP

显示复选框选择的内容--如何读取多个选项(asp)

2007-06-05 10:07 483 查看
-----eg1.html-----

<html>
<body>
<form method="post" action="eg1.asp">
姓名: <input type="text" name="yourname"><br>
性别: <select name="gender">
<option>男</option>
<option>女</option>
</select> <br>
爱好(可多选):<br>
<input name="hobby" type="checkbox" value="电脑">电脑
<input name="hobby" type="checkbox" value="游戏">游戏
<input name="hobby" type="checkbox" value="体育">体育
<input name="hobby" type="checkbox" value="阅读">阅读
<br>
留言: <textarea name="message">
</textarea> <br>
<input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="重置">
</form>
</body>
</html>

-----eg1.asp-----

<%@ Language=VBScript %>
<%
Response.Expires=0
SName = Request.Form("yourname")
SGender = Request.Form("gender")
SM =Request.Form("message")
SMsg=SM
'SMsg = Replace(SM,vbcrlf,"<Br>" & vbcrlf)
' vbcrlf相当于回车符和换行符的组合。至于Replace函数,其作用就是将字符串StrM中的vbcrlf替换为"<Br>" & vbcrlf(请思考这个vbcrlf有什么用?查看输出文件的HTML源码就明白了),详细请参考VBScript帮助。
%>
<HTML>
<BODY>
姓名: <%= SName%><Br><Br>
性别: <%= SGender%><Br><Br>
<% '先把上面看懂, 有兴趣再看看如何读取多个选项
Response.Write "爱好:<Br>"
For I = 1 to Request.Form("hobby").Count
Response.Write Request.Form("hobby")(I) & "<Br>"
Next
%>
<Br>
留言: <Br>
<%= SMsg%><Br><Br>
</BODY>
</HTML>
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: