溫馨提示×
您好，登錄后才能下訂單哦！
點擊 登錄注冊 即表示同意《億速云用戶服務條款》
您好，登錄后才能下訂單哦！
調用百度云色情圖片識別的代碼
此功能需要加載精易模塊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)
運行結果：
總結
以上就是這篇文章的全部內容了，希望本文的內容對大家的學習或者工作具有一定的參考學習價值，謝謝大家對億速云的支持。如果你想了解更多相關內容請查看下面相關鏈接
免責聲明：本站發布的內容（圖片、視頻和文字）以原創、轉載和分享為主，文章觀點不代表本網站立場，如果涉及侵權請聯系站長郵箱：is@yisu.com進行舉報，并提供相關證據，一經查實，將立刻刪除涉嫌侵權內容。
