<% dim k,sum1 sum1=0 k=1 do while k<100 sum1=sum1+k^2 k=k+2 loop response.write "1 至 99,奇数的平方和=" &; CStr(sum1) %> 5、请编写函数计算 a 到 b 的立方和,并举例调用,调用时 a,b 分别为 3 和 6 <% dim a,b a=3 b=6 call pingfanghe(a,b) sub pingfanghe(m,n) dim i,sum sum=0 i=1 while i<=6
2
sum=sum+i^3 i=i+1 wend response.write "3 至 6 的立方和=" &; CStr(sum) end sub %> 6、有 100 个和尚吃 100 个馒头,大和尚 1 人吃 4 个,小和尚 4 人吃 1 个,问有多少个大和尚和多少个小和尚?(提示:使用循环嵌套和判断语句) <% dim x,sum sum=0 for x=1 to 25 sum=4*x+(100-x)/4 if sum>=100 then exit for end if next response.write "大和尚有:" &; cstr(x) &; "个" %>
<% y=100-x response.write "小和尚有:" &; cstr(y) &; "个" %> 习题 4 选择题 1、对于 Request 对象,如果省略获取方法,如 Request(“user_name”),将按什么顺序集资检查是否有信息传入(B) A、Form、Query String、Cookies、Server Variables、Client Certificate B、Query String、Form、Cookies、Server Variables、Client Certificate C、Cookies、Query String、Form、Server Variables、Client Certificate D、Form、Query String、Cookies、Server Variables、Client Certificate 2、Query String 获取方法、Form 获取方法获取的数据子类型分别是:C A、数字、字符串 B、字符串、数字
C、字
符串、字符串 D、必须根据具体值而定 表 4-2 中,说明 Query String 的功能是“从查询字符串中读取用户提交的数据;例 4-2 中,说明“因为传送的是字符串”??。 3、请问下面程序段执行完毕,页面上显示内容是什么:C <% Response.Write “新浪” %> A、新浪 B、新浪 D、该句有错,无法正常输出
C、新浪(超链接)
4、请问下面程序段执行完毕,页面上显示的内容是什么 <% ="祖国" ="您好" %> 显示网页错误。因为用“=”输出,一对<%与%>中,只能有一句 5、请问下面程序段执行完毕,页面上显示的内容是什么:A <% Response.Write “春秋”
3
Response.End Response.Write “战国” %> A、春秋 B、战国 C、春秋战国 D、春秋(换行)战国
因为 End 是停止处理 ASP 程序 问答题 1、请叙述 Response 的 Write 方法的两种写法的区别及注意事项: 一种是简化写法,如,<%=new()%>。 提示:简化写法一对<%、%>之间只能有一个“=” 2、请问 Redirect 方法和超链接的区别是什么? 一般页面上的超链接,需用户单击后,才能转至另一个 URL;而 Redirect 方法,是自动转向 3、请问当使用 Redirect 方法时,为什么有时要在文件形状加<%Response.Buffer=True %>这句话? 加了这句话后,服务器先将页面送至客户端的缓冲区。 提示:Windows 2000 操作系统中 Buffer 属性默认为 True。就可不加这句话。 实践题 1、请将 4-4.asp 和 4-5.asp 修改为一个页面:
<% Response.Write":" &; user_name %> | |
<% Response.Write"密码:" &; password %> | |
<% Response.Write"性别:" &; sex %> | |
<% Response.Write"爱好:" &; love %> | |
<% Response.Write"职业: " &; career %> | |
<% Response.Write"简介:" &; introduction %> | |
<% =user_name %> | |
密码 | <% =password %> |
性别 | <%= sex %> |
爱好 | <% =love %> |
职业 | <% =career %> |
简介 | <% =introduction %> |
<% if IPCstr<>"162.105" then Response.Write "你是非法用户!" else Response.Write "欢迎光临!" end if %> 3、请开发一个页面,当客户第一次访问时,需在线注册、性别等信息,然后把信息保存到 Cookies 中。下一次如该客户再访问时,则显示“某某,您好,您是第 几次光临本站”的欢迎信息 <% dim user_nam