说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB如何得到应用程序的资料!

HTML文档下载 WORD文档下载 PDF文档下载
VB如何得到应用程序的资料!
使用 Microsoft 的开发工具,常常会碰到因版本不同而造成程序无法执行,甚至发生错误的情况!这个文章是想告诉大家,如何在 VB 中利用 GetFileVersionInfo API 来取得应用程序版本的版本。GetFileVersionInfo 主要是针对 32 位元的执行类型的版本,例如:.EXE 档、.OCX 档、.DLL 档。

为了过滤不适合的程序,我们使用 GetFileVersionInfoSize API 来判断程序是否为 32 位元的执行类型的程序,而由於使用 GetFileVersionInfo API 取得的资料无法直接读出,我们也使用 VerQueryValue API 来取出相关版本的资料。相关的 API 及 Type 声明如下:

Public Declare Function GetFileVersionInfo Lib "version.dll" Alias "GetFileVersionInfoA" _
(ByVal lptstrFilename As String, ByVal dwHandle As Long, ByVal dwLen As Long, _
lpData As Any) As Long
Public Declare Function GetFileVersionInfoSize Lib "version.dll" Alias "GetFileVersionInfoSizeA" _
(ByVal lptstrFilename As String, lpdwHandle As Long) As Long
Public Declare Function VerQueryValue Lib "version.dll" Alias "VerQueryValueA" _
(pBlock As Any, ByVal lpSubBlock As String, lplpBuffer As Long, puLen As Long) As Long

Type VS_FIXEDFILEINFO
dwSignature As Long
dwStrucVersion As Long
dwFileVersionMS As Long
dwFileVersionLS As Long
dwProductVersionMS As Long
dwProductVersionLS As Long
dwFileFlagsMask As Long
dwFileFlags As Long
dwFileOS As Long
dwFileType As Long
dwFileSubtype As Long
dwFileDateMS As Long
dwFileDateLS As Long
End Type
在今天的范例程序中,您只要输入包含路径的档案名称,便可以取得以下的程序资料:

1 程序版本资料。
2、程序类型资料。
3、着作权资料。
4、程序说明资料。

快速注册/注销动态链接库或控件-VB资料 理解面向对象编程 -VB资料 VB利用GetCursorPos 读取滑鼠的座标 利用Visual Basic 关闭Windows9X或者Windows NT VB利用代码启动/关闭中文输入法 模拟一次鼠标事件 -VB资料 目前执行的是哪一国语言的 Windows -VB资料 VB判断剪贴板的所有可用格式 VB判断驱动器类型 VB判断是否已经建立 Dial Up 连接 VB判断一个年份是否为闰年 VB判断一个驱动器的类型 屏蔽文本框默认的右键菜单——浅谈如何控制Windows消息 -VB资料 奇数和偶数校验-VB资料 启动控制面板命令大全 -VB资料 VB取得 DOS 环境变量 VB取得并设置双击间隔时间 VB取得磁盘序列号、卷标和文件系统类型 VB取得短文件名 VB取得和设置计算机名 VB取得和设置系统颜色 VB取得计算机名 VB取得目前所有的输入法 VB取得应用所在的目录 趣味撞球——VB应用程序一例 缺省值和可选参数 -VB资料 确定当前 WIN95 的启动状态-VB资料 让TextBox的输入具备overwrite(覆盖)的功能 -VB资料 让密码轻松显示 -VB资料 让文本框输入完后,直接跳入下一行 -VB资料 VB如何编制带有不定个数参数的过程。 ListCtrl控件设为ICON属性,请问是否有subitem属性? Win2000系统去访问WIN98系统的服务器 PING的通 但打开的时候报参数出错! vb调用vc编的activex oem怎么老是连不上阿? 简单的入门问题:如何让菜单变灰? how add icon to one popup menu ? 怎么判断一个form对象变量为空呢? 发送和接收数据包问题? ActiveX问题,微软专家请进.<------------- 急 *.idc不能运行了,请问这是为什么? dbcontrols(泰山__抛砖引玉) 怎样才能够把ado记录集写到EXECL并进行打印呢? 如何判断字符串中,有几个指定的字符? xml数据文件倒入数据库,有什么好方法。 检查数据的有效性,最好是在哪一个事件中检查?怎样写,可否给点例子。 如何在DELPHI中调用FLASH图片。谢谢!有帮助的给分! 一个有关串列的question!HELP.. 怎样让对话框总在最前? 今天一个女孩脸红的对我说声谢谢 为什么dll调试跟踪不进去 菜鸟提问:请解释一下.vbs好吗?里面可以放那些东西,怎么引用.......等等 Delphi 2 BCB的问题:BCB中的"::", ".","->"有什么区别? *.idc不能运行了,请问这是为什么?谢谢 简单的数据库问题 CFileDialog()函数的参数问题????? php ed3.0 为什么不好使 大散分,快来答,答者有分! access 表中的datetime型字段在delphi中如何使用? 有谁看过《Visual C#.NET开发实践》?? 怎样改变按钮标题的颜色? 请大家帮忙测试一下这段winsocket代码,为什么接受不到字符串 数据库问题 如何理解COM中的自动化?跟贴有分!!! 怎么样才能实现对音量的控制,最好能达到有下脚喇叭的功能 phpmyadmin之前的密码认真是怎么回事呀(配置问题) 谁能帮忙介绍工作? 请介绍几个现在还提供免费个人主页的地方 IIS运行起来后,不能访问http://localhost是什么原因? 谁能帮忙介绍工作? 关于控件数组 急需收发文系统的完整代码,谢谢! 我想用VB写一个com分页读出tif中的多幅图像,请高手指点! 请教sql查询 情介绍一个数据库编程的好书! 请教:JBuilder中要调用MapXtreme 的bean,怎么搞,定给分 为什么TOP不能限制数据集的数目???见者有分!!! 找高手解决问题!! sql 2000的一个存储过程,有些问题, 谁能帮忙介绍工作? golive6,如何解决中文问题???在源码中无法显示中文,如何解决??? 请看看这两条代码是否一样? 寻---陈建春之<visual C++高级编程技术---开发实例剖析> 某市新区有条长5千米,宽80米的步行街,市政府决定在街两边绿化,绿化带宽4米,这样整条街布置完,绿化带占地面积是多少平方米?(备注:千万不要问我任何问题,我概不回答,这道题我是半字不 寓言的启示有三个砌墙工人,有人问他们,第一个没好气的说:“没看见吗?我在砌墙.”转身问第2个,他说:“我在建个个漂亮的大楼”当他问第3个人的时候,那人开心地说:“我在建一坐美丽 未来的住宅作文400字 一座绿色城市,要在城区建一条长40千米,宽50米的绿化带,这条绿化带共有多少公顷? 植物绿化覆盖面积怎么计算绿化覆盖面积要在80%以上,要怎么计算.有CAD图.树的冠幅不知道. 以“那一幕,我难以忘怀”为题的作文的精彩开头和结尾怎么写? 在甲乙两城之间计划修一条40千米长的公路设计面宽为25米公路两边共留作15米为绿化带修路征占土地多少公顷在甲乙两城之间计划修一条40千米长的公路.设计面宽为25米,公路两边共留作15米 绿化面积怎么计算的 感人的一幕作文开头结尾是说一个人和动物的感人故事的开头和结尾不要发故事 只是开头结尾有意者来 小草和大树读后感题目一定要深层次的~!急~!越多越好~! 绿化投影面积如何计算 写鱼的作文500字 在古代的寓言和神话故事中,有哪些和《愚公移山》意义相同? 绿化面积怎样计算 关爱为主题的作文精彩开头和结尾如果可以帮我介绍一些事例 古代寓言.神话故事,还有哪些与《愚公移山》意义相同? 上下册 全部 的 教案. 放一百元,答对加上悬赏分随你说我加了15,快回答再加10 你能算出绿化带的面积是多少吗?合多少公顷? 中外寓言故事及其启示、你读过哪些中外寓言故事?这些故事给你怎样的启示? 一个圆形水池,周长是157米.这个水池占地多少平方米?0.19625吗? 在中国古代寓言,神话中,还有哪些与的意义相同的?(至少2个故事的题目) 目录是:1、智者无急躁2、学会发泄3、坚持到底就是胜利4、脆弱等于无能5、走出自卑阴影6、别让压力困住你7、心灵解剖8、汇报会上的我9、说到不如做到10、外表与心灵11、城市金不换12、 剁椒鱼头的剁椒怎么做看好了是 剁椒 我曾经在饭店时吃米饭的时候加了点剁椒很好吃 有一盆红的有一盆绿的 味道也不一样 一条城市绿化带长40千,宽5米这条绿化带一共有多少公顷? 作文:坚持不懈\坚强的我有什么好的开头吗? 剁椒鱼头的家常做法剁椒鱼头有没有简单家常的做法?为什么我做的有点腥? 简单的有哲理意义的寓言故事 写出故事的总结要寓言故事 房屋的路算建筑面积吗 谁会写关于剁椒鱼头的作文,要求600字! 提供几则有意义的寓言故事..不要大家都讲过的..那没意思 中外都可以.可以提供故事题目 ,全文,链接地址. 道路面积怎么算 剁椒鱼头的做法 邮票的作文500 寓言故事给我的启示 做剁椒鱼头的鱼头用什么鱼的鱼头 有关于写邮票的作文 这篇寓言的启示很久以前,蝴蝶非常难看,身体又粗又胖,两只灰乎乎的大翅膀在空中摆动着,动物王国的居民们都看不起她. 蝴蝶看见蜻蜓在空中翩翩起舞,友好地说:“蜻蜓姐姐,我和你一起 桌子的单价是椅子的4倍,3套桌椅360元,每张桌子的单价是多少元? 邮票作文 游向高原的鱼水从高原由西向东流着,渤海口的一条鱼逆流而行.它的游技很精湛,因此游得很精彩,一会儿冲过浅滩,一会儿划过激流,它穿过湖泊中的层层渔网,也躲过了无数水鸟的追逐,它逆行 桌子的单价是椅子的3倍,3套桌椅360元,每张桌子多少元? 有关邮票的作文 过年放鞭炮 400字 桌子的单价是椅子的3倍,3套桌椅360元,每张桌子多少元?用方程解 邮票的作文 邮票的作文 过年的作文 400字 鱼肉香菇饺子怎么做 谈谈《唐诗三百首》邮票和历史之间有什么关系?国家发行《唐诗三百首》邮票的主要原因是什么? 人为鱼肉 我为刀什么 小学四年级的心理健康课的教案怎么写啊~~~~ 急;读了这则寓言故事,你受到了什么启示?在森林的深处,有一只已经衰老的狮子,由于年老体弱,虽然它天天出去寻找猎物,可是连一只最弱的动物都逮不着.它想,我老了,跑不动了,但是还得活着! 春联初一假日乐园说几副你喜欢的春联及原因,还有几幅你不喜欢的春联和原因. 数学六年级下册北师大版圆柱的表面积第2课时的答案 给予启发的寓言故事有哪些?告诉我们什么也写出来 一道初一假期数学题有图如图所示,潜望镜中的镜子是平行的,光线经过镜子反射后,∠1=∠2,∠3=∠4,请你解释为什么进入的光线和最后离开的光线是平行的?越啰嗦越好!我办报用的!这个图是我 一个周长是280m的池塘边栽树,每隔4m栽一棵,沿池塘一周共栽多少棵?急 小苗与大树的对话读后感 一个寓言故事和他的启示 1.若b的绝对值=—b,ab的绝对值=—ab,则a-b+3的绝对值-b-a-2的绝对值等于().2.下列说法中,错误的是()A.零除以任何数,商是零.B.任何数与零的积仍为零.C.零的相反数还是零.D.两个相反数的和为
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘