?
Solved

HTML2WORD - inserting page numbers

Posted on 2003-11-14
5
Medium Priority
?
616 Views
Last Modified: 2013-12-24
I am producing a word document from generated HTML using the CF tag WORD2HTML.

In developing I first create a WORD doc with word, the middle bit being where the generated data will go.

I then use WORD itself and save as html.

I then chop this html up into two parts - everything up to the data section (header.cfm) and the end which is everything AFTER the data (footer.cfm).

I keep these two files to wrap around the data which I generate as a file (data.cfm)

Then usin g CFFILE I join these 3 files together and use this html file to feed to the CF tag, WORD2HTML to output a WORD file.

So far, so  good. BUT, I want to include page numbers. Has anyone any idea as to how I can do this?









0
Comment
Question by:kjuliff
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
  • 2
5 Comments
 
LVL 17

Expert Comment

by:anandkp
ID: 9752867
go thru www.cfcomet.com/word & u shld be able to get this done !
0
 
LVL 17

Accepted Solution

by:
anandkp earned 500 total points
ID: 9752880
0
 
LVL 1

Author Comment

by:kjuliff
ID: 9764768
That looks just what I need. I tried to implement but get the error below. I ckech on Macromedia's site and followed the instructions at
http://www.macromedia.com/support/coldfusion/ts/documents/typeviewer_dll_reg.htm
but sill I get this error

The error occurred in D:\htdocs\S+N\fred.cfm: line 80
Called from D:\htdocs\S+N\fred.cfm: line 80
Called from D:\htdocs\S+N\fred.cfm: line 80
 
78 :         <CFOBJECT
79 :             ACTION="create"
80 :             CLASS=" Word.Application"
81 :             NAME="objWord"
82 :             TYPE="com">

 
0
 
LVL 1

Author Comment

by:kjuliff
ID: 9764777
PS I left off the crusial part of the error message
The cause of this exception was that: coldfusion.runtime.com.ComObjectInstantiationException: An exception occurred when instantiating a Com object..
0
 
LVL 1

Author Comment

by:kjuliff
ID: 9765549
OK. I manage to connect to the com object. Burt now I get

The selected method Move was not found.  
There are no methods with the specified method name and argument types. Please check your function and try again.  

With the code from the source suggested above - see

<cftry>    <CFOBJECT
        ACTION="CONNECT"
        CLASS="{000209FF-0000-0000-C000-000000000046}"
        NAME="objWord"
        TYPE="COM">
connect
<CFCATCH>

    <CFOBJECT
        ACTION="CREATE"
        CLASS="{000209FF-0000-0000-C000-000000000046}"
        NAME="objWord"
        TYPE="COM">
create
</CFCATCH>
</CFTRY>


<CFSCRIPT>

    // Open the doc
    objDocs = objWord.Documents;
    objDoc = objDocs.Open("d:\htdocs\s+n\fred.doc ");

// Get the 1st section's 1st footer's range object
    objSecs = objDoc.Sections;
    objSec1 = objSecs.Item(1);
    objSec1Footers = objSec1.Footers;
    objSec1Footer1 = objSec1Footers.Item(1);
    objRange = objSec1Footer1.Range;

    // Set the paragraph format
    // Values for alignment are {0=Left,1=Center,2=Right,3=Justify}
    objParaFormat = objRange.ParagraphFormat;
    objParaFormat.Alignment = 0;

    // Set a right-tab at 6 inches
    // Tab positions are in points, where 72 points = 1 inch
    // Arguments to the TabStops.Add function:
    //    Position: 6 inches * 72 points/inch = 432 points
    //    Alignment: values include {0=Left,1=Center,2=Right}
    objTabStops = objParaFormat.TabStops;
    objTabStops.ClearAll();
    objTabStops.Add(432,2);

    // Insert the page number
    // Page number is field type 33
    // Story is unit type 6
    objRange.Collapse(0);
    objFields = objRange.Fields;
    objFields.Add(objRange,33);
    objFields.Move(6);

    // Insert the footer's text
    objRange.InsertAfter("    Confidential and Proprietary");
    objRange.Collapse(0);
    objRange.Select();
    objSelection = objWord.Selection;
    objSelection.TypeText(Chr(9));
    objSelection.TypeText("Property of XYZ Corp.");


    // Exit
    objDoc.Close();
    objWord.Quit();

</CFSCRIPT>
0

Featured Post

Percona Live Europe 2017 | Sep 25 - 27, 2017

The Percona Live Open Source Database Conference Europe 2017 is the premier event for the diverse and active European open source database community, as well as businesses that develop and use open source database software.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

If you don't have the right permissions set for your WordPress location in IIS, you won't be able to perform automatic updates. Here's how to fix the problem.
Lease-to-own eliminates the expenditure of hardware replacement and allows you to pay off the server over time. Usually, this is much cheaper than leasing servers. Think of lease-to-own as credit without interest.
Michael from AdRem Software explains how to view the most utilized and worst performing nodes in your network, by accessing the Top Charts view in NetCrunch network monitor (https://www.adremsoft.com/). Top Charts is a view in which you can set seve…
How to fix incompatible JVM issue while installing Eclipse While installing Eclipse in windows, got one error like above and unable to proceed with the installation. This video describes how to successfully install Eclipse. How to solve incompa…
Suggested Courses

752 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question