| |
VB.NET - Ein- und UmsteigerParameter für das Scannen mit WIA festlegen | | | Autor: Balthasar von Graffenried | Datum: 02.08.15 20:30 |
| Hallo Comunity
Ich versuche gerade ein Programm zu entwickeln bei dem ich einen Dokumentenscanner integrieren will.
Dabei verwende ich die WIA Methode
Ich kann bereits einen Dialog öffnen und dann Parameter eingeben und ein Bild scannen.
Doch nun möchte ich das bestimmte Parameter schon im vorraus festgelegt sind wie den Scanner, das Papierformat, und die Art des Bildes(Graustufe, Farbe etc)
Mein Ziel ist das ich die Parameter nicht bei jedem Scan neu festlegen muss.
Ausserdem würde ich gerne auch den ADF meines Scanners verwenden und mehrere Dokumente einscannen doch er liest immer nur eines ein.
Ich habe mich in Google dumm und dämlich gesucht, und auch hier konnte ich nicht finden was mir weiterhilft.
Mein Code bis jetzt Sieht so aus:
Dim CommonDialog1 As New WIA.CommonDialog
ScanItem = New ScannerItems
ScanItem.ID = frMainManagerForm.Setting.SetNewID( _
frMainManagerForm.Setting.Scanner.Items.Count, "scn")
ScanItem.Name = "SCN" & Now.Date.ToShortDateString.Replace(".", "") _
& "_" & SetNewID(PageCounter) & ".jpg"
ScanItem.Path = Application.StartupPath & "\Setting\ScanTemp"
ScanItem.FullPath = ScanItem.Path & "\" & ScanItem.Name
Dim FileName As String = ScanItem.Name.Remove(ScanItem.Name.Length _
- 4, 4)
trvDocument.Nodes(0).Nodes.Add(FileName & "(" & ScanItem.ID & ")")
Dim image As New WIA.ImageFile
image = CommonDialog1.ShowAcquireImage( _
WIA.WiaDeviceType.ScannerDeviceType, _
WIA.WiaImageIntent.UnspecifiedIntent, _
WIA.WiaImageBias.MaximizeQuality, , True, False, True)
image.SaveFile(ScanItem.FullPath)
image = Nothing
ScanItem.Image = New Bitmap(ScanItem.FullPath)
frMainManagerForm.Setting.Scanner.Items.Add(ScanItem)
pbxPagePreview.Image = image
trvDocument.ExpandAll()
PageCounter += 1 Ich wäre echt froh wenn mir jemand helfen kann, weiss jemand wie man mit dieser Methode alle installierten Geräte auflistet, oder eines wählt. Weiss jemand wie man Parameter wie Papierformat und Bildart festlegt, und wie man den Dialog überspringen kann?
Ich freue mich auf eine angeregte diskusion. | |
| Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
|
|
Neu! sevDTA 3.0 Pro
SEPA mit Kontonummernprüfung
Erstellen von SEPA-Dateien mit integriertem BIC-Verzeichnis und Konto- nummern-Prüfverfahren, so dass ungültige Bankdaten bereits im Vorfeld ermittelt werden können. Weitere InfosTipp des Monats Access-Tools Vol.1
Über 400 MByte Inhalt
Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB
Nur 24,95 EURWeitere Infos
|
|
|
Copyright ©2000-2024 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|