Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共3 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:套打中特殊标记的问题?

1楼
ahljy351 发表于:2008/10/16 11:33:00

Dim rp As New RtfPrinter("c:\Data\report.rtf")
rp
.Replace("{Today}", Date.Today)
rp
.Preview()


上面的{TODAY}在RTF文件中应该没有“”吧?另外如果不是DATE型的,是字符或其它类型的如何替换?

如:{日期},换成列[报告日期]的中文大写?

这样做提示错误?
Dim rp As New RtfPrinter("受理通知单.rtf")
rp.DataRow = Tables("房产登记").Current.DataRow '套打订单表的选定行.
rp.Replace("{日期}", CUDate("报告日期"))
rp.Preview()
2楼
狐狸爸爸 发表于:2008/10/16 11:48:00
rp.Replace("{日期}", CUDate("报告日期"))

上面的代码是什么意思? "报告日期"是一个字符,能转换为日期吗?

应该是:

rp.Replace("{日期}", CUDate(rp.DataRow("报告日期")))

呵呵,数据、变量、行、列,这些基本的概念,你还没有搞明白呢。
3楼
ahljy351 发表于:2008/10/16 12:15:00
呵呵。另外套打时怎么格式保存不下来呢?全部都缩到一块去了?且不支持线条?
共3 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03125 s, 2 queries.