a sp程序练习.docVIP

ASP程序练习 定义一个将华氏温度转换为摄氏温度的函数，计算公式为：Celsius = (fDegrees-32)*5/9，然后在程序中调用此函数并显示转换结果。 参考答案：aspEx1.asp % Function Celsius(fDegrees) Celsius = (fDegrees-32)*5/9 End Function Response.Write 华氏温度80°F转换为摄氏温度 br Response.Write Celsius(80) ℃ hr Response.Write华氏温度-100°F转换为摄氏温度 br Response.Write Celsius(-100) ℃ % 2．编写一个子程序，子程序含有两个参数，参数可传递name(姓名)、sex（性别），子程序能根据接收到的参数，显示相应的问候语。 参考答案：aspEx2.asp % Sub Welcome(name,sex) Response.Write name If sex=male Then Response.Write先生，欢迎您的访问！ Else Response.Write小姐，欢迎您的访问！ End If End Sub Call Welcome(明明,male) Response.Writep Call Welcome(红红,female) % 3．制作一表单，使用POST方法传送数据，然后完成处理该表单数据的ASP程序，并将传入的数据传回给浏览者。（网页的界面请执行下列程序后获得）。 参考答案： 表单程序：aspEx3.htm html body form method=POST action=aspEx3.asp 请输入您的姓名：input type=textname=txtname size=15 brbr 请选择您喜欢的网站(可多选)：br select name=selweb size=5 multiple option东方网/option option上海旅游网/option option上海热线/option option证券之星/option option华军软件园/option /selectbrbr input type=submit value=提交数据 input type=reset value=重新填写 /form /body /html ASP程序：aspEx3.asp % name=Request.form(txtname) web=Request.form(selweb) webs=Split(web,,) % html body h3 align=center%=name%,您好！hr/h3 您选择的网站是： ol % For i=0 to UBound(webs) Response.Writeli webs(i) Next % /ol /body /html 4．设计一个简易的留言板，在留言板中填写内容后递交，服务器端ASP程序处理留言，未填写内容的，则从新输入，否则显示确认信息。 参考答案： 简易留言板程序：aspEx4.htm html headtitle简易留言板/title/head body centerfont size=5 color=purple欢迎留言/fonthr/center form method=POST action=c4_lx1.asp table border=0 tr td姓名：/td tdinput type=text name=txtname size=20/td /tr tr tdE-mail:/td tdinput type=text name=txtmail size=20/td /tr tr valign=top td留言：/td tdtextarea name=txtword rows=5 cols=40/textarea/td /tr tr td/td tdinput type=submit value=递交留言 input type=reset value=全部重写 /td /table /form /body /html 服务器端留言板处理程序：aspEx4.asp % name=Request(txtname) email=Request(txtmail) word=Re