zoukankan      html  css  js  c++  java
  • ASP.NET控制Word/EXCEL转换成PDF格式

    至于Word转换的可以参照http://topic.csdn.net/u/20090331/08/e6e7f6f5-95d8-4d92-8b76-67e23129bf6c.html

    下面主要说说对Excel进行转换的(如果是对Excel进行转换帖子中的.js脚本有问题)

    下面是对Excel进行转换的脚本: 

    var files = WScript.Arguments;

    var fso = new ActiveXObject("Scripting.FileSystemObject");

    var word = new ActiveXObject("Excel.Application");

    var PDF = new ActiveXObject("PDFDistiller.PDFDistiller.1"); 

    word.Workbooks.add(); 

    word.ActivePrinter="MS Publisher Color Printer 在 LPT1:";

    var docfile = files(0); 

    var psfile = files(1) + fso.GetBaseName(files(0)) + ".ps"; 

    var pdffile = files(1) + fso.GetBaseName(files(0)) + ".pdf"; 

    var logfile = files(1) + fso.GetBaseName(files(0)) + ".log"; 


    var doc = word.Workbooks.Open(docfile); 

    //Excel文件转成PS文件; 

    var xlsheet=doc.Worksheets(1);

    xlsheet.PrintOut(1, 2, 1,false,"MS Publisher Color Printer 在 LPT1:",true,true,psfile);//这个是打印机关于得到Excel默认打印机的VBA可以在网上搜,有很多

    try{ 


    doc.Close(0); 


    //PS文件转成PDF文件; 

    PDF.FileToPDF(psfile,pdffile,""); 


    fso.GetFile(psfile).Delete();//删除PS脚本文件 

    fso.GetFile(logfile).Delete();//删除转换的日志文件 


    word.Quit(); 

    WScript.Echo("isuccess");//成功 

    WScript.Quit(0); 

    catch(x) 

    word.Quit(); 

    WScript.Echo("isfail");//失败 

    WScript.Quit(0); 


    用这种方法进行转换出来了会有一点不足,还需要改进 

  • 相关阅读:
    HDU1196 ZOJ2417 Lowest Bit
    HDU1008 ZOJ2108 Elevator
    HDU2614 Beat
    HDU2057 A + B Again
    POJ3984 迷宫问题
    HDU1013 POJ1519 Digital Roots
    HDU2051 Bitset
    HDU2037 今年暑假不AC
    ACM入门练习与递推小结
    HDU2046 骨牌铺方格【递推】
  • 原文地址:https://www.cnblogs.com/coderwar/p/1434693.html
Copyright © 2011-2022 走看看