您好,登錄后才能下訂單哦!
這篇文章主要介紹易語言如何調用ESPI11.dll實現禁止指定程序訪問網絡,文中介紹的非常詳細,具有一定的參考價值,感興趣的小伙伴們一定要看完!
攔截指定程序聯網的代碼
.版本 2 .支持庫 eNetIntercept .支持庫 eAPI .程序集 攔截指定進程聯網 .程序集變量 被攔截進程名, 文本型 .子程序 __啟動窗口_創建完畢 .局部變量 a, 網絡服務安裝 .局部變量 b, 系統信息 被攔截進程名 = “被攔截.EXE” ' 要攔截的程序 .如果真 (a.是否已安裝 () = 假) 取系統信息 (b) 寫到文件 (b.系統目錄 + “\ESPI11.dll”, #服務文件) a.安裝 (b.系統目錄 + “\ESPI11.dll”) .如果真結束 .如果真 (網截1.打開 () = 假) 信息框 (“獲取失敗”, 0, ) .如果真結束 網截1.打開 () 編輯框1.是否允許多行 = 真 編輯框1.滾動條 = 2 .子程序 _網截1_調創建套接字, 整數型 .參數 調用者信息, 調用者信息, 參考 .參數 地址族, 整數型, 參考 .參數 格式, 整數型, 參考 .參數 協議, 整數型, 參考 .局部變量 N, 文本型 N = 到大寫 (取文本右邊 (調用者信息.取進程名 (), 取文本長度 (調用者信息.取進程名 ()) - 倒找文本 (調用者信息.取進程名 (), “\”, , 假))) .如果真 (N = 被攔截進程名) 編輯框1.加入文本 (到文本 (取分鐘 (取現行時間 ())) + “:” + 到文本 (取秒 (取現行時間 ())) + “ 愚蠢的【” + N + “】一次又一次的自尋死路 結果卻毫無意義” + #換行符) 返回 (#攔截操作.關閉連接) .如果真結束 .子程序 __啟動窗口_將被銷毀 網截1.關閉 ()
運行結果:
以上是“易語言如何調用ESPI11.dll實現禁止指定程序訪問網絡”這篇文章的所有內容,感謝各位的閱讀!希望分享的內容對大家有幫助,更多相關知識,歡迎關注億速云行業資訊頻道!
免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。