How can i create TOC without creating TOC styles?

b MyInd.ActiveWindow.ActivePage = myDoc.Pages.Item(1)

Yes! sure, i had first to active page. Thanks.

You might notice that though you created the variable named "myPage" you did nothing with it.

Try adding (converted to VB):

app.activeWindow.activePage = myPage;

before making the TOC.

Dave

Now i can't make myDoc place TOC on the needed page (# 1). It creates and place on pasteboard.
How to open (to see on screen) needed page?

Tried this:

Set myPage = myDoc.Pages.Item(1)

myDoc.CreateTOC MyTOCStyle, True, , Array(-170, 93).

TOC appears on the current page covering main text.

I've got so construction:

Set MyTOCStyle = myDoc.TOCStyles.Add
Set myTOCStyleEntry = MyTOCStyle.TOCStyleEntries.Add("Head1")
'point which heading we'd like to see on TOC
myTOCStyleEntry.FormatStyle = "TOC Zag1"
myTOCStyleEntry.Separator = vbTab

Set myTOCStyleEntry = MyTOCStyle.TOCStyleEntries.Add("Head2")
'point another heading we'd like to see on TOC
myTOCStyleEntry.FormatStyle = "TOC Zag2"
myTOCStyleEntry.Separator = vbTab
myDoc.CreateTOC MyTOCStyle, True, , Array(-170, 93)

TOC styles have names, so if you know the name of the one you want, you should change the first line to call it up by name. In JavaScript, this would be:

MyTOCStyle = myDoc.tocStyles.itemByName("TOCstyleName");

Dave