打印pdf文件 vfp_新技能,如何将多份pdf电子发票文件合成一份文档打印

700e559c4a84116c6d02070ac381fc41.png

作为一名行政人员,每个月都会有大量的发票需要处理。特别是到了年底,更是会有大量的电子发票需要存档、打印、报销等。

如果将大量的电子发票分别打印到A4纸上,会造成资源大量的浪费,不利于行政办公室节约的主张不说,也非常不利于文件的归档管理。

但是当行政把电子发票合成一份PDF时又常常会遇到丢失印章签名的问题。

84d381f6e51b159c43cdd2a53d5d2195.gif

电子发票怎么打印,如何将两张发票打印到一张A4纸上,如何将多份电子发票合成一份文档?

下面行政菌为大家介绍一个,行政菌常用的小工具,非常的实用方便。

工具链接拿走不谢!

https://pdf.wdku.net/pdffapiao(PS:建议使用电脑版访问功能)

操作步骤:

第一步:上传文件

第二步:填写转换参数

7e6cf2b818eb67ccd5efe274c67d796b.png

简单两步电子发票就合并打印好了,是不是很简单。

d0d359bdc86fef819874b4463cc4aa61.png 6a09326c7b100f72806279cc2f558ce3.gif

做主持、团建、会场必看的三部神仙综艺

行政每天忙成狗,究竟在忙啥?

如何通过“清明节放假通知”,体现行政工作价值

领导说辛苦了该怎么回,低情商才说不辛苦

累死你的不是行政工作,而是工作方法

华为行政招聘重磅来袭,你符合条件吗?

日常工作必备的6个Excel小技巧

领导会重点培养的6种人,你在列吗?

21aa156fc79f84206ae34422c30e2273.png

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
### 回答1: 可以使用 VFP 的 LINEREAD() 函数来实现,它可以将文本文件中每行的内容提取到一个数组中。示例代码如下:DIMENSION lines[100]OPEN '文件路径' TO fh AS #1DO WHILE NOT EOF(fh)LINE INPUT #fh, linelines[n] = LINEREAD(line,1)n = n + 1ENDDOCLOSE #fh ### 回答2: 在VFP(Visual FoxPro)中,可以通过以下方法将文本文件内容按行提取到一个数组中: 1. 首先,使用`FILETOSTR()`函数将文本文件读取为一个字符串。 2. 使用`STRTOFILE()`函数将字符串按行分割为子字符串,并将其保存到一个临时文件中。 3. 使用`FOPEN()`函数打开临时文件,然后使用`FGETS()`函数逐行读取文件内容,并将每行内容存储到一个数组中。 4. 最后,关闭文件,删除临时文件并返回数组。 下面是一个示例代码: ```foxpro function GetFileContentToArray(tcFileName) local lcTempFile, lnFileHandle, lcLine, laContent lcTempFile = SYS(2023) + "\temp.txt" && 生成一个唯一的临时文件名 STRTOFILE(FILETOSTR(tcFileName), lcTempFile) && 将文本文件内容保存到临时文件 lnFileHandle = FOPEN(lcTempFile) if lnFileHandle < 1 messagebox("错误", "无法打开文件。") return .null. endif laContent = {} do while not FEOF(lnFileHandle) lcLine = FGETS(lnFileHandle) lcLine = ALLTRIM(lcLine) && 去除行首、行尾的空格 if not EMPTY(lcLine) ALINES(laTemp, lcLine) && 将行内容以空格分割为子数组 AADD(laContent, laTemp[1]) && 将行内容添加到最终数组中 endif enddo FCLOSE(lnFileHandle) DELETE FILE (lcTempFile) return laContent endfunc ``` 以上示例代码演示了如何将一个文本文件的内容按行提取到一个数组中。通过将文本文件内容读取到一个字符串,然后将其按行分割为子字符串,并存储到一个数组中。这样就可以对每一行的内容进行操作和处理了。最后,关闭文件,删除临时文件,并返回包含所有行内容的数组。 ### 回答3: 在VFP中,我们可以使用以下方法将文本文件内容按行提取到一个数组中: 1. 首先,我们需要用OPEN命令打开文本文件,并将其读入变量中。假设我们要读取的文件名为"test.txt",那么可以使用以下代码将文件内容读入一个变量中: ``` lcFile = "test.txt" lcText = "" IF FILE(lcFile) OPEN DATABASE (lcFile) SHARED lcText = FILETOSTR(lcFile) CLOSE DATABASES ENDIF ``` 2. 接下来,我们需要将变量中的文本按行拆分,并将每一行存储到一个数组中。可以使用GETWORDCOUNT函数来获取文本中的行数,使用GETWORDNUM函数和GETWORD函数来逐行读取文本内容,并将每一行存储到一个数组中。以下是相应的代码: ``` lcArray = [] lnLines = GETWORDCOUNT(lcText, CHR(13) + CHR(10)) FOR lnI = 1 TO lnLines lcLine = GETWORD(lcText, lnI, CHR(13) + CHR(10)) lcArray[lnI] = lcLine ENDFOR ``` 这样,我们就将文本文件内容按行提取到了一个数组中。你可以使用lcArray变量来访问和操作这些文本行。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值