ADF Scanning with WIA using WIA_DPS_PAGES
ADF Scanning with WIA using WIA_DPS_PAGES
ADF Scanning with WIA using WIA_DPS_PAGES
ADF Scanning with WIA using WIA_DPS_PAGES
ADF Scanning with WIA using WIA_DPS_PAGES
ADF Scanning with WIA using WIA_DPS_PAGES ADF Scanning with WIA using WIA_DPS_PAGES ADF Scanning with WIA using WIA_DPS_PAGES ADF Scanning with WIA using WIA_DPS_PAGES ADF Scanning with WIA using WIA_DPS_PAGES ADF Scanning with WIA using WIA_DPS_PAGES ADF Scanning with WIA using WIA_DPS_PAGES ADF Scanning with WIA using WIA_DPS_PAGES
ADF Scanning with WIA using WIA_DPS_PAGES ADF Scanning with WIA using WIA_DPS_PAGES
ADF Scanning with WIA using WIA_DPS_PAGES
Go Back  Xtreme Visual Basic Talk > > > ADF Scanning with WIA using WIA_DPS_PAGES


Reply
 
Thread Tools Display Modes
  #1  
Old 10-05-2007, 07:02 AM
dclar2 dclar2 is offline
Freshman
 
Join Date: Mar 2006
Posts: 36
Default ADF Scanning with WIA using WIA_DPS_PAGES


I am using WIA to automate a scanning process. The scanner I am using is an HP 5550C with an automatic document feeder. I can scan one page using the ADF, but it only scans the first page. I looked at the WIA driver for this scanner, and it does not give any options dictating how many pages to scan. I believe I have to do it within the WIA code. The only command I can find to do this is the WIA_DPS_PAGES property. This property is supposed to be a property of the WIA object, but I am unable to locate it and figure out how to use it. I have search the forum and also googled it, with no success. Can anyone give me an example on how to use this property?

Thanks
__________________
The most likely way for the world to be destroyed, most experts agree, is by accident. That's where we come in; we're computer professionals. We cause accidents
Reply With Quote
  #2  
Old 10-05-2007, 07:52 PM
gazmac's Avatar
gazmac gazmac is offline
Junior Contributor
 
Join Date: Apr 2003
Posts: 200
Default

It would be hard to help out considering I do not have the scanner you're trying to interface with, and it would be great if someone with specialist knowledge on the subject could jump in here, but seen as nobody has replied yet I'll give it a shot.

Do you have a copy of the API library you're using to try and achieve this, and if so, what about any supporting documentation? Also, the code you're using at the moment to scan pages would be great as it could be something much simpler than a problem with your API coding.
Reply With Quote
  #3  
Old 10-08-2007, 07:09 AM
dclar2 dclar2 is offline
Freshman
 
Join Date: Mar 2006
Posts: 36
Default ADF Scanning with WIA using WIA_DPS_PAGES

Thanks for the help. Here is the code that I am using to scan a document.

Code:
        Dim WiaCD As WIA.CommonDialog
        Dim WiaDev As WIA.Device = Nothing
        Dim Itm As WIA.Item = Nothing
        Dim ItmProp As WIA.Property
        Dim varDPI As Integer = 300 'dots per inch

        'Loop through each item/property
        For Each Itm In WiaDev.Items
            For Each ItmProp In Itm.Properties

                Select Case ItmProp.PropertyID
                    Case 6147   ' Horizontal Resolution
                        ItmProp.Value = varDPI

                    Case 6148   ' Vertical Resolution
                        ItmProp.Value = varDPI

                    Case 6151   ' Horizontal Extent (Scanning Area)
                        ItmProp.Value = varHorizontalExtent * varDPI

                    Case 6152   ' Vertical Extent (Scanning Area)
                        ItmProp.Value = varVerticalExtent * varDPI

                    Case 6149   ' Horizontal Starting Position (Scanning Area)
                        ItmProp.Value = 0

                    Case 6150   ' Vertical Starting Position (Scanning Area)
                        ItmProp.Value = 0

                    Case 6146   ' Current Intent
                        ItmProp.Value = 1     '4 is Black-white,gray is 2, color 1

                        'Case 3096
                        '   ItmProp.Value = 0
                End Select
            Next           
        Next

        'Acquire image

        Dim Item As WIA.Item = WiaDev.Items(1) 'the needed ITEM object.         

        Dim img As WIA.ImageFile = Item.Transfer 'transfers the image

        'Compress as a Tiff
        Dim ImageProcess1 As New WIA.ImageProcess
        ImageProcess1.Filters.Add(ImageProcess1.FilterInfos("Convert").FilterID)
        ImageProcess1.Filters(1).Properties("FormatID").Value = WIA.FormatID.wiaFormatTIFF 'converts to TIFF format. 
        ImageProcess1.Filters(1).Properties("Quality").Value = 100
        img = ImageProcess1.Apply(img)

        'Save to file
        img.SaveFile(varImageFileName)
__________________
The most likely way for the world to be destroyed, most experts agree, is by accident. That's where we come in; we're computer professionals. We cause accidents
Reply With Quote
  #4  
Old 10-09-2007, 01:43 PM
dclar2 dclar2 is offline
Freshman
 
Join Date: Mar 2006
Posts: 36
Default

I have figured out a solution to my issue. I simply used the following code in place of the previously mentioned code.

Code:
        'Acquire image
        Dim Item As WIA.Item = WiaDev.Items(1) 'the needed ITEM object.
        Dim img As WIA.ImageFile

        For x As Integer = 0 To 500
            Try
                img = Item.Transfer 'transfers the image

                'Compress as a jpg
                Dim ImageProcess1 As New WIA.ImageProcess
                ImageProcess1.Filters.Add(ImageProcess1.FilterInfos("Convert").FilterID)
                ImageProcess1.Filters(1).Properties("FormatID").Value = WIA.FormatID.wiaFormatJPEG 'converts to JPG format. 
                ImageProcess1.Filters(1).Properties("Quality").Value = 60
                img = ImageProcess1.Apply(img)

                'Save to file
                img.SaveFile(varImageFileName)

                'Crop
                AutoCrop()

            Catch ex As Exception
                If InStr(ex.Message, "Exception from HRESULT: 0x80210003") Then
                    Exit For
                Else  
                End If
            End Try
        Next

        'Clean up
        WiaCD = Nothing
        WiaDev = Nothing
        Itm = Nothing
        ItmProp = Nothing
        Item = Nothing
I seriously doubt someone is going to try and scan over 500 pages for this application. So I just put it in a for...next and then tested for the error that is generated when the ADF is empty.

Anyone got any better solutions to multi page scanning, then this one?
__________________
The most likely way for the world to be destroyed, most experts agree, is by accident. That's where we come in; we're computer professionals. We cause accidents
Reply With Quote
  #5  
Old 10-10-2007, 07:18 AM
dclar2 dclar2 is offline
Freshman
 
Join Date: Mar 2006
Posts: 36
Default

Ok, I was wrong. The code I posted only worked once or twice. Now when I run the previously posted code, it runs thru the for statement the first time correctly. Then on the second time thru the for loop I get an error of "Value does not fall within the expected range" on the line img = Item.Transfer 'transfers the image. Does any one have any ideas on what could be causing this? Not sure if this helps or not, but the Inner exception doesnt show anything.

I did comment out the autocrop routine to make sure that it had nothing to do with some other code that is not posted.

Any help is really appreciated.
__________________
The most likely way for the world to be destroyed, most experts agree, is by accident. That's where we come in; we're computer professionals. We cause accidents
Reply With Quote
  #6  
Old 11-03-2007, 08:45 PM
lwright lwright is offline
Newcomer
 
Join Date: Nov 2007
Posts: 3
Default ADF Scanning with WIA using WIA_DPS_PAGES

Hi,

Did you have any luck with this? I'm trying to do the same thing with an HP Scanjet 6300 & VB6.

I've been able to get it to scan multiple pages OK but the problem is that I can't get it to stop. Here is my code:

If wiadev Is Nothing Then
' WiaDev is defined globally
Set wiadev = WiaObj.ShowSelectDevice(WIA.WiaDeviceType.ScannerDeviceType, True, False)
End If

Dim itm As WIA.Item
Dim ItmProp As WIA.Property

'For Each itm In wiadev.items
Dim items As WIA.items
'Set items = WiaObj.ShowSelectItems(wiadev)

'For Each itm In items

For Each itm In wiadev.items
For Each ItmProp In itm.Properties
'Print ItmProp
Select Case ItmProp.PropertyID
Case 6147: ' Horizontal Resolution
ItmProp.Value = 150
Case 6148: ' Vertical Resolution
ItmProp.Value = 150
Case 6151: ' Horizontal Extent (Scanning Area)
ItmProp.Value = 1275
Case 6152: ' Vertical Extent (Scanning Area)
ItmProp.Value = 550
Case 6149: ' Horizontal Starting Position (Scanning Area)
ItmProp.Value = 0
Case 6150: ' Vertical Starting Position (Scanning Area)
ItmProp.Value = 0
Case 6146: ' Current Intent
ItmProp.Value = 4 ' Text or Line Art
End Select
Set NextNextWiaImg = WiaObj.ShowTransfer(itm)
tmrStop.Enabled = True
Next
Next
End Sub
Reply With Quote
  #7  
Old 12-04-2007, 03:18 PM
Mike Barta Mike Barta is offline
Newcomer
 
Join Date: Dec 2007
Posts: 2
Default

Ditto... any update... same problem with a HP Officejet 7310 all in one printer.
First document pass from the feeder is ok, then I get the error "value does not fall within expected range".

Interesting thing I noticed(probably unrelated but stating it anyway), if a single document is in the feeder everything works excellent. If more than one document is in the feeder, the first document image is complete, but the feeder doesn't seem to eject the document and I get the error stated above.
Reply With Quote
  #8  
Old 12-04-2007, 05:38 PM
Mike Barta Mike Barta is offline
Newcomer
 
Join Date: Dec 2007
Posts: 2
Default

I found this article on the MSDN site http://support.microsoft.com/default...b;EN-US;261820 and it indicates this is a limitation of WIA.

I found a work around...
The property that indicates there is another document is correct, so after checking this property I destroy all WIA objects and scan again.

Sample...
Code:
  Dim _WiaDlg As New WIA.CommonDialog
  Dim _WiaDev As WIA.Device

  ' Scanner only device properties (DPS)
  Public Const WIA_RESERVED_FOR_NEW_PROPS As UInteger = 1024
  Public Const WIA_DIP_FIRST As UInteger = 2
  Public Const WIA_DPA_FIRST As UInteger = WIA_DIP_FIRST + WIA_RESERVED_FOR_NEW_PROPS
  Public Const WIA_DPC_FIRST As UInteger = WIA_DPA_FIRST + WIA_RESERVED_FOR_NEW_PROPS
  Public Const WIA_DPS_FIRST As UInteger = WIA_DPC_FIRST + WIA_RESERVED_FOR_NEW_PROPS
  Public Const WIA_DPS_DOCUMENT_HANDLING_STATUS As UInteger = WIA_DPS_FIRST + 13
  Public Const WIA_DPS_DOCUMENT_HANDLING_SELECT As UInteger = WIA_DPS_FIRST + 14
  Public Const FEEDER As UInteger = 1
  Public Const FLATBED As UInteger = 2
  Public Const FEED_READY As UInteger = 1


  Private Sub UseFeeder()
    Dim hasMorePages As Boolean = True
    Dim WiaItem As WIA.Item = Nothing
    Dim iCnt As Integer = 0
    Dim WiaImgF(0) As WIA.ImageFile
    Try
      Do
        _WiaDev = Nothing  'Do this everytime
        WiaImgF(iCnt) = Nothing
        SetResolution(WiaItem, WiaImageIntent.ColorIntent)
        WiaImgF(iCnt) = _WiaDlg.ShowTransfer(WiaItem) 'transfers the image

        Dim documentHandlingSelect As [Property] = Nothing
        Dim documentHandlingStatus As [Property] = Nothing

        For Each prop As [Property] In _WiaDev.Properties
          If prop.PropertyID = WIA_DPS_DOCUMENT_HANDLING_SELECT Then
            documentHandlingSelect = prop
          End If
          If prop.PropertyID = WIA_DPS_DOCUMENT_HANDLING_STATUS Then
            documentHandlingStatus = prop
          End If
        Next
        hasMorePages = False 'assume there are no more pages
        If Not (documentHandlingSelect Is Nothing) Then 'may not exist on flatbed scanner but required for feeder
          'check for document feeder
          If ((Convert.ToUInt32(documentHandlingSelect.Value) And FEEDER) <> 0) Then
            hasMorePages = ((Convert.ToUInt32(documentHandlingStatus.Value()) And FEED_READY) <> 0)
          End If
        End If
        If hasMorePages Then
          iCnt += 1
          ReDim Preserve WiaImgF(iCnt)
        End If
      Loop While hasMorePages
    Catch ex As Exception
      MsgBox("Error trying to scan image." & vbCrLf & ex.Message)
    End Try
End Sub

Last edited by Mike Barta; 12-04-2007 at 05:40 PM. Reason: Updated code area
Reply With Quote
  #9  
Old 01-24-2008, 05:15 AM
lwright lwright is offline
Newcomer
 
Join Date: Nov 2007
Posts: 3
Default ADF Scanning with WIA using WIA_DPS_PAGES

OK folks I think I've worked it out for VB6. This seems to work fine. As soon as the paper runs out it stops. I am using HP Scanjet 6300.

In the declarations section of a module:
Public Const WIA_DPS_DOCUMENT_HANDLING_SELECT_FEEDER As Integer = 1
Public Const WIA_DPS_DOCUMENT_HANDLING_SELECT_FLATBED As Integer = 2

Public Const WIA_DPS_DOCUMENT_HANDLING_STATUS_FEED_READY As Integer = 1

Public Const WIA_PROPERTIES_WIA_RESERVED_FOR_NEW_PROPS As Integer = 1024
Public Const WIA_PROPERTIES_WIA_DIP_FIRST As Integer = 2
Public Const WIA_PROPERTIES_WIA_DPA_FIRST As Integer = WIA_PROPERTIES_WIA_DIP_FIRST + WIA_PROPERTIES_WIA_RESERVED_FOR_NEW_PROPS
Public Const WIA_PROPERTIES_WIA_DPC_FIRST As Integer = WIA_PROPERTIES_WIA_DPA_FIRST + WIA_PROPERTIES_WIA_RESERVED_FOR_NEW_PROPS

Public Const WIA_PROPERTIES_WIA_DPS_FIRST As Integer = WIA_PROPERTIES_WIA_DPC_FIRST + WIA_PROPERTIES_WIA_RESERVED_FOR_NEW_PROPS
Public Const WIA_PROPERTIES_WIA_DPS_DOCUMENT_HANDLING_STATUS As Integer = WIA_PROPERTIES_WIA_DPS_FIRST + 13
Public Const WIA_PROPERTIES_WIA_DPS_DOCUMENT_HANDLING_SELECT As Integer = WIA_PROPERTIES_WIA_DPS_FIRST + 14

Public Const WIA_ERRORS_BASE_VAL_WIA_ERROR As Double = 2149646336#
Public Const WIA_ERRORS_WIA_ERROR_PAPER_EMPTY As Double = WIA_ERRORS_BASE_VAL_WIA_ERROR + 3



In the declarations section of a Class Module (you might be able to use a nomal module I don't know)

Dim WithEvents WiaManager As WIA.DeviceManager '
Dim WiaObj As New WIA.CommonDialog
Dim WiaImg As New WIA.ImageFile
Dim WiaDev As WIA.Device

Private ScannedPages

Public Event ScannerEventOccured(EventID As String, DeviceID As String, ItemID As String)

Public Event ReportState(statusText As String)

Public Event OnPageComplete()
Public Event OnScanningComplete(count As Integer)


In the rest of the Class Module:

Private Sub Class_Initialize()
Set WiaManager = New WIA.DeviceManager
Set WiaObj = New WIA.CommonDialog
'Set WiaItm = New WIA.Item
Set WiaImg = New WIA.ImageFile
'Dim WiaDev As WIA.Device


'If WiaDev Is Nothing Then
'WiaDev is defined globally
'Set WiaDev = WiaObj.ShowSelectDevice(WIA.WiaDeviceType.ScannerDeviceType, True, False)
'End If

End Sub

Public Function InitScanner(ByVal DeviceID As String) As String

If WiaDev Is Nothing Then
' WiaDev is defined globally

If DeviceID = "" Then
RaiseEvent ReportState("No Device Specified. Showing all devices. User please select a scanner to use.")
Set WiaDev = WiaObj.ShowSelectDevice(WIA.WiaDeviceType.ScannerDeviceType, True, False)
Else
RaiseEvent ReportState("Device that will be used: " + DeviceID)
Dim manager As DeviceManager
Set manager = New DeviceManager
Dim d As Device
Set d = Nothing
Dim info As DeviceInfo
For Each info In manager.DeviceInfos
If (info.DeviceID = DeviceID) Then
RaiseEvent ReportState("Connecting To Device")
On Error Resume Next
Set d = info.Connect
If Err.Number <> 0 Then
RaiseEvent ReportState("Error Connecting To Device")
Exit For
End If
Set WiaDev = d
Exit For
End If
Next

'WiaObj.se

End If

If Not WiaDev Is Nothing Then
'here all the events supported will be registered for above device
For Each e In WiaDev.Events
'MsgBox e.EventID & " - " & e.Name
RaiseEvent ReportState("Register Supported Event " + e.EventID & " - " & e.Name)
WiaManager.RegisterEvent e.EventID
Next
Else
RaiseEvent ReportState("No WIA Device. Cannot Register Events.")
End If
End If


End Function

Public Function ScanPages(ByVal iHorizontalResolution As Integer, _
ByVal iVerticalResolution As Integer, _
ByVal iHorizontalExtent As Integer, _
ByVal iVerticalExtent As Integer, _
ByVal iHorizontalStartingPosition As Integer, _
ByVal iVerticalStartingPosition As Integer, _
ByVal iCurrentIntent As Integer)

Dim wiaPage As WIA.Item
Dim wiaPages As Items
Set wiaPages = Nothing
Set wiaPages = WiaDev.Items

Dim i As Integer
i = 0

RaiseEvent ReportState("Reading Scanner Properties")
Dim documentStatus As Integer
Dim Prop As WIA.Property
For Each Prop In WiaDev.Properties

Select Case Prop.PropertyID
Case WIA_PROPERTIES_WIA_DPS_DOCUMENT_HANDLING_SELECT:

RaiseEvent ReportState("Select Handling Current Value: " + CStr(Prop.Value))
RaiseEvent ReportState("Will Be Set for FEEDER")

Prop.Value = WIA_DPS_DOCUMENT_HANDLING_SELECT_FEEDER
Case 6147: ' Horizontal Resolution
Prop.Value = 150
Case 6148: ' Vertical Resolution
Prop.Value = 150
Case 6151: ' Horizontal Extent (Scanning Area)
Prop.Value = 1275
Case 6152: ' Vertical Extent (Scanning Area)
Prop.Value = 550
Case 6149: ' Horizontal Starting Position (Scanning Area)
Prop.Value = 0
Case 6150: ' Vertical Starting Position (Scanning Area)
Prop.Value = 0
Case 6146: ' Current Intent
Prop.Value = 4 ' Text or Line Art
End Select

If Prop.PropertyID = WIA_PROPERTIES_WIA_DPS_DOCUMENT_HANDLING_STATUS Then
documentStatus = CInt(Prop.Value)
End If
Next

'MsgBox documentStatus
For Each wiaPage In wiaPages
Do While True ' (documentStatus And &H1) = 1
RaiseEvent ReportState("Begin Scan Process")

'read doc status
For Each Prop In WiaDev.Properties
If Prop.PropertyID = WIA_PROPERTIES_WIA_DPS_DOCUMENT_HANDLING_STATUS Then
documentStatus = CInt(Prop.Value)
End If
Next
RaiseEvent ReportState("Document Status " + CStr(documentStatus))
Dim imageFileName As String
imageFileName = App.Path & "\" & CStr(i) + ".jpg"
RaiseEvent ReportState("Initiating Page Transfer")
On Error Resume Next
'Set WiaImg = WiaObj.ShowTransfer(wiaPage)
Set WiaImg = wiaPage.Transfer()
If Err.Number <> 0 Then
RaiseEvent ReportState("Error Occured. " + Err.Description + "(" + CStr(Err.Number) + ")")

RaiseEvent OnScanningComplete(i)
Exit Do
Exit For
Exit Function
End If

RaiseEvent ReportState("Saving Current File As " + imageFileName)


WiaImg.SaveFile (imageFileName)

'one page is completed
RaiseEvent OnPageComplete
i = i + 1
Loop

'destroy crt page !!!!!!!!!!!!!!!!!
Set wiaPage = Nothing

Next

RaiseEvent OnScanningComplete(i)

End Function

Private Sub WiaManager_OnEvent(ByVal EventID As String, ByVal DeviceID As String, ByVal ItemID As String)
RaiseEvent ScannerEventOccured(EventID, DeviceID, ItemID)
End Sub
Reply With Quote
  #10  
Old 01-29-2008, 03:02 PM
lwright lwright is offline
Newcomer
 
Join Date: Nov 2007
Posts: 3
Default

I got an email notification that someone had posted a question about the code I submitted but it doesn't seem to appear in the list. Anyway I'll answer as best I can. My code is actually VB6 rather than VB.net so I hope it's not off topic. I think VB.net people will still find the code useful.

Bhavesh,

It sounds like your using .net rather than VB6 so you might have to make some changes.

On my my scan button I have the following code:

Private Sub Command1_Click()

On Error GoTo CannotScanAsOfSettings
Dim HorizontalResolution As String
HorizontalResolution = GetFromINI("ScannerInfo", "HorizontalResolution", "150", App.Path & "\Settings.ini")

Dim VerticalResolution As String ' = 150
VerticalResolution = GetFromINI("ScannerInfo", "VerticalResolution", "150", App.Path & "\Settings.ini")

Dim HorizontalExtent As String ' = 1275
HorizontalExtent = GetFromINI("ScannerInfo", "HorizontalExtent", "1275", App.Path & "\Settings.ini")

Dim VerticalExtent As String '= 550
VerticalExtent = GetFromINI("ScannerInfo", "VerticalExtent", "550", App.Path & "\Settings.ini")

Dim HorizontalStartingPosition As String '= 0
HorizontalStartingPosition = GetFromINI("ScannerInfo", "HorizontalStartingPosition", "0", App.Path & "\Settings.ini")

Dim VerticalStartingPosition As String '= 0
VerticalStartingPosition = GetFromINI("ScannerInfo", "VerticalStartingPosition", "0", App.Path & "\Settings.ini")

Dim CurrentIntent As String '= 4
CurrentIntent = GetFromINI("ScannerInfo", "CurrentIntent", "4", App.Path & "\Settings.ini")

Dim SubFolderToSave As String
SubFolderToSave = GetFromINI("ScannerInfo", "SubFolderToSave", "Saved", App.Path & "\Settings.ini")

Dim QualityConversion As String
QualityConversion = GetFromINI("ScannerInfo", "QualityConversion", "50", App.Path & "\Settings.ini")


If HorizontalResolution <> "" And VerticalResolution <> "" And HorizontalExtent <> "" And VerticalExtent <> "" And HorizontalStartingPosition <> "" And _
VerticalStartingPosition <> "" And CurrentIntent <> "" Then

Dim iHorizontalResolution As Integer
iHorizontalResolution = CInt(HorizontalResolution)
Dim iVerticalResolution As Integer
iVerticalResolution = CInt(VerticalResolution)
Dim iHorizontalExtent As Integer
iHorizontalExtent = CInt(HorizontalExtent)
Dim iVerticalExtent As Integer
iVerticalExtent = CInt(VerticalExtent)
Dim iHorizontalStartingPosition As Integer
iHorizontalStartingPosition = CInt(HorizontalStartingPosition)
Dim iVerticalStartingPosition As Integer
iVerticalStartingPosition = CInt(VerticalStartingPosition)
Dim iCurrentIntent As Integer
iCurrentIntent = CInt(CurrentIntent)


Call oScannerHander.ScanPages(iHorizontalResolution, iVerticalResolution, iHorizontalExtent, iVerticalExtent, iHorizontalStartingPosition, iVerticalStartingPosition, iCurrentIntent, SubFolderToSave, CInt(QualityConversion))
Exit Sub
Else
GoTo CannotScanAsOfSettings
End If



CannotScanAsOfSettings:
ShowStatus "Cannot Perform Scan. No valid settings."
End Sub




I'm not sure why e is not declared. I didn't write this part of the code so I don't know.
Reply With Quote
  #11  
Old 02-01-2008, 11:04 AM
brvaland brvaland is offline
Newcomer
 
Join Date: Jan 2008
Posts: 2
Default

I really confused with the code above, i have manupulated the original code to vb.net project but i got the error on the variable "e" as mentioned.

I have attached the my project (vb.net | visual studio 2005), if someone amend the part of error message "e" will be much appreciated.

Is it possible to share some thoughts using TWAIN driver for the attached project will be much appreciated?

Thanks
Bhavesh
Attached Files
File Type: zip WiaScan.zip (162.2 KB, 443 views)
Reply With Quote
Reply


Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
 
Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is Off
HTML code is Off

Forum Jump

Advertisement:





Free Publications
The ASP.NET 2.0 Anthology
101 Essential Tips, Tricks & Hacks - Free 156 Page Preview. Learn the most practical features and best approaches for ASP.NET.
subscribe
Programmers Heaven C# School Book -Free 338 Page eBook
The Programmers Heaven C# School book covers the .NET framework and the C# language.
subscribe
Build Your Own ASP.NET 3.5 Web Site Using C# & VB, 3rd Edition - Free 219 Page Preview!
This comprehensive step-by-step guide will help get your database-driven ASP.NET web site up and running in no time..
subscribe
ADF Scanning with WIA using WIA_DPS_PAGES
ADF Scanning with WIA using WIA_DPS_PAGES
ADF Scanning with WIA using WIA_DPS_PAGES ADF Scanning with WIA using WIA_DPS_PAGES
ADF Scanning with WIA using WIA_DPS_PAGES
ADF Scanning with WIA using WIA_DPS_PAGES
ADF Scanning with WIA using WIA_DPS_PAGES ADF Scanning with WIA using WIA_DPS_PAGES ADF Scanning with WIA using WIA_DPS_PAGES ADF Scanning with WIA using WIA_DPS_PAGES ADF Scanning with WIA using WIA_DPS_PAGES ADF Scanning with WIA using WIA_DPS_PAGES ADF Scanning with WIA using WIA_DPS_PAGES
ADF Scanning with WIA using WIA_DPS_PAGES
ADF Scanning with WIA using WIA_DPS_PAGES
 
ADF Scanning with WIA using WIA_DPS_PAGES
ADF Scanning with WIA using WIA_DPS_PAGES
 
-->