ShowScanPage Example VB

This example shows how to insert a scanned page before page 1 of an existing image.

Private Sub cmdInsert_Click()
     'Use the ImgAdmin control to select a file for display
     'in the ImgEdit control.
     ImgAdmin1.ShowFileDialog OpenDlg  '0
     ImgEdit1.Image = ImgAdmin1.Image
     ImgEdit1.Display
     'For insert or append, set the Scan control's
     'Image property.
     ImgScan1.Image = ImgAdmin1.Image
     'MultiPage property must be set to True in order to
     'create files with more than one page.
     ImgScan1.MultiPage = True
     ImgScan1.PageOption = InsertPages '3
     ImgScan1.Page = 1
     ImgScan1.FileType = TIFF '1
     'Scan using the Scan Page dialog box.
     ImgScan1.ShowScanPage 
End Sub