[AccessD] WIAaut, Microsoft Windows Image Acquisition Automation Layer

Hi Gustav:

I have the same problem with an old HP Scan jet that also uses some
proprietary SCSI card. I never have been able to get the piece of hardware
to be recognized by any other programs.(?) A newer model scanner seems to
have no problem. If you run into an answer please let me know and I will do
some further investigation on my part.

Maybe check the driver dll that was sent with the scanner originally and it
might give you a clue.  It must be a odd address call.

Jim 

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock
Sent: Saturday, February 19, 2005 12:35 PM
To: accessd at databaseadvisors.com
Subject: [AccessD] WIAaut, Microsoft Windows Image Acquisition Automation
Layer

Hi all

I'm having trouble with this. 

I have a scanner installed which works fine with the GUI and MS
Document Imaging etc. of Office 2003.
However, my code - taken from the sample around - will not count my
scanner.
No errors, just no count.
What is missing?

  Dim CommonDialog1 As Object
  Dim DeviceManager1 As Object
  Dim i As Integer

  Set DeviceManager1 = CreateObject("WIA.DeviceManager")
  Set CommonDialog1 = CreateObject("WIA.CommonDialog")

  For i = 1 To DeviceManager1.DeviceInfos.Count
    MsgBox DeviceManager1.DeviceInfos(i).Properties("Name").Value &
vbCrLf & _
      "(" & DeviceManager1.DeviceInfos(i).DeviceID & ")"
  Next

WiaAut.dll is even referenced correctly. I obtained it here:

http://www.microsoft.com/downloads/details.aspx?FamilyID=a332a77a-01b8-4de6-
91c2-b7ea32537e29&DisplayLang=en#filelist

The scanner is Agfa SnapScan 1236 via SCSI, old and a bit slow but OK.
OS is WinXP SP2.

/gustav
-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com