Hello,
I "suppose", to know how many pages a pdf file has, I should use this line:
pdf.Index.Count
Where pdf is a "PdfDocument".
I do not know if I'm wrong, but I can not run that line.
*************************************
Public Sub Form_Open()
Dim index As Short = 1
Dim pdf As New PdfDocument
Dim pc As Picture
With pdf
.Open("/path/of/my/file.pdf")
If .Ready = True Then
' It loads first page:
pc = pdf[1].Image.Picture
PictureBox1.Picture = pc
PictureBox1.Resize(pdf[1].Width, pdf[1].Height)
Else
Message.Error("<FONT color=darkred><B>Unable loading file pdf !")
Quit
Endif
End With
Print pdf.Index.Count ' <=======
End
****************************************************
I obtain at that line this error notice:
" Null object "
I do not understand....
Regards
vuott
------------------------------------------------------------------------------
Start Your Social Network Today - Download eXo Platform
Build your Enterprise Intranet with eXo Platform Software
Java Based Open Source Intranet - Social, Extensible, Cloud Ready
Get Started Now And Turn Your Intranet Into A Collaboration Platform
http://p.sf.net/sfu/ExoPlatform
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user
