[技术讨论] powershell调用百度ai进行文字识别

for_flr

https://ai.baidu.com/sdk#ocr     登陆创建自己的识图应用，记录下apikey，secretkey，并下载baidu-aip c#sdk。

[system.reflection.Assembly]::LoadFrom("C:\Users\lenovo\net40\AipSdk.dll")
[system.reflection.Assembly]::LoadFrom("C:\Users\lenovo\net40\Newtonsoft.Json.dll")
write-host "识别中，请等待..." -foregroundcolor green
$appid="25337405"
$apikey="4z3B35eRopI6ya7HNusnejah"
$secretkey="p9zrifkabzPrhDqgS8kv8OoHMpPWo3CI"
$pic="C:\Users\lenovo\Desktop\code.jpg"
$dirpic=dir $pic
$ocr=new-object baidu.aip.ocr.ocr($apikey,$secretkey)
$image=[system.io.file]::readallbytes($pic)
$json=$ocr.generalbasic($image)
$txt=$json.toString()|convertfrom-json
$txt.words_result.words
write-host "共识别$($txt.words_result_num)行文字" -foregroundcolor green
cd $dirpic.directoryname
$fn=$dirpic.basename+"_ocr.txt"
sc -path $fn -value $txt.words_result.words 
$null=[console]::readkey()
复制代码

for_flr

也可以用这种方式

作者@zaqmlp
Add-Type -AssemblyName System.Web;
$url='https://aip.baidubce.com/rest/2.0/ocr/v1/general_basic';
$pic='C:\Users\Administrator\Desktop\test.jpg';
$imagedata=[Web.HttpUtility]::UrlEncode([Convert]::ToBase64String([IO.File]::ReadAllBytes($pic)));
$poststr=@(   'access_token=24.b305c9822131e65eda05e29c157dd719.2592000.1559103982.282335-16139329',
    $('image='+$imagedata),
    'language_type=CHN_ENG',
    'detect_direction=false',
    'detect_language=false',
    'probability=false'
) -join '&';
$web=New-Object System.Net.WebClient;
$web.Headers.Add('Content-Type', 'application/x-www-form-urlencoded');
[byte[]]$postdata=[Text.Encoding]::UTF8.GetBytes($poststr);
[byte[]]$responsedata=$web.UploadData($url, 'POST', $postdata);
[Text.Encoding]::UTF8.GetString($responsedata);
复制代码

在这里看到的 http://www.bathome.net/viewthrea ... p;extra=&page=2
其中，access_token有效期30天，用以下方式返回
curl -i -k 'https://aip.baidubce.com/oauth/2.0/token?grant_type=client_credentials&client_id=【百度云应用的AK】&client_secret=【百度云应用的SK】'

for_flr

1楼运行到11行时，调用baidu.aip.ocr.ocr类的方法识别图片，会有几秒等待
运行时总觉得差点意思。
应该加个进度条,如下

$code = {foreach($i in 1..50){$i;sleep -m 100}}   
$newPowerShell = [PowerShell]::Create().AddScript($code)
$handle = $newPowerShell.BeginInvoke()   
while ($handle.IsCompleted -eq $false) {
  Write-Host '.' -NoNewline
  Start-Sleep -m 500
}
Write-Host ""
$newPowerShell.EndInvoke($handle)
复制代码

for_flr

回复 5# 5i365
取token值报错，具体原因需要查看百度ai文档。一般是appid或者apikey值有错。
不推荐批处理代码合并为一行，影响阅读，不便于维护。吃力不讨好；powershell优点多多，只是启动的时候有点慢- -