2023年11月23日发(作者：)

职业技能题库&在线云笔试平台

试卷名称：使用第三方组件

试卷描述：

IT笔试题目、招聘笔试、微信考试、在线考试

试卷链接：/store/open/paperInfo/41743

试卷限时：50分

一. 不定项选择题

每题分值：2.5分

是否题目乱序：是

是否选项乱序：是

是否可回溯：是

难度：中

1. [不定项]下面哪条语句可以用于限制上传文件的大小为2M，并且超出大小时报错？

A. Size 2*1024*1024,True

B. Size 2*1024*1024,False

C. Size 2*1024*1024

D. Size=2*1024*1024

答案：A

2. [不定项]对于文件上传组件，下面哪条语句可以输出上传文件的大小。

A. ("fleUpload").Size

B. ("fleUpload ").Size

C. ("fleUpload ").Size

D. ("fleUpload ").Size

职业技能题库&在线云笔试平台

答案：A

3. [不定项]对于文件上传组件，下面哪条语句可以输出上传表单元素的值。

A. ("txtIntro").Value

B. ("txtIntro")

C. ("txtIntro").Value

D. ("txtIntro")

答案：AB

4. [不定项]在中，下面哪些语句可以用来输出上传文件的大小？

A. ("fleUpload").Size

B.

C. (1).Size

D. le

答案：ABC

5. [不定项]Upload对象的哪个属性用于设置是否允许覆盖文件？

A. IgnoreNoPost

ite

C. SetMaxSize

iteFiles

答案：D

6. [不定项]对于发送邮件组件，如果信箱是jjshang99@，密码是123456，发信服务器

是，发信时需要验证。请问应该用下面哪一句？

第2页

职业技能题库&在线云笔试平台

A. ""

B. "jjshang99@"

C. "jjshang99:123456@"

D. "jjshang99:123456@"

答案：D

7. [不定项]如果要发送支持HTML格式的邮件，需要用下面哪个属性设置邮件内容？

A. Body

dy

C. Subject

bject

答案：B

8. [不定项]如果希望确保发送的邮件中不会出现乱码，可以设置哪个属性？

A. Subject

C. Charset

tType

答案：C

二. 简答题

每题分值：5分

是否题目乱序：是

是否选项乱序：是

是否可回溯：是

第3页

职业技能题库&在线云笔试平台

难度：中

9. [简答]小王在测试11.1.3节的示例时，无论如何都不能正确执行，请分析可能原因？

参考答案：可能是上传文件夹upfiles的权限问题，首先去掉它的只读属性。对于Windows 2000

或Windows XP系统，如果安装时采用了NTFS文件系统，一般可以设置它为EveryOne（任何人）

可以完全控制。

10. [简答]在11.1节的例子中，可以用获取表单元素值吗？

参考答案：不可以，因为该表单是以二进制方式提交的，必须用ASPUpload组件提供的方法来

获取元素。

11. [简答]在文件上传时，可能上传时间会比较长而不能成功。想想应该怎么办？（提示：Server

对象的ScriptTimeOut属性）

参考答案：可以修改Server对象的ScriptTimeout属性。

12. [简答]请比较第9章学习的文件存取组件和本章学习的文件上传组件的区别。

参考答案：文件存取组件是对服务器端的文件和文件夹操作的。文件上传组件用来将客户端的

文件上传到服务器端。

13. [简答]在发送邮件时，附件到底是位于客户端还是服务器端？

参考答案：先将附件上传到服务器端，然后才当作附件发送的。

14. [简答]从网上下载一个组件文件后，应该如何注册该组件？

参考答案：要用Regsvr32命令在命令行注册该组件（如：Regsvr32 C:）。

三. 编程题

每题分值：10分

第4页

职业技能题库&在线云笔试平台

是否题目乱序：是

是否选项乱序：是

是否可回溯：是

难度：中

15. [编程]请参考11.1.3节示例改写11.1.4节示例，将其修改为逐个获取上传文件和说明。

参考答案：请参见asptemptjchapter11Rewrite_11-4，并打开浏览器，在其中输入

localhost/asptemptj/chapter11/ Rewrite_11-4 /即可访问。

16. [编程]请修改11.1.3节示例，将上传文件用当时的日期和时间的组合命名保存。例如

。（提示：一要利用日期函数和字符串函数生成文件名称；二要先将

上传文件保存到内存中，然后以该名称另存）

参考答案：请参见asptemptjchapter11upload，并打开浏览器，在其中输入

localhost/asptemptj/chapter11/upload /upload_即可访问。

17. [编程]请在自己的个人主页中添加自动发信功能，当有人给你留言时，可以将留言内容发

送到你的信箱，并给留言人发一封感谢信。

参考答案：请参见asptemptjchapter11sendMail，并打开浏览器，在其中输入

localhost/asptemptj/chapter11/sendMail/即可访问。

18. [编程]请结合W3Jmail组件和数据库知识开发一个可以自动群发E-mail的页面。

参考答案：请参见asptemptjchapter11jmail，并打开浏览器，在其中输入

localhost/asptemptj/chapter11/mail/即可访问, 清单如下：

清单jmail 利用jmail自动群发

<% Option Explicit %>

第5页

职业技能题库&在线云笔试平台

</span><span style='font-size:15.84px;color:#000000;letter-spacing:-0.116px;font-family:宋体;'>自动发送</span><span style='font-size:15.84px;color:#000000;letter-spacing:-0.047px;font-family:Calibri;'>Email

<%

Dim Jmail

Set Jmail = Object("e")

'这一段添加收件人

'连接数据库，建立Connection对象

Dim db, strConn

strConn="Dbq=" &h("") &";Driver={Microsoft Access Driver

(*.mdb)}"

Set db=Object("tion")

rConn

'以下建立Recordset对象实例rs

Dim strSql,rs

strSql="Select email From users"

Set rs=e(strSql)

Do While Not

ipientrs("email") '利用循环添加每一个收件人

第6页

职业技能题库&在线云笔试平台

xt

Loop

Set db=Nothing

="jjshang99@"

t ="节日快乐"

="您好，祝节日快乐，万事如意！,送您一首歌"

h("") '附件

("jjshang99:123456@") '执行发送

'关闭对象

Set Jmail=Nothing

"已经成功发送"

%>

19. [编程]请在个人主页中添加个人影集页面，可以在线添加照片。

参考答案：请参见asptemptjchapter11myphoto，并打开浏览器，在其中输入

localhost/asptemptj/chapter11/ myphoto/即可访问。

20. [编程]请为11.3节的发布信息综合示例添加删除功能。（提示：删除记录时要利用上一章讲

的文件存取组件同时删除掉upfiles文件夹下的文件）

参考答案：请参见asptemptjchapter11news，并打开浏览器，在其中输入

第7页

职业技能题库&在线云笔试平台

localhost/asptemptj/chapter11/ news/即可访问。

21. [编程]（选做题）上一章习题中开发过网上文件管理器，请为其添加上传文件的功能。

参考答案：请参见asptemptjchapter11fileupload，并打开浏览器，在其中输入

localhost/asptemptj/chapter11/ fileupload /即可访问。

22. [编程]（选做题）请设法将11.1.3节的两个文件合并成一个文件。（提示：需要使用

IgnoreNoPost属性，请参考组件的使用说明）

参考答案：请参见，并打开浏览器，在其中输入

localhost/asptemptj/chapter11/ 即可访问，清单如下：

清单Rewrite11.1.3 上传表单与提交文件合二为一

</span><span style='font-size:15.84px;color:#000000;letter-spacing:-0.087px;font-family:宋体;'>表单与处理程序在同一个页面示例</span><span style='font-size:15.84px;color:#000000;letter-spacing:-0.061px;font-family:Calibri;'>

表单与处理程序在同一个页面

选择文件:

文件说明:

作者姓名:

第8页

职业技能题库&在线云笔试平台

<%

'创建一个文件上传组件实例

Dim Upload

Set Upload = Object("")

'设置如果没有上传文件就不要保存

NoPost = True

'将上传文件保存到upload文件夹下，并且返回一个参数Count，表示上传了几个

文件（当然本示例只是上传一个文件）

Dim Count

Count=(h("upload"))

'如果Count>0，表示上传了文件，所以写出上传文件的信息

If Count > 0 Then

'获取表单元素信息（文件说明）

Dim intro

intro=("txtIntro").value

'输出文件的各种信息

"上传文件为：" &("fleUpload").Path& "
"

"文件名称为：" &("fleUpload").filename& "
"

第9页

职业技能题库&在线云笔试平台

"文件大小为：" &("fleUpload").Size & "字节
"

"文件说明为：" & intro & "
"

"点击此处可以href='upload/"

&("fleUpload").filename & "' target='_blank'>浏览文件"

End If

%>

23. [编程]（选做题）网上还有一个比较流行的免费的文件上传组件，有兴趣者可

以自己下载研究使用。

参考答案：请参见asptemptjchapter11Lyfupload,并打开浏览器，在其中输入

localhost/asptemptj/chapter11/Lyfupload/即可访问。

第10页