以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何获得照片文件属性的宽度与高度?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=4357)

--  作者:程兴刚
--  发布时间:2009/9/17 9:52:00
--  如何获得照片文件属性的宽度与高度?
       是否已经开放了获得文件属性的相关方法,如何获得文件属性详细信息,如文件大小(直接)、修改日期(最后保存)、文件备注还有照片等图片的宽、高像素的属性?

       请大家帮助,谢谢!
--  作者:狐狸爸爸
--  发布时间:2009/9/17 10:12:00
--  
Dim f As Io.FileInfo =   FileSys.GetFileInfo("C:\\123.mdb")
Output.show("创建时间:" & f.CreationTime)
Output.show("最近一次修改时间:" & f.LastWriteTime )



FileInfo全部成员


 Attributes   获取或设置当前 FileSystemInfo 的 FileAttributes。(从 FileSystemInfo 继承。)
   CreationTime   获取或设置当前 FileSystemInfo 对象的创建时间。(从 FileSystemInfo 继承。)
  CreationTimeUtc   获取或设置当前 FileSystemInfo 对象的创建时间,其格式为协调通用时间 (UTC)。(从 FileSystemInfo 继承。)
   Directory  获取父目录的实例。
   DirectoryName  获取表示目录的完整路径的字符串。
   Exists  已重写。获取指示文件是否存在的值。
   Extension   获取表示文件扩展名部分的字符串。(从 FileSystemInfo 继承。)
   FullName   获取目录或文件的完整目录。(从 FileSystemInfo 继承。)
  IsReadOnly  获取或设置确定当前文件是否为只读的值。
   LastAccessTime   获取或设置上次访问当前文件或目录的时间。(从 FileSystemInfo 继承。)
  LastAccessTimeUtc   获取或设置上次访问当前文件或目录的时间,其格式为协调通用时间 (UTC)。(从 FileSystemInfo 继承。)
   LastWriteTime   获取或设置上次写入当前文件或目录的时间。(从 FileSystemInfo 继承。)
  LastWriteTimeUtc   获取或设置上次写入当前文件或目录的时间,其格式为协调通用时间 (UTC)。(从 FileSystemInfo 继承。)
   Length  获取当前文件的大小。
   Name  已重写。获取文件名。

--  作者:kylin
--  发布时间:2009/9/17 10:48:00
--  
收藏,呵呵
--  作者:程兴刚
--  发布时间:2009/9/17 13:28:00
--  
哈哈,给逼出来了,我的书上有这个,就是找不到获得照片宽度、高度的方法,谢谢贺老师!

  Length  获取当前文件的大小。 得到的是字节吧?我是想要原图的宽度、高度。

比如图像大小为1440×720像素,如何获得它?
[此贴子已经被作者于2009-9-17 13:34:53编辑过]

--  作者:狐狸爸爸
--  发布时间:2009/9/17 14:39:00
--  
with GetImage("c:\\b.jpg")
    Output.show("宽度:" &.Width & " 高度:" & .height)
End with

--  作者:程兴刚
--  发布时间:2009/9/17 16:29:00
--  
谢谢,就是他!
--  作者:yangming
--  发布时间:2009/9/17 17:27:00
--  
以下是引用狐狸爸爸在2009-9-17 14:39:00的发言:
with GetImage("c:\\b.jpg")
    Output.show("宽度:" &.Width & " 高度:" & .height)
End with

收藏!

[此贴子已经被作者于2009-9-17 17:27:03编辑过]

--  作者:smileboy
--  发布时间:2009/9/18 9:06:00
--  
收藏备用
--  作者:L88919138
--  发布时间:2016/9/29 19:26:00
--  

正需要这个