This is a fully functional DLL that can be incorporated in to virtually any Windows Program. We have provided some sample
source code to show how you could use this DLL in your program
Visual Basic
Add a refernce to the DLL in the Project
- In Visual Basic, click on the 'Project' menu, then click on 'References'
- Click the 'Browse' button and find the TiffPageCountDll.dll
- Double Click it so that it appears in your 'Available References' Page (it will show up in the references as 'SC')
Include this code in the beginning part of your program (or you could put this in your module)
Dim PageCountObj As New SCTiffPageCount.TiffPageCountv1
Now, create a sub or function to get the page count, (the following is a sample you could use):
Public Function GetPages(UseFileName as String) As Long
GetPages = PageCountObj.Tiff_PageCount(UseFileName)
End Function
The 'UseFileName' is the variable that contains the FULL path to the TIFF file.
To call the function and get the number of pages in the TIFF file, you could use the following:
msgbox("Number of Pages: " & GetPages("c:\temp\testtiff.tif"))
Cold Fusion
<cfobject type="com"
action="create"
class="SCTiffPageCount.TiffPageCountv1"
name="tiffcount">
return status 0 means filename not found
return status -1 general error
return status -2 means not a tiff file
<cfset filename = "<FULL PATH AND FILENAME of a valid TIFF FILE>">
<cfset pagecount = tiffcount.tiff_pagecount(filename)>
<cfoutput>
#filename# - #pagecount# Pages
</cfoutput>
ASP
Copy and Paste the following source code in to a test.asp page on your web server:
return status 0 means filename not found
return status -1 general error
return status -2 means not a TIFF file
<%
Set Obj = Server.CreateObject("SCTiffPageCount.TiffPageCountv1")
dim filename
dim pages
filename = "<FULL PATH AND FILENAME of a valid TIFF FILE>"
pages = Obj.Tiff_PageCount(cstr(filename))
Response.Write("<BR>" & filename & " :- <li>" & CStr(pages) & " Pages</li>")
Set Obj = Nothing
%>
home
