Vraag : Het indexeren van woord 2007 dossiers, wordt afbreeklijnen verwijderd

Hallo!
i heeft een Probleem met iFilter, (versie 2010.1400.4746.1000)
By het indexeren offfiltx.dll van.docx- dossiers de lijnonderbrekingen geschrapte…
I.e. laten wij hebben een docx met de tekst
One Twee
Three Four

After wij have
One TwoThree indexeren zullen zijn Vier… probleem

Similar geposte here
http://stackoverflow.com/q uestions/1939187/word-ifilter-for-docx-parser-error
but niet opgelost
zijn

Antwoord : Het indexeren van woord 2007 dossiers, wordt afbreeklijnen verwijderd

Probeer dit:
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 ()
 
Schemerig doc. als Document
Schemerige I als Geheel
Schemerige Seconde als Sectie
Schemerige streptokok als Koord, strColBk als Koord
 
    Vastgesteld doc. = ActiveDocument
     
     
    Voor Elke Seconde in doc. Secties
        i = I + 1
        Als (CInt (CountWordPhrase (I, doc.)) > 0) toen
            strColBk = CountWordPhrase (I, doc.)
            streptokok = streptokok & vbCrLf & „Sectie: “ & I & „Kolommen“ & Sec.PageSetup.TextColumns.Count & „-“ & „ColumnBreaks (“ & strColBk & „),“
        Eind als
    Daarna
 
    Info van de Onderbreking van de Kolom van MsgBox „: “ & streptokok, vbInformation, „de onderbrekingsinfo van de Kolom per sectie“
     
 
Sub van het eind
 
Privé Functie CountWordPhrase (SecId als Geheel, myDoc als Document) als Koord
 
Schemerig x als Koord
Schemerig y als Geheel
 
    Op Fout hervat daarna  'niet werkelijk geadviseerd maar de problemen kunnen op vondsten gebeuren
 
    x = „^n“  'de tekst van de kolomonderbreking
    
    myDoc.Sections (SecId). Range.Select
    Met Selection.Find
        Doe terwijl. Voer uit (FindText: =x, door:sturen: =True, Formaat: =True, _
           MatchWholeWord: =True) = Waar
           y = y + 1
        Lijn
    Eind met
 
    CountWordPhrase = CStr (y)
 
De Functie van het eind
Andere oplossingen  
 
programming4us programming4us