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

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、程序说明资料。

开 发AS/400 应 用 系 统: PB5 与Delphi3 的 比 较 利 用Delphi 开 发 响 应 用 户 输 入 的 数 据 库 查 询Web Server 程 利用Delphi开发响应用户输入的数据库查询Web Server程序 利用Tbatch组件完成数据批处理-Delphi资料 如 何 恢 复Sybase SQL Anywhere 的 数 据 库-Delphi资料 如何捕捉KEY VIOLATION等错误-Delphi资料 如何得到SQL返回的计算结果-Delphi资料 如何动态的读取Delphi中的PopupMenu的Caption ? 如何动态设置DBGRID。比如,动态设置DBGRID的COLUMNS。及如何在数值数据格式成千分位 如何返回BDE的状态信息?-Delphi资料 如何控制关键字段的重复输入及报错-Delphi资料 如何设置Microsoft SQL Server 全文索引服务 ?-Delphi资料 如何设置多用户环境的PARADOX数据库-Delphi资料 如何实现在一个Dbgrid中显示多数据库-Delphi资料 如何用SQL查询日期型字段?-Delphi资料 如何在数据库中存放avi文件-Delphi资料 如何在注册表中注册BDE-Delphi资料 筛选数据-Delphi资料 实现不同数据库系统之间的数据转移-Delphi资料 使 用WISQL32 同 时 访 问SQL SERVER 和SYBASE 数 据 库Delphi资 使用Session构件可以在打开有密码的库时不用输入密码-Delphi资料 使用SQL实现字段数据的模糊查询-Delphi资料 数据表的索引被损坏了怎么办-Delphi资料 数据库的密码、日期显示-Delphi资料 数据库应用程序开发中图像数据的存取技术-Delphi资料 数据库中图像数据的存取技术-Delphi资料 数据库转换-Delphi资料 数据浏览部件的应用及编程-Delphi资料 数据文件路径的管理-Delphi资料 随意控制DBGrid每一行的颜色-Delphi资料 通过DELPHI实现JAVA调用ORACLE数据库数据 最简单的方法是?(问题简单,过来看看) 本人想考个SCJP认证,大家觉得如何???用处大吗??在找工作的过程中? 请教:对话框上的滚动条怎么使用?我设置了,然后将窗体大小缩小(于是对话框有一部分看不见了),可是单击滚动条,不起作用,怎么办?急, 问一个数据库公式的问题! 一个IP发布两个网站的问题(在线等待) 怎样改变资源文件里字体的颜色???菜单里的字体颜色我不会改?有专家指点吗? Python 网络教室采用多播好还是广播好? 下载的问题! 如何新建一个文件夹? 将html文件存放在备注字段中,然后再输出可以吗? 如何控制一个文本框的内容随另一个文本框的内容变化而同步变化? 一个关于窗口的小问题!!!小弟初学DELPHI请多多指教!! 求助 excel导入数据时出错.高手进 请问role是干嘛的? 自动生成图片 datawind如何与window联系起来啊 存储过程同时调用和数据库异地备份问题? 在xsl中如何调用javascript 误删系统盘,救命!!! 请问ACCP和高程考试相比哪个更有份量? 求LeapFTP V2.7.3.600的注册码 5月6日我来CSDN的二周年,散分,纪念。。。。 listbox (湖南)今年非典搞得这样,会耽误报高程吗?今年有人报了吗?怎样报的? ComboBoxEx在 SetImageList 时出错 在DBComboBox中脸上数据库后,为什么进行选择时会出现“违反了Primary 约束“ 关于传递多值的问题 如何从recordset得到数据库的行号 用<%@ include file="xxx.jsp"%>出现的怪问题!求教 有关server.mappath()的问题 J2EE基础问题两三问,追加200分。 问题很简单,但我很急,请帮忙各位。 可用的UDDI 急救!自动隐藏Panel 帮忙 哪里有数据库系统开发的文档下载 急待解决的问题 请问从socket发信息,连续发送几个小数据包出错的情况!! 紧急问题,在线等待! 救命——存取违例 请问在VB中使用DAO控件怎样打开ACCESS数据库? 请问装vc6的sp5主要有什么作用啊 双网卡的局域网,如何让 CSocket 使用指定的网卡与另一电脑通讯? SQL删除不了相同的记录 JBuilder7中的中文问题 谁知道计算机的本地时间与系统时间有什么区别? 请问如何实现垂直显示文字?` JDOM高手看过来! 请问怎么在vb中调用纯c接口的api并实现多线程 新书曝古巴前领导人卡斯特罗曾否认涉肯欧洲最高活火山喷发熔岩 在空中形成巨新书曝古巴前领导人卡斯特罗曾否认涉肯新快报头版就陈永洲收钱发失实报道致歉公务员报考热再起 专家:官本位与户籍嫦娥三号任务运载火箭从北京启程运往西雾霾应急预案受考验 专家:污染源不控道德说教者与偏执窃听狂俄罗斯举行大型集体哺乳快闪活动(组图俄罗斯举行大型集体哺乳快闪活动(组图二战中的情报暗战:丘吉尔为保密牺牲一德外交部长召见美大使 国内热议手机通凯特王妃被传再次怀孕 王室代表称并非纽约时报:东亚首富李嘉诚“脱亚入欧”法新社:中国转向南美化解原油“饥渴”最高层着手“顶层设计” 中国周边外交遭官员强奸女童家长:负担过重不得不民“国考”报名结束152万人过审 最热嫦娥三号任务运载火箭启程 预计11月解放军用实战对抗提升战力 预想剧本出经济观察:中国化解产能过剩并非简单“古人为何迷信数字“7”电竞逆袭足球居然顶层设计中心今日启程“红魔”七球献新帅为躲刑责自残仍被诉父亲买假证被判缓刑自助通关入境 只用8秒钟你们闹矛盾耽误我们锻炼彭帅进八强标题导航“绿色北京 低碳生活” 评出十大榜样新闻点点评Ermenegildo Zegna情系杏花村中拉关系迈上崭新高度韩寒踏足“平凡之路”今日热V标题导航阿航客机已确认坠毁马里双休日最高温35℃将成乙肝防控重点
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘