TXT file databaseen

Pikkasen tietoa uupuu

MInulla on notepad txt file josta pitäisi tiedot lukea Access tauluu. File on monirivinen ja pitää olla tunnistusta. Eli esim.. Eka rivillä on --- ja seuraavalla rivillä 123 abcd ja kolmannella xxxx 90909 ja neljäs taasen --- josta alkaa uusi kierros ja rivejä on useita...
Ja haluaisin että saisin palautettua yhdelle riville: 123 abcd xxxx 90909.
Netissä on kaiken näköisiä ohjeita mut en saanut oiken irtio mitään hyvää ohjetta.
LÖytyisikö apuja tai edes hyvä linkki jostavoisi apua hakea...

3

399

    Vastaukset 3

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Teppolaaki

      Java MySQL vois olla aika kova yhdistelmä.

      • Keino Jormanen

        sellasta ohjelmaa, joka lukee visual basicillä tekstitiedoston access-kantaan.

        Tää suomi24 on muutenkin niin tukossa, että jos et osaa auttaa, niin ole hiljaa. Ei ainakaan turhan vittuilun takia ole saitti jumissa.


    • xxxxx

      Miten pitkälle olet päässyt?

      Jos olet vasta alussa, niin tiedoston luku onnistuu näin:


      Dim LuettuRivi$,TalletettavaRivi$

      Open "c:\testi.txt" For Input As #1

      Do While Not EOF(1)
      Input #1, LuettuRivi$
      if LuettuRivi$="---" or EOF(1) then
      'uusi rivi tai tiedoston loppu
      'talleta TalletettavaRivi$ Access-tauluun
      'tähän sitten EditTable ja UpdateTable

      TalletettavaRivi$=""
      else
      TalletettavaRivi$=TalletettavaRivi$ " " LuettuRivi$
      end if
      Loop

      Close #1

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Miksi et halua kaivattusi

      kanssa suhteeseen? Onko jokin syy vaikka rakastat häntä?
      Ikävä
      121
      1094
    2. 65
      1003
    3. Carunan hinnat

      Yks proffa vauuttaa, ettei Caruna voi noin vain nostaa hintoja koska suomen laki kieltää, toinen proffa sanoo että Carun
      Maailman menoa
      93
      773
    4. Koetko vielä et

      Olen elämäsi rakkaus?
      Ikävä
      77
      743
    5. Joko uskallat.

      Huomenna nähdään.
      Ikävä
      41
      675
    6. Kunnan päätie ja sen lähialueet

      Arvon hyrynsalmelaiset. Tätä palstaa on näin Ukkohallan mökkiläisena ihan viihteellistä lukea. Milloin teitä ahdistaa la
      Hyrynsalmi
      36
      649
    7. Oletko tullut siihen

      Tulokseen ettet saa minua
      Ikävä
      67
      604
    8. Toimittajat ulkomailta saapuivat eilen vaskiviikoille

      Toimittajat lähtivät tutustumaan Lieksan yöelämään ja kultturitarjontaan. Kaikki yllättyivät kuinka aktiivista ja innoka
      Lieksa
      28
      576
    9. Mikä sun kaivatussa on se miksi ihastuit

      ja ikävöit? Eli se jokin asia, mikä aiheutti tunteen, että tuossa on sitä jotain? Meinasitko tehdä asialle jotain vai ka
      Ikävä
      22
      572
    10. Mitä luulet

      Mitä luulet kaivattusi ajattelevan sonusta? Onko jotain mitä haluaisit oikaista hänelle?
      Ikävä
      37
      498
    Aihe