tiedoston alkuun kirjoittaminen

minä

eli mulla on tän näkönen koodi jolla kirjotan tiedostoon:

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile(tiedosto.txt, 8, True)
objFile.Write "tekstiä"
objFile.WriteLine ""
objFile.Close

Eli tuossa on vain se ongelma että kun seuraavan kerran kirjoittaa tiedostoon niin se tulee seuraavalle riville. Mutta haluaisin että seuraava teksti mikä kirjoitetaan, tulisi ylemmälle riville kuin se aikaisempi. Eli vanhempi teksti siirtyisi yhden rivin alemmas ja uusi teksti tulisi ylimmälle riville. Mitenkäs tällainen oikein onnistuu?

2

457

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • it-duunari

      Ei onnistu ilman aputiedostoa.

      Eli:
      1. Nimeä alkuperäinen toiselle nimelle (esim. FileSystemObject.GetTempName() )
      2. Tee aputiedosto, jonka nimeksi laitat alkuperäisen tiedoston nimen
      3. Kirjoita uusi rivi aputiedostoon
      4. Kopioi alkuperäisen tiedoston sisältö aputiedoston perään.
      5. Poista alkuperäinen

      Kopiointi onnistuu esim. näin:

      option explicit

      const FSO_FOR_READING = 1
      const FSO_FOR_WRITING = 2
      const FSO_FOR_APPENDING = 8

      dim fso
      dim fin
      dim fout

      set fso = server.createobject("scripting.filesystemobject")
      set fin = fso.opentextfile("vanha.txt", FSO_FOR_READING)
      set fout = fso.opentextfile("uusi.txt", FSO_FOR_APPENDING)
      fout.write fin.readall
      fin.close
      fout.close
      set fso = nothing

      Toinen vaihtoehto on käyttää komentorivityökaluja ja shell.run():ia, mutta se ajautuu saitin IWAM_tunnuksen oikeuksilla, jotka eivät välttämättä riitä tiedostojen käsittelyyn.

      • minä

        Eli siis asp:ssä ei ole sellaista write systeemiä joka palauttais kursorin aina tekstitiedoston alkuun kirjoittamisen jälkeen? PHP:ssä tällainen muistaakseni oli, mutta piti tyytä asp:iin kun ei tueta php:tä :/


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

    Luetuimmat keskustelut

    1. Ikävä sua j-mies!

      Enkä oikeesti ymmärrä miksi. Eihän me tunneta ees kovin hyvin. Mut haluaisin sun kanssa jotain säätöä sit kai vaan 🫦
      Ikävä
      53
      5139
    2. Voi itku! Sanna Marinilla EI OLLUT mitään tekemistä jäänmurtajakauppojen kanssa

      Miten tässä näin kävi? Sanna-kultti paniikissa.
      Maailman menoa
      92
      3989
    3. En välttämättä koskaan aikaisemmin tosissani uskonut mihinkään sielunkumppanuuteen ym

      Ennen kuin tapasin sinut. Oudointahan tässä on että ollaan tiedetty toisemme kuitenkin vuosia ja enemmän vuosia, mutta v
      Ikävä
      15
      3353
    4. Tykkäys ei tarkoita

      yhtään mitään!
      Ikävä
      39
      2942
    5. Mitä on tapahtunut myllymäessä ?

      On poliisit Sepänkadulla myllymäessä
      Kankaanpää
      10
      2280
    6. Puukotus Lidlissä

      Kuka sai puukkoo Lidlin pihas tänään. Ja kuka oli tekijä?
      Kankaanpää
      21
      2252
    7. Mulle riittäisi halaukset

      Ja juttelut mut sulle ei taida riittää
      Ikävä
      46
      2237
    8. Tarvitseeko

      kaivattusi suojelua?
      Tunteet
      39
      2176
    9. Sielunkumppanini ja nykyinen kaivattuni ovat hyvin samankaltaisia ihmisiä

      Ja uskon että he punovat langansa yhteen pian. Sielunkumppanille voi olla kova paikka hyväksyä kuinka välittävä ja herkk
      Ikävä
      34
      1792
    10. Paljon on tullut kuultua juttuja ja

      ei ole syytä olla uskomatta niitä.
      Ikävä
      64
      1751
    Aihe