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

448

    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. Korjaa toki jos...

      Koet että ymmärsin sinut kuitenkin aivan väärin. Jännittäminen on täyttä puppua kun et muitakaan miehiä näköjään jännitä
      Ikävä
      28
      2693
    2. Mitä aiot sanoa, kun ja jos tapaatte seuraavan kerran?

      Oletko päättänyt etukäteen?
      Ikävä
      91
      1034
    3. Koetko sä mitään

      Syyllisyyden tunteita siitä mitä teit mulle?
      Ikävä
      58
      901
    4. Mies muistatko kun näit

      Mut ensimmäisen kerran? Missä se oli? Hyvää yötä.
      Ikävä
      66
      875
    5. olet kaiken rakkauden arvoinen

      Olisinpa kertonut kuinka rakastuin sinuun. Kuinka hyvältä tunnuit siinä lähelläni, kunpa en olisi väistänyt vastapäätyy
      Ikävä
      26
      847
    6. Ellen Jokikunnas paljasti somessa ison perheuutisen - Ralph-poika elämänmuutoksen edessä!

      Ellen Jokikunnas ja Jari Rask sekä Ralph-poika ovat uuden edessä. Tsemppiä koko perheelle ja erityisesti Ralphille! Lu
      Suomalaiset julkkikset
      6
      827
    7. Olisi kiva

      Tietää, mitä oikein ajattelet minusta tai meistä? Mitä meidän välillä on? Salattua tykkäämistä, halua, himoa? Onhan tämä
      Ikävä
      37
      800
    8. Mikä koirarotu muistuttaa kaivattuasi eniten?

      Koirien piirteet muistuttavat usein ihmisten ja omistajiensa piirteitä.
      Ikävä
      65
      794
    9. Oot mun koko maailma

      Ei ole koskaan ollut ketään, joka olisi niin täydellinen minulle kuin sinä mies ❤️ Ikävöin sua🥹
      Ikävä
      75
      724
    10. Nainen, jos kuuntelet ja tottelet, niin sinulle on hyvä osa

      Ominpäin toimiessasi olet jo nähnyt mihin se on johtanut. Olen jo edeltä sen sinulle kertonut ja näen sen asian ja totuu
      Ikävä
      135
      708
    Aihe