关于文章套打的小问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关于文章套打的小问题

共有8948人关注过本帖树形打印复制链接主题：关于文章套打的小问题

唐尸三摆手

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：四尾狐帖子：928 积分：7769 威望：0 精华：13 注册：2008/9/1 11:58:00

关于文章套打的小问题 发帖心情

Post By：2012/9/15 10:14:00 [只看该作者]

dim tbl as table = tables("xxx")

If tbl.Current IsNot Nothing Then
   Dim rp As New RtfPrinter("c:\a.rtf")
    rp.DataRow = tbl.Current.DataRow '.
   rp.Replace("【经手人】",tbl.Current("经手人"))
    rp.Preview()
End If

请教下，rp.Replace("【经手人】",tbl.Current("经手人")) 这种写法是否正确？

当前行是有数据的，但是执行后报错，截图如下

此主题相关图片如下：未命名.jpg

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2012/9/15 10:16:00 [只看该作者]

把你这个表传上来看看，保留一行数据就行。

唐尸三摆手

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：四尾狐帖子：928 积分：7769 威望：0 精华：13 注册：2008/9/1 11:58:00

Post By：2012/9/15 10:27:00 [只看该作者]

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目93.table

狐狸爸爸

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2012/9/15 10:46:00 [只看该作者]

呵呵，那个rtf文件也传上来吧。

唐尸三摆手

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：四尾狐帖子：928 积分：7769 威望：0 精华：13 注册：2008/9/1 11:58:00

Post By：2012/9/15 10:55:00 [只看该作者]

下载信息 [文件大小：下载次数： ]
点击浏览该文件:a.rar

lin_hailun

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐神帖子：6708 积分：34304 威望：0 精华：11 注册：2012/8/18 23:10:00

Post By：2012/9/15 10:55:00 [只看该作者]

楼主的 rp.DataRow = tbl.Current.DataRow 是什么意思？

文章套打不是只是替换内容的么？

狐狸爸爸

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2012/9/15 11:09:00 [只看该作者]

这是一个bug，下次更新会搞定。
既然没有使用字段，就删除这一行代码吧：
rp.DataRow = tbl.Current.DataRow

[此贴子已经被作者于2012-9-15 11:23:50编辑过]

下一主题 >> << 上一主题

主题：关于文章套打的小问题