Foxtable(狐表)用户栏目专家坐堂 → [求助]如何给PDF文件添加水印


  共有2725人关注过本帖树形打印复制链接

主题:[求助]如何给PDF文件添加水印

帅哥哟,离线,有人找我吗?
5159518
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:384 积分:2706 威望:0 精华:0 注册:2015/11/27 19:09:00
[求助]如何给PDF文件添加水印  发帖心情 Post By:2018/6/21 23:01:00 [显示全部帖子]

请教老师,我现在有一个表中有一个二进制列,用来存储pdf文件,现在想在这个PDF文件中添加三行水印,分别是:

订单已作废
作废日期:& 【作废日期】
操作人:& 【操作人】

请问老师,应该如何编写代码?

请老师做好代码注释,咱是小白,嘻嘻,还请老师指点

 回到顶部
帅哥哟,离线,有人找我吗?
5159518
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:384 积分:2706 威望:0 精华:0 注册:2015/11/27 19:09:00
  发帖心情 Post By:2018/6/22 0:58:00 [显示全部帖子]

谢谢老师,只是代码没有注释,一时半会看不明白,不知道要如何修改才能完全嵌入到我的代码里面

 回到顶部
帅哥哟,离线,有人找我吗?
5159518
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:384 积分:2706 威望:0 精华:0 注册:2015/11/27 19:09:00
  发帖心情 Post By:2018/6/22 1:00:00 [显示全部帖子]

另外,我需要添加的是三行水印,应该如何修改?

 回到顶部
帅哥哟,离线,有人找我吗?
5159518
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:384 积分:2706 威望:0 精华:0 注册:2015/11/27 19:09:00
  发帖心情 Post By:2018/6/22 2:13:00 [显示全部帖子]

Dim waterMarkName As String = "报价单已作废!" & vbcrlf & " 作废日期: " & dr("作废日期")  & vbcrlf & "操作人: " & dr("作废人")

这行代码究竟错在哪里呢?编译没有报错,可是执行完之后没有换行,究竟啥意思?

 回到顶部
帅哥哟,离线,有人找我吗?
5159518
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:384 积分:2706 威望:0 精华:0 注册:2015/11/27 19:09:00
  发帖心情 Post By:2018/6/22 12:41:00 [显示全部帖子]

谢谢老师,幸苦了

 回到顶部