Keskustelu: Ohjelmointikysymykset: VB6: Tekstitiedoston luku internetistä

Helppo kysymys guruille (tai sellaisille jotka luulevat olevansa guruja) eli koodi on jotakuinkin seuraavanlaista sätöstä:

    Dim strTesti2 As String

    strTiedosto = "http://www.suomenpankki.fi/ohi/fin/0_new/0.1_valuuttak/fix-rec.txt"

    'Avaa tiedoston
    Open strTiedosto For Input As #1

    Do Until EOF(1)
    Line Input #1, strTesti2
    txtTesti.Text = txtTesti.Text & strTesti2 & vbNewLine
    Loop

    'Suljetaan tiedosto
    Close #1

    GoTo Loppu

Virhe:

Loppu:

Yksinkertaisesti siis haluan lukea tekstitiedoston internetin kautta ja tulostaa sen nyt vaikka tekstikenttään ruudullani. Jos jollakulla on tähän toimiva ehdotus, niin olkaa hyvä. Kiitos...

Lue: https://www.ohjelmointiputka.net/koodivinkit/24126-vb6-tiedoston-haku-netistä-winsockilla

Onnistuu myös helpommi Microsoft Internet Transfer Controllin avulla näi pienel koodinpätkäl:

Text1.Text = Inet1.OpenURL("osote", icString)

jollon tekstit menee Text1.Textii

Kiitos Monkkats. Tuo oli juuri se mitä hainkin. Hieman vielä soveltamalla tiedot menivät nätisti tauluihin ja sitä kautta tietokantaan...