Вопрос : Индицирование архивов слова 2007, красных строк извлекается

Hi!
i имеет проблему с iFilter, индицированием
By offfiltx.dll (варианта 2010.1400.4746.1000) архивов .docx, котор линия проломами будет уничтоженное…
I.e. препятствовала нам имеет docx с индицированием
Three Four

After
One 2 текста мы проблемой

Similar have
One TwoThree 4… будет вывешенное rel= " nofollow " " _blank " " target= " http://stackoverflow.com/questions/1939187/word-ifilter-for-docx-parser-error href= here

uestions/1939187/word-ifilter-for-docx-parser-error
but http://stackoverflow.com/q разрешенное class=

Ответ : Индицирование архивов слова 2007, красных строк извлекается

Попытайтесь это:

1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24: 25: 26: 27: 28: 29: 30: 31: 32: 33: 34: 35: 36: 37: 38: 39: 40: 41: 42: 43:

Sub ShowColumnInfo () Затемните doc как документ Затемните I как интежер Затемните Sec как раздел Затемните str как шнур, strColBk как шнур Установите doc = ActiveDocument На каждый Sec в doc. Разделы iий = I + 1 Если (CInt, то (CountWordPhrase (I, doc)) > 0) После этого strColBk = CountWordPhrase (I, doc) str = str & vbCrLf & «раздел: » & I & «колонки» & Sec.PageSetup.TextColumns.Count & «-» & «ColumnBreaks (" & strColBk & "),» Закончитесь если Затем Пролом Info колонки MsgBox «: » & str, vbInformation, «пролом info колонки в раздел» Подводная лодка конца Приватная функция CountWordPhrase (SecId как интежер, myDoc как документ) как шнур Тусклый x как шнур Тусклый y как интежер На реально порекомендованном резюме ошибки затем 'но проблемах смогите случиться на находках x = «^n» 'текст пролома колонки myDoc.Sections (SecId). Range.Select С Selection.Find Сделайте пока. Исполните (FindText: =x, переднее: =True, форма: =True, _ MatchWholeWord: =True) = True y = y + 1 Петля Конец с CountWordPhrase = CStr (y) Функция конца