J
jhansen
I am using Accusoft ImageGear to display images in my application. In
order to pass the image to my function, I am calling
Application.FileSearch.FoundFiles and randomly getting Run-Time Error
9: Subscript out of Range. I realize that the FoundFiles is an object
that contains the names of all the files found during a search, but I
am only working with 9 files.
Private Sub btnPrevPage_Click()
Dim nIdx As Integer
Dim sFoundFiles As String
nIdx = igImage.PrevPageMultJPG(Me!txtPageNum, Me!txtPageCount)
sFoundFiles = Application.FileSearch.FoundFiles(nIdx)
igImage.LoadImageMultJPG sFoundFiles, , Me!txtPageNum,
Me!txtPageCount
End Sub
order to pass the image to my function, I am calling
Application.FileSearch.FoundFiles and randomly getting Run-Time Error
9: Subscript out of Range. I realize that the FoundFiles is an object
that contains the names of all the files found during a search, but I
am only working with 9 files.
Private Sub btnPrevPage_Click()
Dim nIdx As Integer
Dim sFoundFiles As String
nIdx = igImage.PrevPageMultJPG(Me!txtPageNum, Me!txtPageCount)
sFoundFiles = Application.FileSearch.FoundFiles(nIdx)
igImage.LoadImageMultJPG sFoundFiles, , Me!txtPageNum,
Me!txtPageCount
End Sub