Ⅰ 求解:(VB6.0)如何在程序中调用打开pdf文件
下面的代码是调用系统默认程序打开PDF,注意修改文件路径D:\help.pdf
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Const SW_SHOWNORMAL = 1
Private Sub Command1_Click()
Dim result
result = ShellExecute(0, vbNullString, "D:\help.pdf", vbNullString, vbNullString, SW_SHOWNORMAL)
If result <= 32 Then
MsgBox "打开失败!", vbOKOnly + vbCritical, "错误:", 0
End If
End Sub
Ⅱ VB怎么利用pdf.ocx读取PDF内容
'不就是打开PDF吗
下面是代码
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hWnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Dim Sfile as string
Dim lR As Long
sfile="文件路径"
lR = ShellExecute(Me.hWnd, "Open", sfile, "", "", vbNormalFocus)
Ⅲ 请问VB如何打开pdf文件并读取其内容
分类: 电脑/网络 >> 操作系统/系统故障
问题描述:
请问VB如何打开pdf文件并读取其内容?我要用VB读取PDF的部分文件内容到变量中,以便给另一个程序使用.谢谢.
解析:
vbgood/viewthread.php?tid=36133
book.21/info/vb/api/4057
参考一下吧
Ⅳ vb打开pdf图片文件并保存为图片
方法一:photoshop软件
首先打开photoshop软件,然后你可以看见该文档中所有的页面。在左上角选择页面(你可以试试选择图片,可以把PDF中所有的图片提取出来),右面红框内的选项全部默认。然后选择需要保存成图片的页面(可以多选),最后点击确认。
现在返回了ps的主界面,你就可以将PDF页面保存成图片了。当然你也可以通过编辑选择你需要保存的部分再保存。如果保存整个页面的话,就直接点击文件>存储为即可。
在接下来的界面中,先选择保存的地方,然后在格式这一栏,点击小三角打开下拉菜单,选择jpeg格式。对于文件名,你可以自己命名,但我建议就用默认的,默认的为PDF文件名加页码,这样对于比较多的页码时便于整理编辑。最后点击保存。
方法二:万兴PDF
软件打开以后,点击软件界面左侧的“PDF转换成其他文件”,然后在选择里面的“文件转图片”功能,利用这个功能即可将PDF文件保存为高清图片。
接下来需要点击软件下方的“添加文件”选项,添加需要进行需要进行转换的PDF文档。
文档添加完成以后,点击软件右上角的文件夹按钮,选择需要保存的位置。
最后点击软件下方的“开始转换”按钮,这样PDF文档就可以成功的保存为高清图片了。
PDF另存为图片的介绍就到这了,万兴PDF建议大家如果说办公经常能够用到PDF的话。那么开通会员的话是非常有必要的。因为可以为大家节省很多时间
Ⅳ 用vb如何得到一个pdf文档属性
你的问题可以这样解决:
首先你要使用vb
api函数以及api结构:
Public
Type
BY_HANDLE_FILE_INFORMATION
dwFileAttributes
As
Long
ftCreationTime
As
FILETIME
ftLastAccessTime
As
FILETIME
ftLastWriteTime
As
FILETIME
dwVolumeSerialNumber
As
Long
nFileSizeHigh
As
Long
nFileSizeLow
As
Long
nNumberOfLinks
As
Long
nFileIndexHigh
As
Long
nFileIndexLow
As
Long
End
Type
Public
Type
OFSTRUCT
cBytes
As
Byte
fFixedDisk
As
Byte
nErrCode
As
Integer
Reserved1
As
Integer
Reserved2
As
Integer
szPathName(OFS_MAXPATHNAME)
As
Byte
End
Type
Public
Declare
Function
OpenFile
Lib
"kernel32"
Alias
"OpenFile"
(ByVal
lpFileName
As
String,
lpReOpenBuff
As
OFSTRUCT,
ByVal
wStyle
As
Long)
As
Long
Public
Declare
Function
GetFileInformationByHandle
Lib
"kernel32"
Alias
"GetFileInformationByHandle"
(ByVal
hFile
As
Long,
lpFileInformation
As
BY_HANDLE_FILE_INFORMATION)
As
Long
关键的语句是:
dim
lp
as
OFSTRUCT;
DIM
FILEINFO
AS
BY_HANDLE_FILE_INFORMATION
filehandle=openfile(“aa。pdf”,lp,OF_READ)
getfileinformationbyHandle
filehandle,FILEINFO
这个FILEINFO就是你要的文件的所有属性的一个vb定义的结构,得到这个结构
你就可以得到文件所有的属性。
你还可以查阅vb
api函数的帮助,对你解决问题有帮助,祝好运!
Ⅵ 如何用VB取PDF页面的长宽
首先你要确保电脑上安装了adobe acrobat professional 软件,如没有,请自行下载。
打开需要提取的pdf文件。
点击“文档”——“提取页面”——输入需要提取的页码。如果需要每一页都独立成文件,需要复选“提取页面为单独文件”;如果需要提取后在原文件后删掉已提取的页面,需要复选“提取后删除页面”。
保存提取后的文件。点击“另存为”。
找到提取后的文件。在刚刚的存储路径寻找即可。