国开广东电大 动态网页制作 网上在线形考作业[答案]
时间:2022-11-20 20:57 来源:奥鹏教育 作者:奥鹏作业答案 点击:次
国开电大广东电大 动态网页制作 网上在线形考作业 当前的Web程序开发中通常采用什么模式？ ASP文件的扩展名是 ASP应用程序代码都是用（）符号括起来的。 网页的基本语言是（ ）。 设置网页的标题时，在HTML源代码中需要使用（）标记。 （）标记通过属性来定义文件信息的名称、内容等，是实现元数据的主要标记，它能够提供文档的关键字、作者、描述等多种信息。 下面哪种方法可以设置单行文本框的默认值为在这里输入用户名？ 在表单中，下列哪个属性用于指定表单处理程序文件的地址？ 表达式Mid(SHANGHAI,6,3)的值是() 表达式X1〉X是( ) 以下( )程序段可以实施X、Y变量值的变换。 VB认为下面( )组变量是同一个变量 执行下面的程序段后，x 的值为( ) x=5 For i=1 To 10 Step 2 x=x +1 Next Response对象的属性（）可以用于表明页输出是否被缓冲。 下面程序段执行完毕，我们在浏览器中看到的内容是什么？（ ） 〈 % Response.Write 〈 a href=’’〉新浪〈 /a〉 %〉 在页面A.asp中使用语句ScriptTimeOu=100及Server.Execute B.asp，那么B.asp中的ScriptTimeOut属性值是（）。 在页面A.asp中使用语句ScriptTimeOu=300及Response.Redirect B.asp，那么B.asp中的ScriptTimeOut属性值是（）。 下面哪条SQL语句可以正确执行？ 以下连接对象的创建方法中，正确的是（ ）。 下列哪个对象是Command对象的子对象（）。 利用Command对象操作存储过程时，需要将CommandType属性值设置为（）。 在Record对象中，用来设置或返回记录所在的页号，通过该属性可使当前记录跳到指定的页的属性是（）。 Field对象是下列哪个对象的子对象（）。 输出Drives对象drv当前驱动器的可用空间大小是（）。 在超链接组件的超链接数据文件中，文件URL和说明之间可以用什么隔开？ 网页中通过已经定义好的关键字和图形，只要用鼠标轻轻一点，就可以自动跳转到相应的其它文件，获得相应的信息，这称为超链接。 HTML中表示文字粗体的标记除了使用〈strong加粗〉外，还可以使用〈a〉 文字标记〈FONT〉中的color属性可以设置文字的颜色 在指定单选框时，只有将value属性的值指定为相同，才能使它们成为一组。 函数Len(CStr(123.4))的值为4 表达式(7\31)*(21\5-1)的值是1 表单文本框txtCa使用POST方法提交数据后，获取该文本框输出的值，可使用语句Request.Form(txtCa)。 关系数据库中可命名的最小数据单位是属性 在Access中，表间的关系有一对一、一对多及多对多。 Server对象的FilePath方法可以将虚拟路径转化为物理路径。 若ASP服务器的根目录是C:\wwwroot，假如在C:\wwwroot\asp\temp下建立了一个ASP文件test.asp，则浏览方式正确的是 HTML文档包含的两个部分是指 下列哪些标记不是超链接的HTML源代码标记（）。 下列哪段语句将会以粗体、下划线显示？ 以下关于FONT标记符的说法中，正确的是（）。 以下不可以作为VB变量名的是( ) 设A、B、C表示三角形的3条边，表示条件任意两边之和大于第三边的表达式可以用( )表示。 下列说法正确的有（） 产生[10，37]之间的随机整数的VBScript表达式不正确的是( ) 以下叙述不正确的是( ) 下列语句正确的是（）。 下列说法不正确的是（）。 下列说法正确的是（）。 如果要返回应用程序根目录的物理路径，那么MapPath方法的参数可以是？ 关系数据库中的关键字说法不正确的是（）。 能进行索引的字段类型是（）。 在Access数据库的表设计视图中，能进行的操作是（）。 下列哪些是ADO（ActiveX Data Object）的主要对象（）。 下面哪条SQL语句可以正确执行？（其中’ ‘表示空字符串） 下面哪种方法可以设置单行文本框的默认值为”在这里输入用户名”？ 表达式Mid(“SHANGHAI”,6,3)的值是() 下面程序段执行完毕，我们在浏览器中看到的内容是什么？（ ）〈 % Response.Write “〈 a href=’’〉新浪〈 /a〉” %〉 在页面A.asp中使用语句”ScriptTimeOu=100”及”Server.Execute “B.asp””，那么B.asp中的ScriptTimeOut属性值是（）。 在页面A.asp中使用语句”ScriptTimeOu=300”及”Response.Redirect “B.asp””，那么B.asp中的ScriptTimeOut属性值是（）。 表单文本框”txtCa”使用POST方法提交数据后，获取该文本框输出的值，可使用语句Request.Form(“txtCa”)。 在Access中，表间的关系有”一对一”、”一对多”及”多对多”。 若ASP服务器的根目录是”C:\wwwroot”，假如在C:\wwwroot\asp\temp下建立了一个ASP文件test.asp，则浏览方式正确的是 设A、B、C表示三角形的3条边，表示条件”任意两边之和大于第三边”的表达式可以用( )表示。 阅读程序，选择下列程序的输出结果〈%dim x,ss=0x =split(“21,34,167,42,63,98,84,102″,”,”)
For i = 0 To 7
If (x(i) Mod 3 = 0) And (x(i) Mod 7 = 0) Then
s=s+x(i)
End If
Nextresponse.write “s=” & s%〉 阅读程序，选择下列程序的输出结果〈%Dim n1,n2,n3,x
x = split(“23,0,-8,45,-75,0,0,4,6,-9,0,2″,”,”)
n1 = 0: n2 = 0: n3 = 0
For Each Item In x
If Item 〉 0 Then
n1 = n1 + 1
ElseIf Item = 0 Then
n3 = n3 + 1
Else
n2 = n2 + 1
End If
Next
response.write “n1=” & n1 & “,n3=” & n3 & “,n2=” & n2 %〉 阅读程序，选择下列程序的输出结果〈%Dim a,ia = Array(1,3,5,7,9,2,4,6,8)For i = LBound(a) To UBound(a) a(i) = a(i) * a(i)Nextresponse.write a(i-2)
%〉 阅读程序，选择下列程序的运行结果〈%Dim x, y x = Split(“001,002,003”, “,”)For i = 0 To UBound(x) x(i) = “15” & x(i)Nexty = Join(x, “|”)response.write y
%〉 阅读程序，选择下列程序的运行结果〈%Function TestFun(Str, Num)
If Num = 0 Then
TestFun = Left(Str, 5)
Else
TestFun = Right(Str, 5)
End IfEnd Function
Dim Str,Sum
Str = “123.5and564.6”
Sum = cdbl(TestFun(Str, 0)) + cdbl(TestFun(Str, 1))
response.write “Sum=” & Sum
%〉 阅读程序，选择下列程序的运行结果〈%Function TestFun(x)
Dim t
t = 1
For i = 1 To x
t = t * i
Next
TestFun = tEnd FunctionFunction test(n,m)
Dim z
z = TestFun(n) / (TestFun(m) * TestFun(n – m))
test = zEnd Function
Dim x, y, result
result = test(8, 6)
response.write “result=” & result%〉 阅读程序，选择下列程序的输出结果。〈%Dim i, j , SS = 0For i = 1 To 5 Step 3
j = 1
While j 〈= i
S = S + i + j
j = j + 2
WendNext response.write “S=” & S & “,i=” & i & “,j=” & j%〉 下列程序实现输出1000以内的所有完全数，请选择完善程序。（说明一个数如果恰好等于它的因子之和（除自身外），则称该数为完全数，例如28=1+2+4+7+14，28为完全数）〈%Dim i , j , X
i = 1
Do While i 〈= 1000
X = 0: j = 1
Do
If (i Mod j) = 0 Then ________
j = j + 1
Loop While j 〈= i / 2
If X = i Then response.write i & ” ”
i = i + 1
Loop%〉 下列程序的功能是（）
〈 %
Dim fso
Set fso=Server.CreateObject(“Scripting.FileSystemObject”)
Dim SF,DF
SF=”C:\test1.txt”
DF=”D:\test1.txt”
fso.MoveFile SF, DF
%〉 下列程序的功能是（）
〈 %
Dim fso
Set fso=Server.CreateObject(“Scripting.FileSystemObject”)
Dim SF,DF
SF=”C:\test1.txt”
IF fso.FileExists(SF)=True Then
fso.DeleteFile SF
End If
%〉 引语阅读如下程序，使用for each依次输出所有Session变量，请完善程序。 “s3″ 第（2）题选择 学生答案 Session.Contents(Item) 第（4）题选择 学生答案 Array_temp(0) 引语利用数据库在开发一个计数器，每次访问该页面就读取数据库中的访问次数，然后再更新记录即可。访问次数保存在数据表pcounter的lgnum字段中，请阅读程序，将程序填写完整。 Server.Mappath visitnumber sname、stel分别表示ID号、姓名、电话。 cmd.Connection 学生答案 学生答案 rs.MoveLast 引语已知”D:\text.txt”中存放若个整数 ”D:\test.txt”,true t request.write sum 下面程序段执行完毕，我们在浏览器中看到的内容是什么？（ ）〈 % Response.Write 〈 a href=’’〉新浪〈 /a〉 %〉 阅读程序，选择下列程序的输出结果〈%dim x,ss=0x =split(21,34,167,42,63,98,84,102,,)
For i = 0 To 7
If (x(i) Mod 3 = 0) And (x(i) Mod 7 = 0) Then
s=s+x(i)
End If
Nextresponse.write s= & s%〉 阅读程序，选择下列程序的输出结果〈%Dim n1,n2,n3,x
x = split(23,0,-8,45,-75,0,0,4,6,-9,0,2,,)
n1 = 0: n2 = 0: n3 = 0
For Each Item In x
If Item 〉 0 Then
n1 = n1 + 1
ElseIf Item = 0 Then
n3 = n3 + 1
Else
n2 = n2 + 1
End If
Next
response.write n1= & n1 & ,n3= & n3 & ,n2= & n2 %〉 阅读程序，选择下列程序的运行结果〈%Dim x, y x = Split(001,002,003, ,)For i = 0 To UBound(x) x(i) = 15 & x(i)Nexty = Join(x, |)response.write y
%〉 阅读程序，选择下列程序的运行结果〈%Function TestFun(Str, Num)
If Num = 0 Then
TestFun = Left(Str, 5)
Else
TestFun = Right(Str, 5)
End IfEnd Function
Dim Str,Sum
Str = 123.5and564.6
Sum = cdbl(TestFun(Str, 0)) + cdbl(TestFun(Str, 1))
response.write Sum= & Sum
%〉 阅读程序，选择下列程序的运行结果〈%Function TestFun(x)
Dim t
t = 1
For i = 1 To x
t = t * i
Next
TestFun = tEnd FunctionFunction test(n,m)
Dim z
z = TestFun(n) / (TestFun(m) * TestFun(n – m))
test = zEnd Function
Dim x, y, result
result = test(8, 6)
response.write result= & result%〉 阅读程序，选择下列程序的输出结果。〈%Dim i, j , SS = 0For i = 1 To 5 Step 3
j = 1
While j 〈= i
S = S + i + j
j = j + 2
WendNext response.write S= & S & ,i= & i & ,j= & j%〉 下列程序实现输出1000以内的所有完全数，请选择完善程序。（说明一个数如果恰好等于它的因子之和（除自身外），则称该数为完全数，例如28=1+2+4+7+14，28为完全数）〈%Dim i , j , X
i = 1
Do While i 〈= 1000
X = 0: j = 1
Do
If (i Mod j) = 0 Then ________
j = j + 1
Loop While j 〈= i / 2
If X = i Then response.write i &
i = i + 1
Loop%〉 下列程序的功能是（）
〈 %
Dim fso
Set fso=Server.CreateObject(Scripting.FileSystemObject)
Dim SF,DF
SF=C:\test1.txt
DF=D:\test1.txt
fso.MoveFile SF, DF
%〉 下列程序的功能是（）
〈 %
Dim fso
Set fso=Server.CreateObject(Scripting.FileSystemObject)
Dim SF,DF
SF=C:\test1.txt
IF fso.FileExists(SF)=True Then
fso.DeleteFile SF
End If
%〉 静态网页的扩展名一般是 在HTML中，插入换行符用什么标记？ 如果希望使用实心方块作为符号列表前面的符号，type属性的取值应该为 HTML中用什么标记表示表格的一行？ 在表格中哪个属性用于设置文本水平对齐方式？ 通过（）定义鼠标按下链接文字的颜色 下面的语句执行完毕后，变量a、b、c、d的值分别是（）。〈% a=1+1: b=1+1: c=1 & 1: d=1 & 1 %〉 下列字符串常量中，最大的是( ) 删除字符串前导和尾随空格的函数是() 若表单提交时采用GET方法，则下面哪种集合可以获取表单元素的值？ 请问下面语句执行完毕后，页面上显示内容是什么？ 〈 % Response.Write 〈 a href=’’〉新浪〈 /a〉 %〉 Response对象的什么方法可以将缓冲区中的页面内容立即输出到客户端？ 请问下面语句执行完毕后，变量c的值是？ 〈 % Dim a,c: a=b: Session(a)= 1: Session(a)= 2 : c=Session(b) %〉 请问下面程序段执行完毕，变量b的值是？ 〈 % Session(a)=1: Session.Abandon: Dim b: b=Session(a) %〉 Application对象的默认有效期为多少分钟？ 如果在创建表中建立字段简历，其数据类型应当是（）。 ．执行Select Max(intAge) As MaxAge,Min(intAge) As MinAge From tbAddress语句后，会返回多少条记录？ 如果希望打开的数据库是只读的，需要设置Connection对象的哪个属性？ 如果指针指向第1条记录，则rs.Bof和rs.Eof的值分别为 如果给某文件的Attributes属性赋值3，则该文件属性为 Folder对象的Files属性是（）。 在广告轮显组件中，假如在广告信息文件中设置Border为1，然后在页面中又设置了Border属性值为3，则显示在页面中的广告图片的边框宽度为 Topmargin属性设置的是内容与浏览器下部边框之间的距离。 在HTML中，〈pre〉的作用是预排版标记 如果要为网页指定黑色的背景颜色，应使用以下html语句〈body bgcolor=black〉 设置页面10秒自动刷新一次的语句是〈 meta http-equiv= Refresh, 10〉 用户访问网站的过程称为状态 数据库存取组是使用ADO技术来存取符合ODBC标准的数据库。 可以将非主键字段值传递到删除和更新页面中。 文件上传组件ASPUpload的Upload对象默认文件的大小为4G 使用文件上传组件ASPUpload上传表单元素对象txtName的方法是set frm=upload.QueryString(txtName) 在WindownXP操作系统中运行ASP程序，至少需要安装哪些软件的支持（） 〈P ALIGN=LEFT〉谢谢购买〈/P〉 实现的效果不正确的是（） 执行语句a=Int(10 * Rnd())后，则a的值不可能出现的有? 将任意一个正的两数N的个位数与十位数对换的表达式为( ) 产生10，37之间的随机整数的VBScript表达式不正确的是( ) 有关字段的数据类型不包括（）。 Access中表和数据库的关系是（） 要在tbAddress表中插入记录，下面哪条语句是正确的？ ASP连接数据库的方式有（）。 下面哪个数据库连接字符串是正确的？ 下面哪条SQL语句可以正确添加记录？（其中 theName=卢红 theAge=22 theIntro=） 请问下面语句执行完毕后，页面上显示内容是什么？〈 % Response.Write 〈 a href=’’〉新浪〈 /a〉 %〉 请问下面语句执行完毕后，变量c的值是？〈 % Dim a,c: a=b: Session(a)= 1: Session(a)= 2 : c=Session(b) %〉 请问下面程序段执行完毕，变量b的值是？〈 % Session(a)=1: Session.Abandon: Dim b: b=Session(a) %〉 下列程序的功能是（）〈 %
On Error Resume Next
Dim conn,strConn
Set conn=Server.CreateObject(ADODB.Connection)
strConn=Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & Server.MapPath(address.mdb)
conn.Open strConn
conn.BeginTrans
strSql=Delete From tbAddress Where strName=’张三’
conn.Execute(strSql)
If conn.Errors.Count=0 Then
conn.CommitTrans
Else
conn.RollbackTrans
End If%〉 阅读下列广告信息文件，回答问题REDIRECT ad.asp
‘第1行WIDTH 440
‘第2行HEIGHT 60
‘第3行BORDER 1
‘第4行*
‘第5行images
‘第6行
‘第10行
‘第14行
‘第15行百度
‘第16行10
‘第17行搜狐网站广告图片出现的概率是（） 下面程序的功能描述得最准确是（）〈 %
Dim count
Set count=Server.CreateObject(MSWC.PageCounter)
count.PageHit
Dim intVisit
intVisit=count.Hits()
Response.Write intVisit%〉 假设用户的Cooki〈 %
if Request.Cookies(user)(vNumber)〉=1 Then
‘如果不是第1次访问，就令访问次数在原有次数上加1
Dim vNumber ‘访问次数变量
Dim user_name
‘用户名变量
Dim sex
‘用户性别变量
vNumber=Request.Cookies(user)(vNumber)
user_name=Request.Cookies(user)(user_name)
sex=Request.Cookies(user)(sex)
If sex=男 Then
sex_list=先生
Else
sex_list=小姐
End If
Response.Cookies(user)(vNumber)=__（1）__ ‘将访问次数+1保存到Cookies中
Response.Cookies(user)(user_name)=__（2）__
Response.Cookies(user)(sex)=__（3）__
Response.Cookies(user).Expires= __（4）__
Response.Write Request.Cookies(user)(user_name) & __（5）__ & 您好，您是第 & (vNumber+1) & 次光临本站
End If
%〉第（1）题选择 假设用户的Cooki第（2）题选择 假设用户的Cooki第（3）题选择 假设用户的Cooki第（4）题选择 假设用户的Cooki第（5）选择 阅读如下程序，使用f〈 %session(s1)=张三session(s2)=李四dim s3(2) ‘定义一个数组s3(0)=array1s3(1)=array2s3(2)=array3session(s3)=__（1）__ ‘将该数组存放到session变量中。Dim ItemFor Each Item In __（2）__
If Not isArray(Session.Contents(Item)) Then
Response.Write 名字: & Item & ，值 & __（3）__ & 〈 p〉
Else
dim Array_temp ‘定义一个数组变量
Array_temp=Session.Contents(Item)
For i=0 to __（4）__
Response.Write 名字: & Item & ，值 & __（5）__ & 〈 p〉
Next
End ifNext%〉第（1）题选择 阅读如下程序，使用f第（2）题选择 阅读如下程序，使用f第（3）题选择 阅读如下程序，使用f第（4）题选择 阅读如下程序，使用f第（5）题选择 阅读下列程序，选择正〈 %
Dim conn,strConn
Set conn=Server.CreateObject(ADODB.Connection)
strConn=Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & Server.MapPath(db1.mdb)
conn.Open strConn
‘以下建立Command对象实例cmd
Dim cmd
Set cmd= Server.CreateObject(ADODB.Command)
___（1）__=conn ‘指定Connection对象
‘以下查询记录
Dim rs,strSql
strSql=Select * From student
cmd.CommandType=___（2）__ ‘表示查询指令为SQL语句
cmd.CommandText=strSql ‘指定查询指令
Set rs=___（3）__ ‘执行查询，返回一个Recordset对象
‘以下利用循环简单列出人员姓名和电话
Do While __（4）__
Response.Write rs(sid) & , & rs(sname) & , & rs(stel) & 〈 br〉
___（5）__
Loop
%〉第（1）题选择 阅读下列程序，选择正第（2）题选择 阅读下列程序，选择正第（3）题选择 阅读下列程序，选择正第（4）题选择 阅读下列程序，选择正第（5）题选择 已知D:\text张三，男，21，计算机应用技术李四，女，19，计算机网络技术王五，男，21，电子通讯技术……读取该文件中的每一个数据，用表格的形式输出。〈 table width=100% border=1〉 〈 tr align=center〉 〈 td width=25%〉姓名〈 /td〉〈 td width=25%〉性别〈 /td〉〈 td width=25%〉年龄〈 /td〉〈 td width=25%〉专业〈 /td〉 〈 /tr〉〈 %dim fso ‘声明一个FileSystemObject对象实例set fso=Server.CreateObject(Scripting.FileSystemObject) dim tsm ‘声明一个TextStream对象实例set tsm=fso.openTextFile(D:\test.txt,1,true) do while _________（1）____________
‘逐行读取，直到文件结尾 t=________（2）________ r=split(t,,) ‘分割数据 response.write 〈 tr〉 for each x in ___（3）______ response.write ___（4）_______ next response.write 〈 /tr〉___（5）___ ‘循环结束tsm.close ‘关闭TextStream对象%〉〈 /table〉第（1）题选择 已知D:\text第（2）题选择 已知D:\text第（3）题选择 已知D:\text第（4）题选择 已知D:\text第（5）题选择 国开电大广东电大 动态网页制作 网上在线形考作业国开电大历年参考题目如下： (责任编辑：admin) |