IA: AutoNum Field Values Disappear on HTML Export

 Last reviewed: February 5, 1998
Article ID: Q142332
The information in this article applies to:
  • Microsoft Internet Assistant for Word for Windows, versions 1.0, 1.0z
  • Microsoft Internet Assistant for Word for Windows 95, version 2.0z
  • Microsoft Word for Windows, versions 6.0a, 6.0c
  • Microsoft Word for Windows 95, version 7.0

SYMPTOMS

When you convert a Word document that contains either the AutoNum, AutoNumLgl, or AutoNumOut fields to an HTML document, the field results are not retained. All other field values are converted.

CAUSE

The AutoNum fields are deleted on export. Internet Assistant attempts to unlink the field on export. Since the AutoNum fields cannot be unlinked, they are deleted.

STATUS

Microsoft has confirmed this to be a problem in Microsoft Internet Assistant for Word, versions 1.0, 1.0z, 2.0z. We are researching this problem and will post new information here in the Microsoft Knowledge Base as it becomes available.

RESOLUTION

Use the following macro to replace all AutoNum, AutoNumLgl, or AutoNumOut fields with Sequence or Seq fields. Then, when you convert your document to HTML, the field values will be retained.

WARNING: ANY USE BY YOU OF THE CODE PROVIDED IN THIS ARTICLE IS AT YOUR OWN RISK. Microsoft provides this macro code "as is" without warranty of any kind, either express or implied, including but not limited to the implied warranties of merchantability and/or fitness for a particular purpose. 

Sub MAIN
EndOfDocument X = ViewFieldCodes() ViewFieldCodes 1 EditFind .Find = "^19 AUTONUM", .Direction = 1, .MatchCase = 0, .WholeWord = 0, .PatternMatch = 0, .SoundsLike = 0, .Format = 0, .Wrap = 1, .FindAllWordForms = 0 While EditFindFound() 
 EditBookmark .Name = "Test", .SortBy = 0, .Add
 CharRight 1
 InsertField .Field = "REF Test \* MERGEFORMAT"
 CharLeft 1, 1
 UpdateFields
 UnlinkFields
 CharLeft 1
 CharLeft 1, 1
 EditClear
 EditFind .Find = "^19 AUTONUM", .Direction = 1, .MatchCase = 0,
 .WholeWord = 0, .PatternMatch = 0, .SoundsLike = 0, .Format = 0,
 .Wrap = 1, .FindAllWordForms = 0
Wend EndOfDocument EditFind .Find = "^19AUTONUM", .Direction = 1, .MatchCase = 0, .WholeWord = 0, .PatternMatch = 0, .SoundsLike = 0, .Format = 0, .Wrap = 1, .FindAllWordForms = 0 While EditFindFound() 
 EditBookmark .Name = "Test", .SortBy = 0, .Add
 CharRight 1
 InsertField .Field = "REF Test \* MERGEFORMAT"
 CharLeft 1, 1
 UpdateFields
 UnlinkFields
 CharLeft 1
 CharLeft 1, 1
 EditClear
 EditFind .Find = "^19AUTONUM", .Direction = 1, .MatchCase = 0,
 .WholeWord = 0, .PatternMatch = 0, .SoundsLike = 0, .Format = 0,
 .Wrap = 1, .FindAllWordForms = 0
Wend ViewFieldCodes X 
End Sub

KBCategory: kbusage buglist1.0 buglist1.0z buglist2.0z
KBSubcategory: kbformat
Additional query words: Internet assistant winword word6 word7
word95 number numbering disappear delete cnv conv htm html 1.0 2.0
1.0z 2.0z auto autonum autonumlgl autonumout iaword 6.0a 6.0c 7.0

Keywords : kbformat kbwdinternet
Version : 1.0 1.0z 2.0z
Platform : WINDOWS

THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. MICROSOFT DISCLAIMS ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL, CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. SOME STATES DO NOT ALLOW THE EXCLUSION OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES SO THE FOREGOING LIMITATION MAY NOT APPLY.

Last reviewed: February 5, 1998
© 1998 Microsoft Corporation. All rights reserved. Terms of Use.