- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]PDF转图片 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=90692)
-- 发布时间：2016/9/20 9:01:00
-- [求助]PDF转图片
小白参照以下方法，PDF文件有的可以转换，有的转换后变空白，什么原因呢？
第二种方法：引用第三方控件
引用附件中的PDFView.dll文件和PDFLibNet.dll文件以及gsdll32.dll文件，请拷贝到foxtable程序目录下
新建窗口，增加图片控件PictureBox1，新建按钮，代码如下
Dim Pdfv As new PDFView.ConvertPDF.PDFConvert
Dim pcb As WinForm.PictureBox = e.form.Controls("PictureBox1")
pcb.Image = Pdfv.GetPageFromPDF(ProjectPath & "Hello.pdf",1)
-- 发布时间：2016/9/20 9:26:00
--
PDF文件第一页就是空白页吧，上传PDF文件测试
-- 发布时间：2016/9/20 10:19:00
--
附件中2个pdf文件，一个可以，I682-15显示空白，可以识别页数的。
[此贴子已经被作者于2016/9/20 10:18:57编辑过]
-- 发布时间：2016/9/20 10:44:00
--
那是第三方组件本身的问题，没有办法
换个方式使用吧
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目110.table |
-- 发布时间：2016/9/20 10:59:00
--
有dll 文件吗？ 未声明？
_pdfWrapper.CurrentPage = 1
-- 发布时间：2016/9/20 11:33:00
--
看全局代码。用的的就是原来的第三方组件PDFLibNet.dll
-- 发布时间：2016/9/20 15:25:00
--
打开窗口后就显示，我这样的代码，有问题吗？表A，第一列 是文件列。
，第一列 插入了2个文件，1个可以打开。一个错误,关键字没有在字典中，什么原因？
Dim dr As DataRow = Tables("表A").Current.DataRow
Dim fl As String = dr("第一列")
msgbox(fl)
\'
_pdfWrapper.LoadPDF(fl)
Dim Pdfv As new PDFView.ConvertPDF.PDFConvert
Dim pcb As WinForm.PictureBox = e.form.Controls("PictureBox1")
_pdfWrapper.CurrentPage = 1
pcb.Image = _pdfWrapper.Pages(_pdfWrapper.CurrentPage).GetBitmap(pcb.Width, pcb.Height,True)
-- 发布时间：2016/9/20 15:29:00
--
用4楼的例子打开这个pdf有没有问题？
-- 发布时间：2016/9/20 15:32:00
--
用4楼的例子打开这个pdf没有问题
-- 发布时间：2016/9/20 15:39:00
--
那就不是这里代码问题，检查一下其它地方
调试技巧：http://www.foxtable.com/webhelp/scr/1485.htm