Op deze website gebruiken we cookies om content en advertenties te personaliseren, om functies voor social media te bieden en om ons websiteverkeer te analyseren. Ook delen we informatie over uw gebruik van onze site met onze partners voor social media, adverteren en analyse. Deze partners kunnen deze gegevens combineren met andere informatie die u aan ze heeft verstrekt of die ze hebben verzameld op basis van uw gebruik van hun services. Meer informatie.

Akkoord

Vraag & Antwoord

Programmeren

[VB6] Hoe exporteer je een veldinhoud naar een .txt file?

jch.scheepers
4 antwoorden
  • Beste mensen
    In een Ado database heb ik veld met tekst. Deze tekst wil ik graag exporteren (converteren) naar een .txt file.
    Wie heeft een voorbeeld hoe ik dit kan aanpakken.
    Bedankt voor elke reactie.
    groet
    Joop
  • staat de tekst momenteel alleen in een database of in een label (of variabele).

    Als je de te exporteren tekst in een variabele heb staan is het niet zo vreselijk moeilijk, dan kan het het gewoon met het write commando wegschrijven (als je het bestand geopend heb)…

    [code:1:b622ed6517]
    open "<bestandsnaam>.txt" for output as #1
    write #1,variabele
    close #1
    [/code:1:b622ed6517]

    of is dit niet wat je bedoeld ?
  • Neen, ik bedoel het volgende.
    In een veld van mijn database staan gegevens (bijvoorbeeld namen). Ik wil deze namen onder elkaar plaatsen in een .txt bestand.
    Zo ongeveer

    Jan
    Harrie
    Frans
    Piet

    Groet
    Joop
  • [quote:7eb1b6776e]
    Op 17-02-2002 12:45, schreef jch.scheepers:
    Neen, ik bedoel het volgende.
    In een veld van mijn database staan gegevens (bijvoorbeeld namen). Ik wil deze namen onder elkaar plaatsen in een .txt bestand.
    Zo ongeveer

    Jan
    Harrie
    Frans
    Piet

    Groet
    Joop
    [/quote:7eb1b6776e]

    Dat doe je dan als volgt:
    Ik neem aan dat je al een recordset hebt met daarin de namen. Voeg dan de volgende code in:
    [code:1:7eb1b6776e]
    Open "bestand.txt" for output as #1
    Do Until <recordsetnaam>.EOF
    Print #1, <recordsetnaam>.Fields("<recordnaam>";) ' Of <recordsetnaam>("<recordnaam";)
    Loop
    Close #1
    [/code:1:7eb1b6776e]

    Ed

Beantwoord deze vraag

Dit is een gearchiveerde pagina. Antwoorden is niet meer mogelijk.