調用百度云色情圖片識別的代碼
此功能需要加載精易模塊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) |
運行結果：
總結
以上就是這篇文章的全部內容了，希望本文的內容對大家的學習或者工作具有一定的參考學習價值，謝謝大家對服務器之家的支持。如果你想了解更多相關內容請查看下面相關鏈接
