次のようなVBScriptスクリプトがあります。
Const ForAppending = 8
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile("C:\OCRresults.txt", ForAppending, True)
set miDoc=CreateObject("MODI.Document")
miDoc.Create ("C:\PathToTifScreenshot.tif")
miDoc.Images(0).OCR
set miLayout = miDoc.Images(0).Layout
stringOut=miLayout.Text
objTextFile.WriteLine stringOut
DoOCR = stringOut
Set miLayout = Nothing
Set miDoc = Nothing
Set objFSO = Nothing
MODIを使用してtifファイルをOCRします。ただし、MODIは回転した画像を自動的に識別するため、このように機能させたくありません。私が基本的に望んでいるのは、画像が適切に回転している場合にのみ適切にOCRを実行することです。MODIのGUIには、「自動回転」のチェックを外すことができるオプションがありますが、これは手動プロセスでのみ機能するようです。スクリプトが回転した画像を識別しないようにする方法はありますか?