.版本 2.常量 常量_臨時目錄, "<文本長度: 28>", , c:/users/public/tmp_wifipath

.版本 2.支持庫 iext.支持庫 eAPI.程序集 窗口程序集_啟動窗口.子程序 遍歷文件.如果 (文件是否存在 (#常量_臨時目錄))  文件_枚舉1 (#常量_臨時目錄, “*.xml”, &S_遍歷WIFI文件).否則  信息框 (“不支持的操作系統 或 權限不足”, 16, “Error”).如果結束.子程序 S_遍歷WIFI文件.參數 目錄, 文本型.參數 文件名, 文本型.局部變量 L_FileName, 文本型.局部變量 L_TMP, 文本型.局部變量 L_Name, 文本型.局部變量 L_HEX, 文本型.局部變量 L_ConnectionType, 文本型.局部變量 L_ConnectionMode, 文本型.局部變量 L_Authentication, 文本型.局部變量 L_Encryption, 文本型.局部變量 L_UseOneX, 文本型.局部變量 L_KeyType, 文本型.局部變量 L_Protected, 文本型.局部變量 L_KeyMaterial, 文本型.局部變量 L_EnableRandomization, 文本型.局部變量 L_索引, 整數型L_FileName ＝ 目錄 ＋ 文件名L_TMP ＝ 到文本 (讀入文件 (L_FileName))L_Name ＝ 文本_取出中間文本 (L_TMP, “<name>”, “</name>”)L_HEX ＝ 文本_取出中間文本 (L_TMP, “<hex>”, “</hex>”)L_ConnectionType ＝ 文本_取出中間文本 (L_TMP, “<connectionType>”, “</connectionType>”)L_ConnectionMode ＝ 文本_取出中間文本 (L_TMP, “<connectionMode>”, “</connectionMode>”)L_Authentication ＝ 文本_取出中間文本 (L_TMP, “<authentication>”, “</authentication>”)L_Encryption ＝ 文本_取出中間文本 (L_TMP, “<encryption>”, “</encryption>”)L_UseOneX ＝ 文本_取出中間文本 (L_TMP, “<useOneX>”, “</useOneX>”)L_KeyType ＝ 文本_取出中間文本 (L_TMP, “<keyType>”, “</keyType>”)L_Protected ＝ 文本_取出中間文本 (L_TMP, “<protected>”, “</protected>”)L_KeyMaterial ＝ 文本_取出中間文本 (L_TMP, “<keyMaterial>”, “</keyMaterial>”)L_EnableRandomization ＝ 文本_取出中間文本 (L_TMP, “<enableRandomization>”, “</enableRandomization>”).如果真 (L_Name ≠ “”)  L_索引 ＝ 超級列表框1.插入表項 (, , , , , )  超級列表框1.置標題 (L_索引, 0, 到文本 (L_索引))  超級列表框1.置標題 (L_索引, 1, L_HEX)  超級列表框1.置標題 (L_索引, 2, L_Name)  超級列表框1.置標題 (L_索引, 3, L_ConnectionType)  超級列表框1.置標題 (L_索引, 4, L_ConnectionMode)  超級列表框1.置標題 (L_索引, 5, L_Authentication)  超級列表框1.置標題 (L_索引, 6, L_Encryption)  超級列表框1.置標題 (L_索引, 7, L_UseOneX)  超級列表框1.置標題 (L_索引, 8, L_KeyType)  超級列表框1.置標題 (L_索引, 9, L_Protected)  超級列表框1.置標題 (L_索引, 10, L_KeyMaterial)  超級列表框1.置標題 (L_索引, 11, L_EnableRandomization).如果真結束.子程序 _復制Hex_被選擇.局部變量 L_TMP, 文本型.如果真 (超級列表框1.現行選中項 ≠ -1)  L_TMP ＝ 超級列表框1.取標題 (超級列表框1.現行選中項, 1)  狀態條1.置文本 (0, “HEX：” ＋ L_TMP)  .如果 (置剪輯板文本 (L_TMP))    狀態條1.置文本 (1, “√已復制”)  .否則    狀態條1.置文本 (1, “×未復制”)  .如果結束.如果真結束.子程序 _復制Name_被選擇.局部變量 L_TMP, 文本型.如果真 (超級列表框1.現行選中項 ≠ -1)  L_TMP ＝ 超級列表框1.取標題 (超級列表框1.現行選中項, 2)  狀態條1.置文本 (0, “Name：” ＋ L_TMP)  .如果 (置剪輯板文本 (L_TMP))    狀態條1.置文本 (1, “√已復制”)  .否則    狀態條1.置文本 (1, “×未復制”)  .如果結束.如果真結束.子程序 _復制KeyMaterial_被選擇.局部變量 L_TMP, 文本型.如果真 (超級列表框1.現行選中項 ≠ -1)  L_TMP ＝ 超級列表框1.取標題 (超級列表框1.現行選中項, 10)  狀態條1.置文本 (0, “KeyMaterial：” ＋ L_TMP)  .如果 (置剪輯板文本 (L_TMP))    狀態條1.置文本 (1, “√已復制”)  .否則    狀態條1.置文本 (1, “×未復制”)  .如果結束.如果真結束.子程序 _超級列表框1_右鍵單擊表項彈出菜單 (右鍵菜單, , ).子程序 _獲取WIFI信息_被選擇.如果 (文件是否存在 (#常量_臨時目錄))  刪除目錄 (#常量_臨時目錄)  創建目錄 (#常量_臨時目錄).否則  創建目錄 (#常量_臨時目錄).如果結束.如果 (運行 (“netsh wlan export profile key=clear folder=c:/users/public/tmp_wifipath/”, 真, 1))  超級列表框1.全部刪除 ()  狀態條1.置文本 (0, “正在讀取...”)  遍歷文件 ()  狀態條1.置文本 (0, “讀取完畢。”).否則  信息框 (“不支持的操作系統 或 權限不足”, 16, “Error”).如果結束.子程序 _清空列表_被選擇超級列表框1.全部刪除 ().子程序 _查看配置文件_被選擇打開指定網址 (“C:/Users/Public/tmp_wifipath/WLAN-” ＋ 超級列表框1.取標題 (超級列表框1.現行選中項, 2) ＋ “.xml”).子程序 _超級列表框1_被雙擊, 邏輯型.參數 橫向位置, 整數型.參數 縱向位置, 整數型.參數 功能鍵狀態, 整數型.如果真 (超級列表框1.現行選中項 ≠ -1)  打開指定網址 (“C:/Users/Public/tmp_wifipath/WLAN-” ＋ 超級列表框1.取標題 (超級列表框1.現行選中項, 2) ＋ “.xml”).如果真結束.子程序 __啟動窗口_可否被關閉, 邏輯型刪除目錄 (#常量_臨時目錄).子程序 _時鐘1_周期事件狀態條1.置文本 (3, 時間_轉為GMT格式2 (取現行時間 ()))