カスタム検索
その他

画像の文字を識別する(VBS)

Microsoft Office Document Imaging(MODI)を利用して画像の文字を識別するVBScriptです。
※ 要Microsoft Office(2003、2007で確認。2010は不可。)

Option Explicit

Const miLANG_JAPANESE = 17

On Error Resume Next
With CreateObject("MODI.Document")
  .Create "D:\TestFiles\OCRTest.jpg"
  .OCR miLANG_JAPANESE
  MsgBox .Images(0).Layout.Text
End With
If Err.Number <> 0 Then MsgBox Err.Description
Err.Clear
On Error GoTo 0

参考Webページ:
http://bbs.wankuma.com/index.cgi?mode=al2&namber=51622&KLOG=87
http://msdn.microsoft.com/en-us/library/aa167607%28office.11%29.aspx