首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内。 [说明] 某公司的服务器上为每位员工提供了一定大小的存储空间,用于数据的备份。下面的程序面向公司员工,提供了本地计算机与服务器端之间文件传输的功能。主要操作介绍如下
阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内。 [说明] 某公司的服务器上为每位员工提供了一定大小的存储空间,用于数据的备份。下面的程序面向公司员工,提供了本地计算机与服务器端之间文件传输的功能。主要操作介绍如下
admin
2009-02-15
22
问题
阅读以下说明及Visual Basic程序代码,将应填入(n)处的字句写在对应栏内。
[说明]
某公司的服务器上为每位员工提供了一定大小的存储空间,用于数据的备份。下面的程序面向公司员工,提供了本地计算机与服务器端之间文件传输的功能。主要操作介绍如下:
(1)连接服务器:员工需要输入用户名和口令才能连接到服务器端,checkUser函数用于检查用户名和口令是否合法,返回真假值。
(2)上传文件:从本地计算机上传文件到服务器。员工可以在本地文件列表中选择一个或多个文件,这些文件通过上传操作被复制到服务器端指定的某个文件夹中;
(3)下载文件:从服务器端下载文件到本地。
在开发过程中,本地驱动器列表框名为Drive1,本地和服务器端目录列表框分别名为Dir1和 Dir2,本地和服务器端文件列表框分别名为File1和File2,界面上有上至下四个按钮分别名为Command1至Command4。
[Visual Basic代码]
Private Sub Drive1_Change()
(1) ’更新目录列表框的路径
End Sub
Private Sub Dir1_Change()
File1.Path=Dir1.Path ’更新文件列表框file1的路径
End Sub
Private Sub Dir2_Change()
File2.Path=Dir2.Path ’更新文件列表框file2的路径
End Sub
’连接服务器
Private Sub Command1_Click()
Dim user,password As String
user=(2) (“请输入用户名:”)
password=(2) (“请输入口令:”)
If check User(user,password)Then ’若用户名和口令正确
Dir2.Path=…… ’打开服务器上某一指定目录
Else: MsgBox“口令错误,请重试!”
End If
End Sub
’上传文件
Private Sub Command2_Click()
Dim fso As new FileSystemObject,f As File,i As Integer
If File1.FileName=""Then ’判断是否已经选中文件
MsgBox“请选择本地的文件!”
Exit Sub
End If
’创建文件系统对象
Set fso=CreateObject(“Scripting.FileSystemObject”)
’上传文件
For i=0 To (3) ’遍历文件列表框File1中的全体文件
If (4) Then’若该文件被选中
Set f=fso. (5) (Dir1.Path & “\” & File1.List(i))
f.Copy Dir2.Path & “\” & File1.List(i),True ’复制文件至服务器端
End If
Next
File2.Refresh
End Sub
’下载文件
Private Sub Command3_Click()
……
End Sub
’退出程序
Private Sub Command4_Click()
End
End Sub
选项
答案
(1) Dir1.Path=Drive1.Drive (2) InpatBox (3) File1.ListCount-1 (4) File1.Selected(i) (5) GetFile
解析
(1)驱动器列表框的Drive属性表示当前选择的驱动器;目录列表框的Path属性表示当前目录的路径;文件列表框的path属性则表示列表中文件所在的目录的路径;
(2)此处需要提供输入框以供用户输入用户名和密码;
(3)Flie1.ListCount表示File1中文件的总数目,因文件编号自0起,所以还应减去1;
(4)若文件列表框中某项被选中,则其Selected(index)属性将为True,此循环中,index就足循环变量i;
(5)FSO对象的GetFile方法返回一个和指定路径中文件相对应的File对象。
转载请注明原文地址:https://kaotiyun.com/show/GbjZ777K
本试题收录于:
程序员下午应用技术考试题库软考初级分类
0
程序员下午应用技术考试
软考初级
相关试题推荐
结构化程序中的基本结构不包括(28)。
《信息处理系统一开放系统互连一基本参考模型》(ISO7498-2:1989)属于(63)________________。
数据加工处理的目的不包括________________。
下列关于Windows7屏幕保护程序的叙述中,不正确的是__________。
上级要求信息处理技术员做a、b、c、d、e五件工作。先做什么,后做什么,如何安排呢?根据工作性质以及紧急程度,他列出了如下几条规则:a应在b前 c应在a前 d应在a前 a应在e前d应在b前 b应在e前 c应在d前 c应在
在Excel2007中,在单元格A1中输入函数“=POWER(2,3)/MAX(1,2,4)”,按回车键后,则A1单元格中的值为__________。
在统计学中,用来衡量一个样本中各个数据波动大小的量是______。
四位二进制数(从0000到1111)中,不含连续三位相同数字的数共有(4)个。
阅读以下说明,回答问题1至问题5,将解答填入答题纸对应的解答栏内。说明在一台计算机上安装完成Windows2000服务器及相应的服务组件。
请根据图2-13网页的显示效果,解释该ASP程序中用下画线标出的语句的含义,即填写(1)、(3)、(4)、(6)、(10)空缺处的解释内容。以下网页设计方式中,可以使用户快捷有效的获取其所需信息的有(13)。(不定项选择)A.限制网页中同时
随机试题
程序正当是行政法的基本原则。下列选项中是程序正当要求的体现的是()。
男性,34岁,农民。频繁腹泻及呕吐1天来诊。约20余次,水样便,伴腓肠肌抽痛;无明显腹痛。体检:神志清,明显脱水征,BP8/5.3kPa(60/40mmHg),血浆比重1.035,红细胞压积0.60(60%),WBC18×109/L,大便光镜检WB
有关药品的作用和合理应用,不正确的是
低温冷藏食品主要卫生问题是()
【背景资料】某泵站加固改造工程施工内容包括:引渠块石护坡拆除重建、泵室混凝土加固、设备更换、管理设施改造等。招标文件按照《水利水电工程标准施工招标文件》编制。某公司参加了投标。为编制投标文件,公司做了以下准备工作。工作一:搜集整理投标报价所需的主要材料
中国沈阳国际贸易集团公司与中国台湾越秀公司以FOB高雄USD50元/台的价格签订了进10000台简易型节气门传感器(属自动进口许可管理、法定商检商品)的合同。该批货物于2007年5月10日由“青莲号”货轮载运进境。该公司于当日向海关申报货物进口,海关验
古代马国是一个奴隶制国家,有国王、有将军、有军队,使用奴隶劳动,并用奴隶作祭祀祖的供品。()灭马国后,采取了一系列封建化的改革措施,使其沿封建制的方向前进。
居住在宁国市的畲族,有不同于汉族的婚嫁习俗。畲族婚俗方式有()。
Inthefollowingconversation,BviolatestheMaximof________.A:Mrs.Xisanoldbag.B:Theweatherhasbeenquitedelightfu
Muchunfriendlyfeelingtowardscomputershasbeenbasedonthefearofwidespreadunemploymentresultingfromtheirintroductio
最新回复
(
0
)