2013福师大网络教育网页设计技术作业123

作业1

选择题（答案请填写在表格里）

（1）left(“asp.net”,4)的值为（ c ）

A,”asp”                B,”.net”              C,”asp.”                 D,”aspn”

（2）Instr(“abc@263.net”,”@”)的值是（a  ）

A,4                   B,3                  C,5                     D,6

（3）对于request对象，如果省略获取方法，如request(“username”), 将按什么顺序依次检查是否有信息传入（ b  ）

A,Form、Querystring、Cookies、 Server Variables、 ClientCertificate

B, Querystring、Form、Cookies、 Server Variables、 ClientCertificate

C, Cookies、Querystring、Form、Server Variables、 ClientCertificate

D,Form、Querystring、Cookies、ClientCertificate、 Server Variables

（4）下面程序执行完毕，页面上显示的是什么内容（ c  ）

<%

Reponse.write server.HTMLEncode(“<a href=’http://www.sohu.com’>搜狐</a>”)

%>

A,搜狐                                  B,搜狐  

C,<a href=’http://www.sohu.com’>搜狐</a>    D,该句有误，无法输出

（5）下面程序执行完毕，页面上显示什么内容（D  ）

<%

=”祖国”

=”您好”

%>

A,祖国        B,祖国您好         C,祖国（换行）您好        D,以上都不对

（6）<%

session("a")="1"

session("b")="2"

c=session("a")+session("b")

response.Write c

%>则c的值为(  b )

A,3                 B,12                 C,ab                     D,”12”

（7）如果在同一个应用程序的页面1中添加Server.ScriptTimeout=300, 那么在页面2中添加c=Server.ScriptTimeout,请问c等于多少秒（  b ）

A,60             B,90                  C,300               D,以上都不对

（8）查询用户表中最新的5条记录，请问用哪条语句（ a ）

A,select top 5 * from user order by id desc

B, select * from user order by id desc

C, select top 5 * from user

D, select * from user top 5 order by id desc

（9）执行完Delete From users语句后，共删除多少条记录（  c ）

A,0            B,1             C,全部             D,若干条

（10）进行模糊查询时所使用的通配符是（  d  ）

A,*                B,?                 C,&                      D,%

（11）如果指针指向第1条记录，则rs.bof和rs.eof的值分别为（   a ）

A,True、False                B,False、True

C, True、True                D, False、False

（12）如果某服务器比较慢，执行查询操作时可能无法正常执行，应该设置下面哪个属性（  c ）

A,Connection对象.CommandTimeout         B,Connection对象.ConnectionTimeout

C,Command对象.CommandTimeout          D,Session对象.Timeout

（13）获取客户端的IP用下列哪条语句（  a ）

A,request.servervariables(“REMOTE_ADDR”)

B,request.servervariables(“REMOTE_HOST”)

C,request.servervariables(“LOCAL_ADDR”)

D,request.servervariables(“SERVER_PORT”)

（14）下面程序段执行完毕，页面上显示的内容是（ a  ）

<%

dim a

a="username"

session("a")="张红"

session(a)="王刚"

response.Write session("username")

%>

A,王刚         B,张红         C,张红王刚        D,无法正常输出

（15）如果希望打开的记录集可以前后移动指针，并且可读可写，则应该为下面哪一句（  b ）

A,rs.open sql,conn                         B,rs.open sql,conn,1,3

C,rs.open sql,conn,,3                       D,rs.open sql,conn,1

（16）在默认WWW主目录C:\intpupb\wwwroot下建一个temp.asp文件通过Internet访问你的ASP文件时，下列说法正确的是（D ）。

A． http://localhost/temp.asp

B． http://127.0.0.1/temp.asp

C． http://你的计算机名字/temp.asp

D． http://你的计算机的IP地址/temp.asp

（17）下列标记中，（A ）可以在网页中插入图片。

A． <img>标记                        B. <Br>表记

C． <H3>标记                         D. <SCR>标记

（18）程序继续执行调用Sub过程的语句之后的语句，可以立即从Sub过程中退出的语句是（c ）。

A．</Sub>          B. Exit           C. Exit Sub         D. Loop

（19）下列不属于Request.ServerVariables 集合可以读取服务器环境变量的是（ a）。

A．客户端的网速

B．客户端所提交内容的数据类型

C．发送请求的端口号

D．发出请求的远程主机IP

（20）下列关于ASP程序说法不正确的是（c ）。

在ASP程序中，字母不分大小写

使用REM或 ’ 符号来标记注释语句

<%和%>符号必须和ASP语句放在一行

ASP语句必须分行，不能把多条ASP语句写在一行

作业2

1．请编写代码，在页面上显示如下图形。注意：完整写出所有代码

**********

*********

********

*******

******

*****

****

***

**

*

解答：

Dim I,J as Integer   

For I=10 To 1 Step -1   

For J=1 To I   

Response.Write("*" )   

Next   

Response.Write(" ")   

Next   

2．有100个和尚吃100个馒头，大和尚1人吃4个，小和尚4人吃1个，问有多少个大和尚和多少个小和尚？

解答：

<%

dim x,y

for x=1 to 100

for y=1 to 100

if(x+y=100) then

if(16*x+y=400) then

response.write( "大和尚为:"&CStr(x)&"个 "& " 小和尚为："&CStr(y)& "个")?

else

end if

else

end if

next

next

%>

作业3

填空（答案请填在表格里）

1.         下面是一个函数，用来返回从a到b的立方和，请填写其中的空格。

<%

Function Cube(a,b)

    Dim I,Sum

    Sum=     0           

    For I= a To b

           Sum=     Sum+I^3           

    Next

           Cube      =Sum

End Function

%>

2.         下面这段语句，将根据今天是星期几，分别在页面上显示一幅图片，星期一、二显示p1.jpg，其它时间显示p2.jpg。请填写完整下面的程序。

<%

Dim theday

theday=    Weekday     (Date())

Select Case theday

Case      2,3   

            Response.Write    "<img src=''''p1.jpg''''>"

Case Else

            Response.Write    "<img src=''''p2.jpg''''>"

End Select

%>

3.         很多网站要求客户必须登录后才能访问，如果客户没有登录，就直接访问网站的某个页面，应该将其引导到首页。请据此填写下面的空格。

<%

If Session("UserName")=    Response.       Then

             Redirect       "index.asp"

End If

%>

4.         下面的程序段用来计算客户是第几次访问本站。请填写其中的空格。

<%

Dim varNumber

varNumber=Request.Cookies("number")

If        VarNumber=” ”          Then

       varNumber=1

Else

       varNumber=varNumber+1

End If

.            .Response.Cookies(“number”)           =varNumber

.            .Response.Cookies(“number”)           =#2030-1-1#      

Response.Write "您是第" & varNumber & "次访问本站"

%>

5.         假如Application("UserOnLine")中保存了一个数组，该数组中保存了在线用户的名称，下面的程序段从其中读取所有用户名，并显示在页面上，请填写其中的空格。

<%

Dim UserOnLine,Number

UserOnLine=Application("UserOnLine")

Number=    Ubound       (UserOnLine)                    ''''返回该数组的最大下标

For I=0 To Number

       Response.Write      （ UserOnLine(I) ）         

Next

%>