如何用易語言做wpe濾鏡?

.支持庫 eNetIntercept

.支持庫 shell

.程序集 窗口程序集1

.程序集變量 指定內容, 文本型

.程序集變量 替換內容, 文本型

.程序集變量 進程名稱, 文本型

.程序集變量 服務安裝, 網絡服務安裝

.程序集變量 文本, 文本型

.子程序 __啟動窗口_創建完畢

進程名稱 ＝ “IEXPLORE.EXE”

指定內容 ＝ “Tale”

替換內容 ＝ “11111111111”

服務安裝.卸載 ()

服務安裝.安裝 (取特定目錄 (10) ＋ “/ESPI11.dll”)

.如果真 (網截1.打開 () ＝ 真)

信息框 (“That Ok~”, 0, )

.如果真結束

.子程序 _網截1_調接收, 整數型

.參數 調用者信息, 調用者信息, 參考

.參數 套接字句柄, 整數型, 參考

.參數 網絡數據, 網絡數據, 參考

.參數 調用方式, 整數型, 參考

.如果真 (尋找文本 (調用者信息.取進程名 (), 進程名稱, , 假) ≠ -1)

文本 ＝ 網絡數據.到文本 ()

.如果真 (尋找文本 (文本, 指定內容, , 假) ≠ -1)

文本 ＝ 子文本替換 (文本, 指定內容, 替換內容, , , 真)

網絡數據.從文本分配 (文本)

返回 (2)