Question

易语言取文件大小的源码

易语言取文件大小的源码，不要用取文件尺寸

• 你的回答被采纳后将获得：
• 系统奖励15（财富值+成长值）+难题奖励30（财富值+成长值）

Answer 1

.版本 2

.子程序 文件_取尺寸, 小数型, 公开, 取一个文件的大小,单位为KB;失败返回0
.参数 文件名, 文本型
.局部变量 SFO, 对象
.局部变量 file, 对象
.局部变量 size, 变体型

.如果真 (SFO.创建 (“scripting.FileSystemObject”, ))
file ＝ SFO.对象型方法 (“GetFile”, 文件名)
size ＝ file.读属性 (“Size”, )
返回 (四舍五入 (size.取数值 () ÷ 1000, 2))
.如果真结束
返回 (-1)