调用百度云色情图片识别的代码
此功能需要加载精易模块5.6
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
.版本 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) |
运行结果：
总结
以上就是这篇文章的全部内容了，希望本文的内容对大家的学习或者工作具有一定的参考学习价值，谢谢大家对服务器之家的支持。如果你想了解更多相关内容请查看下面相关链接
