| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 3083 人关注过本帖
标题:各位好!读取pdf(不是图片格式)文档中的某些内容,可以用vfp代码实现吗, ...
取消只看楼主 加入收藏
jjoojj
Rank: 1
等 级:新手上路
帖 子:59
专家分:0
注 册:2014-8-12
结帖率:16.67%
收藏
已结贴  问题点数:20 回复次数:6 
各位好!读取pdf(不是图片格式)文档中的某些内容,可以用vfp代码实现吗,谢谢帮忙!
各位好!读取pdf(不是图片格式)文档中的某些内容,可以用vfp代码实现吗,谢谢帮忙!
搜索更多相关主题的帖子: 图片 
2017-03-31 18:11
jjoojj
Rank: 1
等 级:新手上路
帖 子:59
专家分:0
注 册:2014-8-12
收藏
得分:0 
以下是引用xs591222在2017-3-31 21:29:09的发言:

是可以实现的。需要第三方帮助
 
我能想到的思路:用汉王OCR将PDF转为TXT,再用VFP读取TXT到DBF表。
我现在是手工将pdf内容copy到excel文件中,在导入dbf中读取所需的数据,比较麻烦,就希望程序代码能够代替
2017-04-01 09:01
jjoojj
Rank: 1
等 级:新手上路
帖 子:59
专家分:0
注 册:2014-8-12
收藏
得分:0 
回复 5楼 wengjl
请帮忙看看,如果我想读取58*35*40,是否可以直接用vfp代码实现。tks!
166836-13.rar (4.35 KB)
2017-04-07 10:59
jjoojj
Rank: 1
等 级:新手上路
帖 子:59
专家分:0
注 册:2014-8-12
收藏
得分:0 
回复 8楼 sdta
是用汉王OCR将PDF转为TXT吗
2017-04-10 10:26
jjoojj
Rank: 1
等 级:新手上路
帖 子:59
专家分:0
注 册:2014-8-12
收藏
得分:0 
回复 10楼 wengjl
手工操作:全选pdf内容,copy到excel文件档(如附档)
vfp代码控制:然后导入dbf中,根据唯一字符来判断(例如:Ctn Msrmnt (cm) Total (Qty)),然后读取58*35*40
有很多这种pdf文件,手工操作有一定的工作量,希望给使用者自动化程度再高一些
“转成TXT后是可以读到DBF中的”------这个我还不会
Book1.rar (2.37 KB)
2017-04-11 10:57
jjoojj
Rank: 1
等 级:新手上路
帖 子:59
专家分:0
注 册:2014-8-12
收藏
得分:0 
回复 13楼 wengjl
我要学习一下。tks!
像这种情况,只能用汉王OCR转txt,再导入到dbf中,没有其他简单的方法了,是吧。
2017-04-12 09:02
jjoojj
Rank: 1
等 级:新手上路
帖 子:59
专家分:0
注 册:2014-8-12
收藏
得分:0 
以下是引用sdta在2017-4-11 11:11:12的发言:

打开PDF文档,另存为TXT文件
以下代码我一直在用,是打开pdf文件,并打印。开PDF文档,另存为TXT文件-----这个代码应该怎么写


PROCEDURE DYPDF
#define WM_CLOSE  0x0010
    IF FILE(lpszfile)
        DECLARE INTEGER ShellExecute IN Shell32.DLL INTEGER HWND,STRING,STRING lpszFile,STRING,STRING,INTEGER
        DECLARE Long FindWindow IN WIN32API ;
        String lpClassName, String lpWindowName
        DECLARE Long PostMessage IN WIN32API ;
        Long hWnd, Long Msg, Long wParam, Long lParam
        =ShellExecute(0,'Open',lpszfile,'','',1)
        INKEY(5)
        =ShellExecute(0,'print',lpszfile,'','',1)
        INKEY(5)
        m.hWnd = FindWindow(null, JUSTFNAME(lpszfile) +' - Adobe Reader')
        IF (m.hWnd == 0)
               MessageBox('没有找到打开 pdf 文件的窗口。')
        ELSE
            PostMessage(m.hWnd, WM_CLOSE, 0, 0)
        ENDIF
        CLEAR DLLs "ShellExecute", "FindWindow", "PostMessage"
        *INKEY(5)
    ENDIF
ENDPROC   
2017-04-12 14:44
快速回复:各位好!读取pdf(不是图片格式)文档中的某些内容,可以用vfp代码实现 ...
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015842 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved