read text from image file

[veer]

Hello expert.
I want to make a program in VB in which I have an image file i,e jpg, tif etc.
How can I open this image file and read the text and generate a text file?
If there is any idea then please send me.

Thanks in advance.

[debasisdas]

How the image file contains text?

Still then if you want to open then use in a richtextbox. Using that control you can open any type of file even dll and exe also.

[SammyB]

hello expert
i want to make programe in vb in which i have an image file i,e jpg, tif etc
how i can open this image file and read the text and generate a text file .
if there is any idea then please send me

thaks in advance

If you are trying to create a program like OmniPage, you have an enormous task. The characters that you see in an image file are just composed of dots called pixels, there are no ascii characters. Plus, image file formats are pretty tough. HTH --Sam

[veer]

hello expert
i got this code from internet searching but when i execute this code it shows the error that the "aspriseOCR.dll" file was not found but when i have no idea about how the dll file for this code is create please help me by providing some code for the following functions so that if does not show the above error
.................................................. .................................................. .......

Option Explicit
Private Declare Function OCR Lib "AspriseOCR.dll" (ByVal file As String, ByVal imageType As Long) As String
Private Declare Function OCRBarCodes Lib "AspriseOCR.dll" (ByVal file As String, ByVal imageType As Long) As String
Private Declare Function OCRpart Lib "AspriseOCR.dll" (ByVal file As String, ByVal imageType As Long, ByVal startX As Long, ByVal startY As Long, ByVal width As Long, ByVal height As Long) As String
 
Private Sub Check1_Click()
    If Check1.Value = Checked Then
        Command4.Enabled = True
    Else
        Command4.Enabled = False
    End If
End Sub
 
Private Sub Command1_Click()
Dim fnum As Integer
 
    On Error Resume Next
    dlgOpenFile.ShowOpen
    If Err.Number = cdlCancel Then
        ' The user canceled.
        Exit Sub
    ElseIf Err.Number <> 0 Then
        ' Unknown error.
        MsgBox "Error " & Format$(Err.Number) & _
            " selecting file." & vbCrLf & _
            Err.Description
        Exit Sub
    End If
    On Error GoTo 0
 
    ' Read the file.
    'fnum = FreeFile
    'Open dlgOpenFile.FileName For Input As #fnum
    'text.text = Input$(LOF(fnum), fnum)
    'Close #fnum
 
    textPath.text = dlgOpenFile.FileNameEnd Sub
 
Private Sub Command2_Click()
    Dim ret As String
    ret = OCR(textPath.text, -1)
    text.text = ret
End Sub
 
Private Sub Command3_Click()
    Dim ret As String
    ret = OCRBarCodes(textPath.text, -1)
    text.text = ret
End Sub
 
Private Sub Command4_Click()
    Dim ret As String
    ret = OCRpart(textPath.text, -1, CLng(X.text), CLng(Y.text), CLng(W.text), CLng(H.text))
    text.text = ret
End Sub
 
Private Sub Command5_Click()
End
End Sub
 
Private Sub Form_Load()
    dlgOpenFile.InitDir = App.Path
    dlgOpenFile.DialogTitle = "Open File"
    dlgOpenFile.Flags = _
        cdlOFNFileMustExist + _
        cdlOFNHideReadOnly + _
        cdlOFNLongNames + _
        cdlOFNExplorer
    dlgOpenFile.CancelError = True
    Command4.Enabled = False
End Sub

.................................................. ...

If you are trying to create a program like OmniPage, you have an enormous task. The characters that you see in an image file are just composed of dots called pixels, there are no ascii characters. Plus, image file formats are pretty tough. HTH --Sam

[debasisdas]

The referenced AspriseOCR.dll is not part of VB 6.0 . that is some thirdparty file. You need to have that file in your system to use that.

[veer]

hello expert
i download this file with the code but it is not working with programe
where i will save this file or can i create my own dll file for this code if yes
then give some tips about it

thanks

The referenced AspriseOCR.dll is not part of VB 6.0 . that is some thirdparty file. You need to have that file in your system to use that.

[debasisdas]

1.copy the file to SYSTEM32 folder
2.register the dll with windows using REGSVR32 key.

then try to use the control.

[Killer42]

For a Declare statement, I don't think you need to register the DLL. I would recommend copying it into the same directory as your program first, to try it out. But make sure you start VB in that directory, so it is the current one.

[VACEPROGRAMER]

You are crazy!
Try to make a DLL and save in the same folder where VB is installed or just
browse from the VB.

VACE

[Killer42]

You are crazy!
Try to make a DLL ...

Um... which of us are you responding to, VACEPROGRAMER?

[VACEPROGRAMER]

I'm reponding to veer!!
VACE

[veer]

please responding me about my question

I'm reponding to veer!!
VACE

[Killer42]

I thought we were waiting on more detail of the latest problem. "Not working" doesn't really tell us very much.