巧用ASP生成PDF文件

2016-01-29 17:43 435 1 收藏

巧用ASP生成PDF文件,巧用ASP生成PDF文件

【 tulaoshi.com - ASP 】

       Adobe PDF格式已经变成很多机构和公司进行跨平台制表的通用媒体格式。尽管我不是这个产品的狂热痴迷者,却不得不接受这样一个事实:用这个格式产生一个协定可能会比用Word还要好。
     
     由于在一家雇用公司工作,我已经把我们所有早期的软件写成能在Internet上运行,这样我们就能和小的子公司共享公用数据库了。然而我们遇到的最大的问题就是制表。当一个申请人坐在信息站里在线填写他们的就业申请时,我们如何取得当前的文档(或申请等)?由于我们做了大量工作来获取数据,我们还需要申请人手工填写一份申请。
     
     我试了各种办法,但是看来都有一个很大的限制:
     
     如果我能快速产生它,它就只能是一个HTML形式的衍生物,在打印时就会变得面目全非。如果设计的看起来美观一些,它就会变得很慢。这是由于我选择用RTF格式作为我的首选项,然后使用文件系统对象来完成基于模板的RTF文件,最后加入了我的信息。这个磁盘读写的过程会耗费很长时间。记住:我们这里不是在讨论列表数据或者一个Excel电子表格。我们是想让程序用我们自己的标志进行处理。
     
     最后,我选择了Adobe(很像一句广告词?——译者)。我讨厌它的浏览器所以希望自己不会和它纠缠上,然而它的格式看起来很不错而且文件也不大。大部分用户都在系统里装上它,我们的客户也不例外。
     
     因此我一直在寻找把数据从HTML表单传递到PDF文件的方法。我试过使用Adobe表单,但是它不能真正有效运行,然后还要统计如何合并数据库请求。这根本不是我想要的东西,我想直接把数据从我的HTML表单传递到数据库,然后产生数据信息到PDF文件里作为浏览或打印。
     最终我在UseNet发现了线索。一个叫Jeremy Hunter的提交的一个链接包含了我准备在这里讲的很多东西——http://partners.adobe.com/asn/developer/acrosdk/forms.html。
     
     首先必须在定义字段的工作站(不是服务器)上安装有Adobe完全版。这个是一个指向Adobe Forms Acrobat Toolkit的链接,由此开始一切就容易了。
     
     
     第一、下载这个套装工具并把它解压缩到指定目录。
     
     当你进行这一步操作时,你会发现所有源代码都在VB或VC++中。我们这里不打算关注它,但是如果你需要代码就在这里。
     
     
     第二、注册你的DLL。
     
     有两个DLL需要被复制到你的服务器上。一个在Visual Basic文件夹中叫fdfacx.dll,另一个在Visual C++文件夹中叫fdftk.dll。用regsvr32注册fdfacx.dll文件。我把这两个文件都放到c:winntsystem32下,并在当前路径下输入“regsvr32 fdftk.dll”。如果你遇到错误提示信息,请检查确认这两个文件确实在当前目录下,没有问题则进入下一步。
     
     
     第三、建立表单。
     
     我们将使用每个人对这个示范都很熟悉的表单。这在“http://www.irs.gov”随意可得并为我们提供足够的领域来展示我们能作的东西。
     
     
     第四、定义Adobe表单字段。
     
     在Adobe Acrobat中打开文档后选择表单工具,描述你的第一个表单字段(First Name)。
     
     在你定义后它将让你命名,我这里命名为“FirstName”。注意这里有几个标准的附加格式选项,除了字体大小,我选择进行合法性检查和格式化我的ASP文档。由于这是一个快速演示,我选择跳过任何检查,但是我将在客户端的表单进行处理,并在传递变量前在服务端格式化ASP页面。
     
     继续其他字段,每一个都要注意命名并可能格式化字体大小或属性。
     在服务器上保存你的修改。
     
     
     第五、编写ASP页面。
  &

来源:http://www.tulaoshi.com/n/20160129/1502676.html

延伸阅读
标签: ASP
  <% Function GetPage(url) dim Retrieval Set Retrieval = CreateObject("Microsoft.XMLHTTP") With Retrieval .Open "Get", url, False ', "", "" .Send GetPage = BytesToBstr(.ResponseBody) End With Set Retrieval = Nothing End Function Function BytesToBstr(body) dim objstream set objstream = Server.CreateObj...
标签: ASP
  Split 程序代码 <%attribs="商场名^^快餐店名^^报停名" names=Split(attribs,"^^") i=0 for each name in names   response.write names(i)&"<br"   i=i+1 next% 程序拆分结果: 商场名 快餐店名 报停名 根据 Split 结果生成 SQL 语句 <%attribs="商场名...
标签: ASP
  第一个ASP页面。 Note Pad输入下面的程序。 <%@ Language=VBScript % <% Response.ContentType="text/vnd.wap.wml" %<?xml version="1.0"? <!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml" <wml   <card id=&q...
标签: ASP
  <html <meta http-equiv="Refresh" content="2" <!-- Place this code into an ASP Page and run it! -- <code Random FileName Creation <% Function Generator(Length) dim i, tempS, v dim c(39) tempS = "" c(1) = "a": c(2) = "b": c(3) = "c": c(4) = "d": c(5) = "e": c(6) =...
标签: Web开发
'***************************************************************** ' function ' 作用 :利用流保存文件 ' 参数 :from(远程文件地址),tofile(保存文件位置) '***************************************************************** Private Function SaveFiles(byref from,byref tof...

经验教程

322

收藏

99
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部