易语言调用百度api识别是否为色情图片的代码

调用百度云色情图片识别的代码

此功能需要加载精易模块5.6

.版本 2
.支持库 spec
.程序集 窗口程序集_启动窗口
.子程序 _识别按钮_被单击
百度云色情识别 ()
.子程序 百度云色情识别
.局部变量 类_XMLHTTP, 类_XMLHTTP
.局部变量 Accesss_token, 文本型
.局部变量 str, 文本型
Accesss_token ＝ GetAccesss_token ()
类_XMLHTTP.打开 (“POST”, “https://aip.baidubce.com/rest/2.0/antiporn/v1/detect?” ＋ Accesss_token)
类_XMLHTTP.发送请求 (“image=” ＋ 编码_URL编码 (编码_BASE64编码 (图片框1.图片)))
str ＝ 类_XMLHTTP.取responseText ()
调试输出 (str)
.子程序 GetAccesss_token, 文本型
.局部变量 类_XMLHTTP, 类_XMLHTTP
.局部变量 client_id, 文本型
.局部变量 client_secret, 文本型
.局部变量 str, 文本型
.局部变量 access_token, 文本型
' 免费的 都去申请看看吧
client_id ＝ “rrqIhjN6eHyNcVzSt1domPPo”
client_secret ＝ “kYjPv4j8qcuhnR4xs6PMjj1xylvgogj1”
类_XMLHTTP.打开 (“POST”, “https://aip.baidubce.com/oauth/2.0/token”)
类_XMLHTTP.发送请求 (“grant_type=client_credentials&client_id=” ＋ client_id ＋ “&client_secret=” ＋ client_secret)
str ＝ 类_XMLHTTP.取responseText ()
调试输出 (str)
access_token ＝ 文本_取出中间文本 (str, “{” ＋ #引号, #引号 ＋ “,”, )
access_token ＝ 子文本替换 (access_token, #引号 ＋ “:” ＋ #引号, “=”, , , 真)
调试输出 (access_token)
返回 (access_token)

运行结果：

总结

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

赞 (0)

相关推荐

  • 易语言调用api实现文件拖放获取路径的代码

    易语言调用api实现文件拖放获取路径的代码

    拖放文件支持任意版本Windows系统 此功能需要加载精易模块5.6 .版本 2 .支持库 spec .程序集 窗口程序集_启动窗口 .程序集变量 文件拖放类, 文件拖放 .子程序 __启动窗口_创建完毕 .局部变量 拖放处理, 子程序指针 文件拖放类.注册拖放 (_启动窗口.取窗口句柄 (), &拖放处理) proc_FilterMsg () .子程序 拖放处理 .参数 总文件数量, 整数型 .参数 当前是第几个文件, 整数型 .参数 当前的文件名, 文本型 .参数 当前的文件类型, 文本型

  • 易语言调用API函数监视目录与文件的代码

    易语言调用API函数监视目录与文件的代码

    DLL命令表 .版本 2 .DLL命令 GetPrivateProfileInt, 整数型, , "GetPrivateProfileIntA" .参数 lpAppName, 文本型 .参数 lpKeyName, 文本型 .参数 nDefault, 整数型 .参数 lpFileName, 文本型 .DLL命令 GetPrivateProfileString, 整数型, , "GetPrivateProfileStringA" .参数 lpAppName, 文本型 .

  • 易语言调用SetClipboardViewer的api实现剪贴版的内容监控

    易语言调用SetClipboardViewer的api实现剪贴版的内容监控

    DLL命令表 .版本 2 .DLL命令 加入剪贴板监视链_d, 整数型, "user32.dll", "SetClipboardViewer", 公开, 成功,返回值将标识剪贴板查看器链中的下一个窗口.如果出现错误或剪贴板查看器链中没有其他窗口,则返回值为空.( hwndNextViewer 将为 NULL.) .参数 窗口句柄, 整数型, , hwnd 加入剪切板监视链中窗口句柄 .DLL命令 设置窗口信息_d, 整数型, "user32",

  • 易语言统计代码行数与API的工具

    易语言统计代码行数与API的工具

    DLL命令表 .版本 2 .DLL命令 FindWindowEx, 整数型, "user32", "FindWindowExA", , 在窗口列表中寻找与指定条件相符的第一个子窗口 找到的窗口的句柄.如未找到相符窗口,则返回零.会设置GetLastError .参数 hWnd1, 整数型, , 在其中查找子的父窗口.如设为零,表示使用桌面窗口(通常说的顶级窗口都被认为是桌面的子窗口,所以也会对它们进行查找) .参数 hWnd2, 整数型, , 从这个窗口后开始查找.

  • 易语言API高级技巧教学

    首先声明,本文的读者该卖是:具有相当的易言语基础的.能较熟练地把常用的的API从VB/C声明转换到易言语DLL命令的易言语喜欢者. 1,使用指针 易言语中出于安定.方便考虑,没有直接提供指针,这正在进行一些高级 纵时不是很方便,固然有一些第三方支撑库可以取出变量指针(比如我的eLib++ 注:该支撑库系Delphi开发,本人已开放源代 ,你可以到易言语下载区瞧瞧)但是仅仅为了这个 纵就带上一个支撑库不太值得.实在用一个API,加上一些技术就可以欺骗Windows和易言语,让它们报告你一个变量的指

  • 易语言API热键监控实例

    在用易语言编写软件或者游戏辅助的时候,经常用到API热键监控这个功能,我们在下面分享给大家实例代码,直接复制可以测试下. AIP热键监控 .版本 2 .支持库 JY .子程序 监视热键2, 整数型, 公开, 成功返回热键ID,失败返回0. .参数 响应子程序, 子程序指针, , 热键被按下时要触发的子程序,该回调函数可有一个参数用来接收热键ID. .参数 键代码, 整数型, , 可以使用易语言中的键代码常量 .参数 功能键码, 整数型, 可空, 键码数值见常量,可多个相加成为组合键,留空或为0则

  • 易语言调用百度api识别是否为色情图片的代码

    易语言调用百度api识别是否为色情图片的代码

    调用百度云色情图片识别的代码 此功能需要加载精易模块5.6 .版本 2 .支持库 spec .程序集 窗口程序集_启动窗口 .子程序 _识别按钮_被单击 百度云色情识别 () .子程序 百度云色情识别 .局部变量 类_XMLHTTP, 类_XMLHTTP .局部变量 Accesss_token, 文本型 .局部变量 str, 文本型 Accesss_token ＝ GetAccesss_token () 类_XMLHTTP.打开 ("POST", "https://aip.b

  • 易语言调用百度API获取IP归属地的代码

    易语言调用百度API获取IP归属地的代码

    常量据表 .版本 2 .常量 查ip地址, "<文本长度: 17>", , {"code":0,"data": 调用百度api获取ip归属地的代码 此功能需要加载精易模块5.6 .版本 2 .程序集 窗口程序集_启动窗口 .子程序 取IP归属地_百度API, 文本型, 公开 .参数 IP地址, 文本型 .局部变量 Json, 类_json .局部变量 返回数据, 文本型 .局部变量 地区, 文本型 CoInitialize (0) 返

  • 易语言调用百度文字识别api方法

    现在百度ai特别强大,很多大公司都是调用百度的数据,那么对于习惯易语言的我们改怎么操作呢?今天以百度ai文字识别为例. 首先打开百度ai平台 注册或登录百度账号,进入控制台,选择文字识别 新建应用,获取appid和app key 选择技术文档,api文档 参考第一个调用方式,通过url调用 要获取token请参考相关链接 然后根据参数说明填写相关代码,最后结果如下: .版本 2 .支持库 spec .程序集 窗口程序集_启动窗口 .子程序 __启动窗口_创建完毕 .子程序 _按钮1_被单击 .局

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

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

    调用百度语音平台实现文字转换语音功能 此功能需要加载精易模块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

  • 易语言调用TTS语音模块实现文字转换语音功能的代码

    易语言调用TTS语音模块实现文字转换语音功能的代码

    DLL命令表 .版本 2 .DLL命令 CoInitialize, 整数型, "ole32.dll", "CoInitialize" .参数 pvReserved, 整数型 .DLL命令 CoUninitialize, , "Ole32.dll", "CoUninitialize", , 在当前线程,关闭COM库,卸载所有加载的DLL的线程,释放线程保持的任何其他资源,并强制关闭所有的线程上的RPC连接. 利用系统自带的TTS

  • 易语言调用墨迹天气实现自动定位获取天气情况的代码

    易语言调用墨迹天气实现自动定位获取天气情况的代码

    常量数据表 .版本 2 .常量 实况头, "<文本长度: 9>" .常量 实况尾, "<文本长度: 2>" .常量 更新时间头, "<文本长度: 28>" .常量 更新时间尾, "<文本长度: 9>" .常量 温度头, "<文本长度: 28>" .常量 温度尾, "<文本长度: 5>" .常量 空气质量头, &quo

  • 易语言调用whois实现域名批量查询与注册的代码

    易语言调用whois实现域名批量查询与注册的代码

    域名批量查询注册与whois查询的代码 此功能需要加载精易模块5.6 .版本 2 .支持库 EThread .程序集 窗口程序集_启动窗口 .子程序 _批量查询_被单击 启动线程 (&查询是否可以注册, , ) .子程序 查询是否可以注册 .局部变量 xml, 文本型 .局部变量 域名数组, 文本型, , "0" .局部变量 计次, 整数型 批量查询.禁止 ＝ 真 批量查询.标题 ＝ "正在查询..." 域名数组 ＝ 分割文本 (删首尾空 (批量域名.内容)

  • python调用百度API实现人脸识别

    1.代码 from aip import AipFace import cv2 import time import base64 from PIL import Image from io import BytesIO import pyttsx3 # """ 你的 APPID AK SK """ APP_ID = '1965####' API_KEY = 'YXL65ekIloykyjrT4kzc####' SECRET_KEY = 'lFi

随机推荐