For martynjpearson:Getting a CString into a COleVariant

Hi again;

I've been working hard on my problems...if I do this to get both date and text and page number one beside the other in the footer:

                  Sections sections(oDocument.GetSections()); // document is your instance of _Document
                  Section section1(sections.Item(1));
                  HeadersFooters footers(section1.GetFooters());
                  HeaderFooter footer1(footers.Item(1));                  
                  footer1.SetLinkToPrevious(FALSE);
                  Range range(footer1.GetRange());      
                  Fields fields(range.GetFields());
                  COleVariant varType((long)wdFieldDate);//puts date at left of footer
                  COleVariant varType1((long)wdFieldPage);//puts page number at left of footer
                  COleVariant varEmpty(DISP_E_PARAMNOTFOUND, VT_ERROR);
                  COleVariant varCollapseEnd((long)wdCollapseEnd);

                  CString strPage("               Page  ");
                  COleVariant varText;
                  varText=COleVariant(strPage);

                  CString strInspecTitle("        INSPEC-Inspections de bâtiment ");
                  COleVariant varTextInspec;
                  varTextInspec=COleVariant(strInspecTitle);

                  fields.Add(range, &varType, &varEmpty, &varEmpty);
                  range.Collapse(varCollapseEnd);
                  fields.Add(range,&varText, &varEmpty, &varEmpty);
                  range.Collapse(varCollapseEnd);
                  fields.Add(range, &varType1, &varEmpty, &varEmpty);                  
                  range.Collapse(varCollapseEnd);
                  fields.Add(range, &varTextInspec, &varEmpty, &varEmpty);                  

....I get a run error in the line :

fields.Add(range,&varText, &varEmpty, &varEmpty);

...where I'm taking a CString putting it into a COleVariant, and then adding it to the display, but it crashes here...seems to have no problems doing the conversion, but gives me a "Failed" at run time when it gets to this line. Any ideas ? Am I not converting my text to display properly ? Thanks!

pigeonbrAsked:
Who is Participating?
 
martynjpearsonCommented:
OK, here goes...

        Documents docs(application.GetDocuments());
        _Document doc(docs.Add(&varEmpty, &varEmpty));

        Sections sections(doc.GetSections());
        Section section1(sections.Item(1));
        HeadersFooters footers(section1.GetFooters());
        HeaderFooter footer1(footers.Item(1));              
        footer1.SetLinkToPrevious(FALSE);
        Range range(footer1.GetRange());

        COleVariant varTypeDate((long)wdFieldDate);
        COleVariant varTypePage((long)wdFieldPage);
        COleVariant varCollapse((long)wdCollapseEnd);
        COleVariant varStory((long)wdStory);

        CString strPage("               Page  ");
        CString strInspecTitle("        INSPEC-Inspections de bâtiment ");

        // First off, add the date
        Fields fields(range.GetFields());
        fields.Add(range, &varTypeDate, &varEmpty, &varEmpty);

        range.Collapse(&varCollapse);
        range.SetText(strPage);

        range.Collapse(&varCollapse);
        fields=range.GetFields();
        fields.Add(range, &varTypePage, &varEmpty, &varEmpty);
       
        range.Collapse(&varCollapse);
        range.Move(&varStory, COleVariant((long)1));
        range.SetText(strInspecTitle);

I had to add the call to Range::Move(), as the range did not seem to collapse past the field that I'd just inserted. Strange!

All the best
Martyn
0
 
martynjpearsonCommented:
The variant has to be one of the constants indicating the field type - unfortunately, you can't just add a text field like this.

If you want to have a field, then some text, and then some more fields, I believe you'll have to get the start range, get the fields collection, add your field(s), collapse the range, add some text, collapse the range, get the fields collection, add your field(s)... etc.

Hope this helps
Martyn
0
 
pigeonbrAuthor Commented:
martyn,
An actual code sample would really be nice here:) since I'm a beginner in automation. I've been racking my brains on this one for 2 weeks every evening...getting closer, but I need this ready for monday...thanks:)
0
 
pigeonbrAuthor Commented:
martyn;
Thanks for the code sample...I really appreciate it. from this I gather I can use the same setup for a header. The only thing still illuding me is the setup for getting different headers for different parts of a documnet... we are working that subject together on another question...I will do some more work and get back to you in my other question...thanks very very much...I am getting to understand what is going on. It's not obvious when you've never done it, even from reading etc....thanks again martyn,..really appreciate it.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.