易語言調(diào)用百度api識(shí)別是否為色情圖片的代碼
調(diào)用百度云色情圖片識(shí)別的代碼
此功能需要加載精易模塊5.6
.版本 2 .支持庫 spec .程序集 窗口程序集_啟動(dòng)窗口 .子程序 _識(shí)別按鈕_被單擊 百度云色情識(shí)別 () .子程序 百度云色情識(shí)別 .局部變量 類_XMLHTTP, 類_XMLHTTP .局部變量 Accesss_token, 文本型 .局部變量 str, 文本型 Accesss_token = GetAccesss_token () 類_XMLHTTP.打開 (“POST”, “https://aip.baidubce.com/rest/2.0/antiporn/v1/detect?” + Accesss_token) 類_XMLHTTP.發(fā)送請(qǐng)求 (“image=” + 編碼_URL編碼 (編碼_BASE64編碼 (圖片框1.圖片))) str = 類_XMLHTTP.取responseText () 調(diào)試輸出 (str) .子程序 GetAccesss_token, 文本型 .局部變量 類_XMLHTTP, 類_XMLHTTP .局部變量 client_id, 文本型 .局部變量 client_secret, 文本型 .局部變量 str, 文本型 .局部變量 access_token, 文本型 ' 免費(fèi)的 都去申請(qǐng)看看吧 client_id = “rrqIhjN6eHyNcVzSt1domPPo” client_secret = “kYjPv4j8qcuhnR4xs6PMjj1xylvgogj1” 類_XMLHTTP.打開 (“POST”, “https://aip.baidubce.com/oauth/2.0/token”) 類_XMLHTTP.發(fā)送請(qǐng)求 (“grant_type=client_credentials&client_id=” + client_id + “&client_secret=” + client_secret) str = 類_XMLHTTP.取responseText () 調(diào)試輸出 (str) access_token = 文本_取出中間文本 (str, “{” + #引號(hào), #引號(hào) + “,”, ) access_token = 子文本替換 (access_token, #引號(hào) + “:” + #引號(hào), “=”, , , 真) 調(diào)試輸出 (access_token) 返回 (access_token)
運(yùn)行結(jié)果:
總結(jié)
以上就是這篇文章的全部?jī)?nèi)容了,希望本文的內(nèi)容對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值,謝謝大家對(duì)腳本之家的支持。如果你想了解更多相關(guān)內(nèi)容請(qǐng)查看下面相關(guān)鏈接
相關(guān)文章
易語言抽取幸運(yùn)號(hào)控制子程序暫停與繼續(xù)運(yùn)行的代碼
今天小編就為大家分享一篇關(guān)于易語言抽取幸運(yùn)號(hào)控制子程序暫停與繼續(xù)運(yùn)行的代碼,小編覺得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來看看吧2018-11-11易語言將畫板指定區(qū)域的內(nèi)容復(fù)制到另一個(gè)畫板的指定位置
今天小編就為大家分享一篇關(guān)于易語言將畫板指定區(qū)域的內(nèi)容復(fù)制到另一個(gè)畫板的指定位置,小編覺得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來看看吧2018-11-11易語言設(shè)置鼠標(biāo)移動(dòng)到組件上時(shí)的文本顯示顏色
今天小編就為大家分享一篇關(guān)于易語言設(shè)置鼠標(biāo)移動(dòng)到組件上時(shí)的文本顯示顏色,小編覺得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來看看吧2018-11-11易語言在畫板中寫出指定文本當(dāng)畫板中已滿會(huì)自動(dòng)滾屏
今天小編就為大家分享一篇關(guān)于易語言在畫板中寫出指定文本當(dāng)畫板中已滿會(huì)自動(dòng)滾屏,小編覺得內(nèi)容挺不錯(cuò)的,現(xiàn)在分享給大家,具有很好的參考價(jià)值,需要的朋友一起跟隨小編來看看吧2018-11-11實(shí)現(xiàn)讓易語言編譯的32位程序在64位Windows7系統(tǒng)非管理員帳戶中執(zhí)行
在本篇文章里我們給大家分享了關(guān)于實(shí)現(xiàn)讓易語言編譯的32位程序在64位Windows7系統(tǒng)非管理員帳戶中執(zhí)行的相關(guān)內(nèi)容,有需要的朋友們可以測(cè)試下。2018-10-10