使用易語言COM物件取檔案版本

【知識分享】

原始碼改編自http://www.5a5x.com/06/201208/08316776.html

---

　　個人認為這種方法程式碼量少，只需幾行即可，表格也無需多填，但需要知道物件和方法名，而且如果未經處理，物件和方法名都將直接暴露，容易被別人修改。

 

程式碼如下：

 

.版本 2

.子程式 取檔案版本, 文字型, 公開, 本原始碼改編自易語言資源網(www.5A5X.com)
.引數 檔案地址, 文字型
.區域性變數 COM物件, 物件
.區域性變數 結果, 文字型

COM物件.建立 (“Scripting.FileSystemObject”, )
結果 ＝ COM物件.文字方法 (“GetFileVersion”, 檔案地址)
COM物件.清除 ()
返回 (結果)