You can do this, but there are numerous dependencies. Bottom line is, it isn't a trivial project. You need to know
- Existing scanner
- Existing scanner software
- version of windows.
- version of office.
- how many existing documents/pages need to be scanned
- how many documents/pages will be scanned per day
- how often are the documents reviewed
- how many people need to access the documents
- what document format should be used in your environment
If by doc file you mean a .doc as in Word, you will need OCR software.
Just to get documents scanned, you may not need a VB program.
It is vital that you carefully design your acquisition process to ensure that everything is scanned, readable, and retrievable.
You need to outline what you want to accomplish, determine what software you have to work with, then investigate whether additional software will help you get the job done. I strongly recommend that you hire a consultant familiar with records management.
Last Wiki Answer Submitted: December 19, 2004 8:17 pm by Shasta880 pts.
If you live outside the United States, by submitting your email address you consent to having your personal data transferred to and processed in the United States.
Per the above reply – what you expect the results to be will greatly determine how you implement.
Assuming the scanner(s) you want to use have a TWAIN driver, you can buy a set of TWAIN tools for VB (one source: http://www.leadtools.com/SDK/Raster/Raster-Scanning-Twain.htm). This will allow you to manipulate settings for the image capture, but will only get you the raw data (either as an image file, like JPG, or as raw bits). You then have to figure out how to get that into your destination document, be it Word or other format.
I have used the wang image control built into NT4 for this. I have also used the Kodak Image control built into Windows 2000. The Kodak control is an enhanced version of the Wang control and has the same object model. Windows XP does not contain the Kodak imaging control.
The sample code below illustrates using the Kodak control to scan a doc to the filename that is passed to the ScanTheImage function. The Kodak control is named ImgScan1. If you compile this on a machine with the Kodak control, it will work on machines that have either the Kodak or the Wang control. We’ve scanned over 2 million pages into our imaging system using Kodak and Wang.
Private Function ScanTheImage(ByVal TheImageFile As String) As Boolean
Dim ReturnValue As Long
Dim TestString As String
ReturnValue = ImgScan1.OpenScanner()
ImgScan1.PageOption = 2
ImgScan1.FileType = 1
ImgScan1.PageType = 1
ImgScan1.CompressionType = 4
ImgScan1.CompressionInfo = 1
ImgScan1.ScanTo = 1
ImgScan1.image = TheImageFile
ImgScan1.ShowSetupBeforeScan = True
ImgScan1.MultiPage = True
ReturnValue = ImgScan1.StartScan()
ImgScan1.CloseScanner
TestString = Dir(TheImageFile)
If TestString “” Then
ScanTheImage = True
End If
End Function
I also have samples for using the Kodak Imaging Professional Admin control and the Davinci Barcode Reader Control for manipulating files. For example, in my system users can use a barcoded cover sheet to append additional pages to an existing file or to replace an existing file. Unfortunately, EIStream is no longer selling Kodak Imaging Professional.
Per the above reply – what you expect the results to be will greatly determine how you implement.
Assuming the scanner(s) you want to use have a TWAIN driver, you can buy a set of TWAIN tools for VB (one source: http://www.leadtools.com/SDK/Raster/Raster-Scanning-Twain.htm). This will allow you to manipulate settings for the image capture, but will only get you the raw data (either as an image file, like JPG, or as raw bits). You then have to figure out how to get that into your destination document, be it Word or other format.
Here’s some free code to do that
http://www.planetsourcecode.com/vb/scripts/ShowCode.asp?txtCodeId=35117&lngWId=1
I have used the wang image control built into NT4 for this. I have also used the Kodak Image control built into Windows 2000. The Kodak control is an enhanced version of the Wang control and has the same object model. Windows XP does not contain the Kodak imaging control.
The sample code below illustrates using the Kodak control to scan a doc to the filename that is passed to the ScanTheImage function. The Kodak control is named ImgScan1. If you compile this on a machine with the Kodak control, it will work on machines that have either the Kodak or the Wang control. We’ve scanned over 2 million pages into our imaging system using Kodak and Wang.
Private Function ScanTheImage(ByVal TheImageFile As String) As Boolean
Dim ReturnValue As Long
Dim TestString As String
ReturnValue = ImgScan1.OpenScanner()
ImgScan1.PageOption = 2
ImgScan1.FileType = 1
ImgScan1.PageType = 1
ImgScan1.CompressionType = 4
ImgScan1.CompressionInfo = 1
ImgScan1.ScanTo = 1
ImgScan1.image = TheImageFile
ImgScan1.ShowSetupBeforeScan = True
ImgScan1.MultiPage = True
ReturnValue = ImgScan1.StartScan()
ImgScan1.CloseScanner
TestString = Dir(TheImageFile)
If TestString “” Then
ScanTheImage = True
End If
End Function
I also have samples for using the Kodak Imaging Professional Admin control and the Davinci Barcode Reader Control for manipulating files. For example, in my system users can use a barcoded cover sheet to append additional pages to an existing file or to replace an existing file. Unfortunately, EIStream is no longer selling Kodak Imaging Professional.