易語言調(diào)用ESPI11.dll實(shí)現(xiàn)禁止指定程序訪問網(wǎng)絡(luò)的代碼
更新時(shí)間：2018年11月28日 08:29:49 作者：易語言源碼貝貝吧
今天小編就為大家分享一篇關(guān)于易語言調(diào)用ESPI11.dll實(shí)現(xiàn)禁止指定程序訪問網(wǎng)絡(luò)的代碼，小編覺得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來看看吧
攔截指定程序聯(lián)網(wǎng)的代碼
.版本 2 .支持庫 eNetIntercept .支持庫 eAPI .程序集 攔截指定進(jìn)程聯(lián)網(wǎng) .程序集變量 被攔截進(jìn)程名, 文本型 .子程序 __啟動(dòng)窗口_創(chuàng)建完畢 .局部變量 a, 網(wǎng)絡(luò)服務(wù)安裝 .局部變量 b, 系統(tǒng)信息 被攔截進(jìn)程名 ＝ “被攔截.EXE” ' 要攔截的程序 .如果真 (a.是否已安裝 () ＝ 假) 取系統(tǒng)信息 (b) 寫到文件 (b.系統(tǒng)目錄 ＋ “\ESPI11.dll”, #服務(wù)文件) a.安裝 (b.系統(tǒng)目錄 ＋ “\ESPI11.dll”) .如果真結(jié)束 .如果真 (網(wǎng)截1.打開 () ＝ 假) 信息框 (“獲取失敗”, 0, ) .如果真結(jié)束 網(wǎng)截1.打開 () 編輯框1.是否允許多行 ＝ 真 編輯框1.滾動(dòng)條 ＝ 2 .子程序 _網(wǎng)截1_調(diào)創(chuàng)建套接字, 整數(shù)型 .參數(shù) 調(diào)用者信息, 調(diào)用者信息, 參考 .參數(shù) 地址族, 整數(shù)型, 參考 .參數(shù) 格式, 整數(shù)型, 參考 .參數(shù) 協(xié)議, 整數(shù)型, 參考 .局部變量 N, 文本型 N ＝ 到大寫 (取文本右邊 (調(diào)用者信息.取進(jìn)程名 (), 取文本長度 (調(diào)用者信息.取進(jìn)程名 ()) － 倒找文本 (調(diào)用者信息.取進(jìn)程名 (), “\”, , 假))) .如果真 (N ＝ 被攔截進(jìn)程名) 編輯框1.加入文本 (到文本 (取分鐘 (取現(xiàn)行時(shí)間 ())) ＋ “：” ＋ 到文本 (取秒 (取現(xiàn)行時(shí)間 ())) ＋ “ 愚蠢的【” ＋ N ＋ “】一次又一次的自尋死路 結(jié)果卻毫無意義” ＋ #換行符) 返回 (#攔截操作.關(guān)閉連接) .如果真結(jié)束 .子程序 __啟動(dòng)窗口_將被銷毀 網(wǎng)截1.關(guān)閉 ()
運(yùn)行結(jié)果：
總結(jié)
以上就是這篇文章的全部內(nèi)容了，希望本文的內(nèi)容對大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值，謝謝大家對腳本之家的支持。如果你想了解更多相關(guān)內(nèi)容請查看下面相關(guān)鏈接
相關(guān)文章
在本文里我們給學(xué)習(xí)易語言的朋友們整理了一篇關(guān)于易語言讀寫配置項(xiàng)命令的相關(guān)內(nèi)容，有興趣的學(xué)習(xí)下。2019-01-01
今天小編就為大家分享一篇關(guān)于易語言設(shè)置在畫板中繪圖的畫筆顏色，小編覺得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來看看吧2018-11-11
易語言設(shè)置時(shí)鐘周期與周期事件實(shí)現(xiàn)運(yùn)行或停止時(shí)鐘的方法
今天小編就為大家分享一篇關(guān)于易語言設(shè)置時(shí)鐘周期與周期事件實(shí)現(xiàn)運(yùn)行或停止時(shí)鐘的方法，小編覺得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來看看吧2018-11-11
在本篇文章中我們給大家分享了關(guān)于易語言找字、找圖的實(shí)例代碼內(nèi)容，有需要的朋友們可以參考下。2018-11-11
在本篇文章中小編給大家分享了關(guān)于易語言桌面寫字軟件制作相關(guān)知識(shí)點(diǎn)，有興趣的朋友們學(xué)習(xí)下。2019-01-01
在本篇文章里小編給大家分享了關(guān)于易語言做軟件的實(shí)例教學(xué)以及相關(guān)內(nèi)容，需要的朋友們可以學(xué)習(xí)下。2019-02-02
今天小編就為大家分享一篇關(guān)于易語言通過枚舉密碼進(jìn)行破解rar壓縮包文件的代碼，小編覺得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來看看吧2018-11-11
在本篇文章里我們給大家分享了關(guān)于易語言字符命令等相關(guān)知識(shí)點(diǎn)，有需要的朋友們學(xué)習(xí)下。2019-01-01
今天小編就為大家分享一篇關(guān)于易語言限制編輯框只能輸入中文的方法，小編覺得內(nèi)容挺不錯(cuò)的，現(xiàn)在分享給大家，具有很好的參考價(jià)值，需要的朋友一起跟隨小編來看看吧2018-11-11
在本篇內(nèi)容里小編給各位分享了關(guān)于易語言操作EDB數(shù)據(jù)庫的方法和教學(xué)，對此有需要的朋友們可以學(xué)習(xí)下。2019-01-01