个人中心
文章发布
退出
作者热门文章
- ubuntu12.04环境下使用kvm ioctl接口实现最简单的虚拟机
- Ubuntu 通过无线网络安装Ubuntu Server启动系统后连接无线网络的方法
- 在Ubuntu上搭建网桥的方法
- ubuntu 虚拟机上网方式及相关配置详解
30
4
CFSDN坚持开源创造价值，我们致力于搭建一个资源共享平台，让每一个IT人在这里找到属于你的精彩世界.
这篇CFSDN的博客文章VB获取文件大小的方法由作者收集整理，如果你对这篇文章有兴趣，记得点赞哟.
本文实例讲述了VB获取文件大小的方法。分享给大家供大家参考。具体实现方法如下:
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
<%
' Copyright (c) 2009, reusablecode.blogspot.com; some rights reserved.
'
' This work is licensed under the Creative Commons Attribution License. To view
' send a letter to Creative Commons, 559 Nathan Abbott Way, Stanford, California
' 94305, USA.
' Retrieve the file size of a given file.
function getFileSize(someFile)
dim fs
dim file
set fs = Server.CreateObject(
"Scripting.FileSystemObject"
)
set file = fs.GetFile(Server.MapPath(someFile))
getFileSize = FormatFileSize(file.size)
set file = nothing
set fs = nothing
end function
' Format a file size in the most practical units.
' Input: size in bytes
function FormatFileSize(size)
dim units
dim factor
units = Array(
"B"
,
"kB"
,
"MB"
,
"GB"
,
"TB"
,
"PB"
,
"EB"
,
"ZB"
,
"YB"
)
factor = log(size) \ 7
FormatFileSize = Round(size / (1024 ^ factor), 2) & units(factor)
end function
%>
|
希望本文所述对大家的VB程序设计有所帮助.
最后此篇关于VB获取文件大小的方法的文章就讲到这里了,如果你想了解更多关于VB获取文件大小的方法的内容请搜索CFSDN的文章或继续浏览相关文章，希望大家以后支持我的博客！ 。
30
4
0
我有几个问题。我是 Visual Basic 这个领域的新手，所以不要取笑我。 1.) VB.NET之间有什么区别和 VB ? 2.) 我需要为 Windows 开发基本的应用程序。(如记事本)我应该
就目前而言，这个问题不适合我们的问答形式。我们希望答案得到事实、引用资料或专业知识的支持，但这个问题可能会引发辩论、争论、投票或扩展讨论。如果您觉得这个问题可以改进并可能重新打开，visit the
我是框架 3.5 的新手。我注意到，在创建 Web 内容表单时，除了 aspx.vb 页面之外，它还会创建一个 aspx.designer.vb 页面。谁能向我解释一下它们之间的区别以及它们的用途吗？
我只是想知道 VB.NET 和 VB 2010 是否相同。 我只是想知道。 最佳答案 VB 2010 是 VB.Net 的最新版本。 Microsoft 在 VB 2005 版本中删除了 VB 的“.
我是框架 3.5 的新手。我注意到，在创建 Web 内容表单时，除了 aspx.vb 页面之外，它还会创建一个 aspx.designer.vb 页面。谁能向我解释一下它们之间的区别以及它们的用途吗？
我正在尝试将 VB 函数移植到 VB.NET，但我无法使该函数正常工作并正确更新。 rFormat = Format(Format(Value, fmt), String$(Len(fmt), "@"
如何在VB中注释多行代码/代码块？ 最佳答案 VB 在语言级别上没有这样的构造。它有使用撇号字符的单行注释: ' hello world ' this is a comment Rem this is
我正在使用我在 VB2005 中创建的表单在按下按钮时打开程序，然后在文本字段中显示进程 ID(再次按下按钮时)。当我运行它时，表单将打开程序 (Notepad.exe) 但当我单击按钮查看进程 ID
我正在尝试添加一个从 vb.net 创建的 dll，并且想将其导入到现有的 vb 6 项目中，但它给了我错误“无法添加对指定文件的引用”。 。有人知道如何解决这个问题吗？ 最佳答案 需要遵循以下步骤:
我有一个数据 GridView 。右键单击它会显示一个上下文菜单，但它始终位于右上角。我想要它，以便菜单出现在用户右键单击的单元格上。它可能是单元格 1 或单元格 2 或其他。 谢谢福尔坎 最佳答案
我只是在 Visual Studio 2010 中使用 Visual Basic。有人知道我将如何制作“浏览文件夹(或文件)”按钮吗？我对 VB 真的很陌生，我只是在寻找一些简单的帮助:) 最佳答案
这次感到困惑... 最简单的代码行有时可能起作用，有时却没有。首先，我认为问题在于我试图读取DWORD的值，但是由于我可以从某些键读取DWORD值，所以这一定不是问题。现在的问题似乎是，如果 key
我的代码中有此方法: Private Sub Display() Received.AppendText(" - " & RXArray) End Sub 这两个调用之间有什么区别:
我正在创建一个宏程序来记录和回放鼠标和键盘输入。录制效果很好，鼠标播放也一样，但是我在播放键盘输入时遇到了麻烦——特别是在释放之前按住一个键几秒钟。这不等同于重复按键。这是我尝试过的: 技巧 1:Me
我最近刚刚了解了 VB.NET 中静态局部变量的使用，并想知道它在延迟加载属性中的潜在用途。 考虑以下示例代码。 Public Class Foo Implements IFoo End Clas
VB 有一个 C# 没有的特性，在项目级别导入命名空间(我的项目>引用>导入命名空间)。当新人在源代码控制之外检查项目时，我们的自定义导入不包括在内。这个 VB 特定的导入命名空间存储在哪里？ 最佳答
我已将我的问题缩小到这个简单的案例，但似乎无法找到发生了什么: 我有两个表单，一个只有一个按钮，另一个是空的。 单击按钮时，form1 隐藏和显示 form2 出现时，form2隐藏，form1再次显
为什么下面的简单代码会失败？无论我使用 LinearGradientMode 的哪个值，这段代码总是用从左到右的渐变填充路径。 graphPath 是在别处创建的 GraphicPath 对象(基本上
我可以多快替换字符串中的字符？ 所以这个问题的背景是这样的:我们有几个应用程序通过套接字相互通信并与客户端的应用程序通信。这些套接字消息包含不可打印的字符(例如 chr(0))，需要用预定的字符串(例
如何从任何文件中读取原始字节数组... Dim bytes() as Byte ..然后将该字节数组写回新文件？ 我需要它作为一个字节数组来做一些处理。 我目前正在使用: 阅读 Dim fInfo
我是一名优秀的程序员,十分优秀！