.版本 2
.支持庫 shell
.支持庫 spec
.子程序 _按鈕1_被單擊
.局部變量 數據, 字節集
.局部變量 list長度, 整數型
.局部變量 文件信息位置, 整數型
.局部變量 文件位置偏移, 整數型
.局部變量 目標路徑, 文本型
通用對話框1.文件名 ＝ “”
通用對話框1.過濾器 ＝ “*.lnk|*.lnk”
通用對話框1.初始目錄 ＝ 取特定目錄 (#系統桌面)
通用對話框1.打開 ()
.如果真 (通用對話框1.文件名 ＝ “”)
返回 ()
.如果真結束
調試輸出 (通用對話框1.文件名)
標簽2.標題 ＝ 通用對話框1.文件名
數據 ＝ 讀入文件 (通用對話框1.文件名)
.如果真 (數據 ＝ { })
調試輸出 (“讀入文件數據失敗”)
返回 ()
.如果真結束
list長度 ＝ 取字節集數據 (數據, #短整數型, 77)
調試輸出 (list長度)
文件信息位置 ＝ list長度 ＋ 78
調試輸出 (文件信息位置)
文件位置偏移 ＝ 取字節集數據 (數據, #整數型, 文件信息位置 ＋ 17)
調試輸出 (文件位置偏移)
目標路徑 ＝ 取字節集數據 (數據, #文本型, 文件信息位置 ＋ 文件位置偏移 ＋ 1)
調試輸出 (目標路徑)
標簽1.標題 ＝ 目標路徑
（轉 壹騎當後 技術顧問 華力科技有限公司技術支持）