易语言调用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.关闭 ()

运行结果：

总结

以上就是这篇文章的全部内容了，希望本文的内容对大家的学习或者工作具有一定的参考学习价值，谢谢大家对我们的支持。如果你想了解更多相关内容请查看下面相关链接

赞 (0)

相关推荐

  • 图文详解易语言dll调用

    易语言dll使用教程 1.图一不用说了把,打开易语言谁都会,本教程通用易语言5.11后所有版本(包括5.11) 2.图二:点击新建程序,选择第三个,windows动态链接库. 3.新建一个子程序,然后名字自定义,但是要记住名字哦,还有箭头所指,需要点击为公开,这样才能调用.箭头二是返回的数据,源码需要. 4.保存的文件名随意,但是调用的时候需要用到的文件名. 5.在新建个易语言窗口程序 ,新建个空白的dll框架,第一名字随意,返回要和dll里面访问的一样.如文本型. 新建的易语言窗口程序需要和d

  • 易语言注入dll调用函数的方法

    在我们的生活中那,如何操作上述标题的小问题,小编今天就在这里给大家分享一点我的小经验,来增加我们的体验,希望可以给你们带来帮助. 1.首先这不是注入DLL,这是导入DLL函数进PE文件,这个过程需要一个工具LordPE,网上都有可以自己去下载. 2我们知道一旦DLL函数被导入EXE文件的输入表,则EXE文件启动时会自动执行一遍该DLL的_启动子程序 函数, 3.所以我们可以把需要执行的指令放在该函数里面,然后记得在该函数的 公开 选项打上勾,然后编译. 4.接下来,我们打开LordPE,如下图

  • 易语言调用GetUserPassWord.dll获取系统开机密码

    易语言调用GetUserPassWord.dll获取系统开机密码

    DLL命令表 .版本 2 .DLL命令 取开机密码, 文本型, "GetUserPassWord.dll", "GetUserPassWord", 公开 获取系统登录密码的代码 .版本 2 .程序集 窗口程序集1 .子程序 获取开机, 文本型 .局部变量 密码, 文本型 .局部变量 帐号, 文本型 .局部变量 最终文本, 文本型 帐号 ＝ 读环境变量 ("USERNAME") 密码 ＝ 取电脑开机密码 () 最终文本 ＝ "密码类型:开

  • 易语言获取开机时间dll代码

    易语言怎么获取开机时间dll代码 下面是代码dll(复制即可): .版本 2 .DLL命令 GetTickCount, 整数型, "kernel32.dll", "GetTickCount", , www.2ex.top 使用方式: 调试输出 (四舍五入 (GetTickCount () ÷ 1000, 0)) 一个代码就可以实现查看开机时间代码哦!赶快试一试吧! 下面是复制粘贴在易语言dll命令里面的代码例子,如果你复制的不一样,就辛苦下照着打下. 以上内容大家可

  • C#调用易语言写的Dll文件方法

    C#调用易语言写的Dll文件方法

    本人是用易语言起步的,起初是为了兴趣,后来由于易语言被杀软误杀严重,连空白程序都杀,后来转到了学C#,随着学习的深入,接触越来越复杂的东西之后,发现有些功能没有用易语言来写方便,所以就想到用C#来调用易语言写的DLL,就和一般的Dll调用一样,没什么技术含量. 易语言中新建个Dll文件 C#中和一般的DLL一样调用 <p>using System; using System.Collections.Generic; using System.ComponentModel; using Syst

  • 易语言调用dll实现条形码本地离线识别的代码

    易语言调用dll实现条形码本地离线识别的代码

    DLL命令表 需要提前下载用到命令对应的库 .版本 2 .DLL命令 OCR, 文本型, "AspriseVB.dll", "OCR" .参数 file, 文本型 .参数 imageType, 整数型 .DLL命令 OCRBarCodes, 文本型, "VBWrapper.dll", "OCRBarCodes" .参数 file, 文本型 .参数 imageType, 整数型 .DLL命令 OCRpart, 文本型, &quo

  • 易语言调用ESPI11.dll实现禁止指定程序访问网络的代码

    易语言调用ESPI11.dll实现禁止指定程序访问网络的代码

    拦截指定程序联网的代码 .版本 2 .支持库 eNetIntercept .支持库 eAPI .程序集 拦截指定进程联网 .程序集变量 被拦截进程名, 文本型 .子程序 __启动窗口_创建完毕 .局部变量 a, 网络服务安装 .局部变量 b, 系统信息 被拦截进程名 ＝ "被拦截.EXE" ' 要拦截的程序 .如果真 (a.是否已安装 () ＝ 假) 取系统信息 (b) 写到文件 (b.系统目录 + "\ESPI11.dll", #服务文件) a.安装 (b.系统目

  • 易语言调用百度语音平台实现文字转换语音功能的代码

    易语言调用百度语音平台实现文字转换语音功能的代码

    调用百度语音平台实现文字转换语音功能 此功能需要加载精易模块5.6 .版本 2 .支持库 wmp9 .程序集 窗口程序集1 .子程序 _试听按钮_被单击 播放器1.地址 ＝ "http://tts.baidu.com/text2audio?lan=zh&pid=101&ie=UTF-8&text=" + 编码_URL编码 (内容编辑框.内容, , 真) + "&spd=5&per=4" ' 参数 可需 描述 ' tex 必填

  • 易语言调用百度图片识别实现的图片转表格的代码

    易语言调用百度图片识别实现的图片转表格的代码

    截图模块代码 .版本 2 .子程序 开始截图, 逻辑型, 公开, 截图成功返回真,图片被自动保存到剪贴板.失败或放弃截图则返回假. .参数 是否截取鼠标, 逻辑型, 可空 .参数 调节框颜色, 整数型, 可空, 默认:Red=10,Green=100,Blue=130 .参数 矩形信息框颜色, 整数型, 可空, 默认黑色 .参数 矩形信息字体颜色, 整数型, 可空, 默认黑色 .子程序 取剪贴板位图, 字节集, 公开 表格图片转表格源码 此功能需要加载精易模块5.6 .版本 2 .支持库 edr

  • 易语言调用百度的真相问答制作真相问答机的代码

    易语言调用百度的真相问答制作真相问答机的代码

    全局变量表 .版本 2 .全局变量 源文件, 文本型 .全局变量 答案, 文本型 常量数据表 .版本 2 .常量 常量1, "<文本长度: 9>", , -middle"> .常量 常量2, "<文本长度: 7>", , </span> .常量 常量3, "<文本长度: 7>", , proof"> .常量 常量4, "<文本长度: 7>&quo

  • C++ 编写DLL文件给易语言调用方法

    摸索了两天了,终于解决了所有问题,在此跟大家分享. 需要三个文件,dll_demo.h.dll_demo.cpp.dll_dome.def 直接上代码: 头文件如下: #ifndef _DLL_DEMO_H_ #define _DLL_DEMO_H_ #ifdef DLLDEMO_EXPORTS #define DLL_DEMO extern "C" __declspec(dllexport) #else #define DLL_DEMO extern "C" __

  • 详解易语言调用js实现md5加密方法

    详解易语言调用js实现md5加密方法

    易语言调用js需要用到拓展组件的脚本组件, 在窗口创建完毕的事件里给脚本组件初始化设置下脚本组件的语言属性,在这里以JScript为例: 脚本组件执行脚本的简单方法是:  脚本组件1.执行 ()  然后根据需要调用的脚本函数   脚本组件1.运行 () 首先看下脚本组件1.执行 () 的参数和返回值: 调用格式: 〈逻辑型〉 对象．执行 (文本型 脚本代码) - 脚本语言支持组件->脚本组件 英文名称:Execute 执行指定的代码文本.返回真为执行正常,返回假为出错,错误信息可以从"错误

  • 易语言调用JS代码方法总结

    以下是我们易语言调用JS代码的步骤 步骤1: 步骤2: 步骤3: 步骤4: 以上就是四个详细步骤,感谢大家对我们的支持.

  • 易语言调用易模块的方法

    易模块就是,易语言前辈把一些函数.常用的子程序. 编辑起来,方便新手学习! 1.打开易语言,里面,窗口程序.控制程序.动态连接库.易语言模块. 这里面可以用到模块的有[窗口程序.控制程序.动态连接库.]易语言模块是编写易模块的程序. 2.我们就以窗口程序程序进行操作,点击进入[双击]. 进入设计面板,点击[程序],在点击[模块引用],然后[添加模块] 1.使用方法 添加完毕模块!最好先更新下模快引用信息,让语言兼容! 添加完毕模块!最好先更新下模快引用信息,让语言兼容! 2.在打开易语言模块信息

随机推荐