当前位置： 移动技术网 > IT编程>脚本编程>VBScript > vbs下用Shell.Application获取图片分辨率

vbs下用Shell.Application获取图片分辨率

2017年12月08日  | 移动技术网IT编程  | 我要评论

公民凯恩qvod,新婚姻法婚后财产,赖布衣传奇片尾曲

简单google了一下，未果，于是发邮件请教了一下，很快就有了回复。
复制代码 代码如下:

path = "c:\test.jpg"
arr = split(path,"\")
filename = arr(ubound(arr))
folderpath = left(path, len(path) - len(filename) - 1)
set objshell = createobject("shell.application")
set objfolder = objshell.namespace(folderpath)
set objfolderitem = objfolder.parsename(filename)
width = objfolder.getdetailsof(objfolderitem, 162)
height = objfolder.getdetailsof(objfolderitem, 164)
msgbox "width: " & width & " height: " & height

原文：http://demon.tw/programming/shell-application-picture-resolution.html

您可能感兴趣的文章:

如对本文有疑问，请在下面进行留言讨论，广大热心网友会与你互动！！ 点击进行留言回复

相关文章:

验证码：
最近更新的文章
大家感兴趣的文章
移动技术网