Pytanie : układ dla słowo dokument

I pisać niektóre kod dane forma sql baza danych, i umieszczać ono wewnątrz słowo łączenie document.
it być pracujący grzywna, ale the jedyny problem być the układ. i być czytelniczy dane kilka collums, i ponieważ być lubić the ten sam długość, the wydajność dostawać messy.

example


Belarus Bubel Przez Wyłączność na wywiad 25
Belarus Przemysłowy
Kazakhstan Przemysłowy
Kazakhstan Bubel Przez Wyłączność na wywiad 25
Russia Bubel Przez Wyłączność na wywiad 25
Tajikistan Bubel Przez Wyłączność na wywiad 25
Ukraine Bubel Przez Wyłączność na wywiad 25
Uzbekistan Bubel Przez Wyłączność na wywiad 25

what i polubić być the collums out.

any propozycja? 


(1):
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

Dim rec8 Jako Nowy ADODB.Recordset
rec8.Open "WYBRANY dbo. [Wideo-tv-rechten-Królewskość]. Ziemia, dbo. [Wideo-tv-rechten-Królewskość] .landnaam, dbo. [Wideo-tv-rechten-Królewskość] .recht, dbo. [Wideo-tv-rechten-Królewskość] .percentage," _
           & "dbo. [Wideo-tv-rechten-Królewskość] .memo, dbo. [królewskość tv wyprostowywać] .contractid, dbo. Exclusivetekst.tekst JAKO wyłączność na wywiad OD dbo. [królewskość tv wyprostowywać] WEWNĘTRZNY ŁĄCZYĆ" _
           & "dbo. [Wideo-tv-rechten-Królewskość] NA dbo. [królewskość tv wyprostowywać] .contractid = dbo. [Wideo-tv-rechten-Królewskość] .nr OPUSZCZAĆ ZEWNĘTRZNY ŁĄCZYĆ dbo. Exclusivetekst NA dbo. [Wideo-tv-rechten-Królewskość] .exclusive = dbo. Exclusivetekst. [ja-_]" _
        & "DOKĄD ([Wideo-tv-rechten-Królewskość]. [nr] =" & dealmemo_contract_id & ") ROZKAZ Dbo. [Wideo-tv-rechten-Królewskość]. Ziemia", _
        CurrentProject.Connection, adOpenKeyset, adLockOptimistic
'strtext talen
Jeżeli rec8.RecordCount > (0) Wtedy
    rec8.MoveFirst
    Do rec8.EOF
       strtext8 = strtext8 & Podstrzyżenie (rec8! [Landnaam]. Wartość) & vbTab & ""& Żyłować (rec8! [Recht]. Wartość) & vbTab &" "& Żyłować (rec8! [wyłączność na wywiad]. Wartość) & vbTab &" "& Żyłować (rec8! [odsetek]. Wartość) & vbTab &" "& Żyłować (rec8! [Notatka]. Wartość) & vbCrLf
       Debug.Print strtext8
       rec8.MoveNext
    Pętla

Odpowiedź : układ dla słowo dokument

Znajdować ono wybór, robić stół z 5 pagemarks, i rozszczepiać the kod w 5 sepaerate wybór
Inne rozwiązania  
 
programming4us programming4us