tallennus juttu

miteén?

Miten vois tehä, niin että ku pistää ohjelmaan textboxin ja commandin, nii minkälaisen koodauksen pistän että se tallentaa sen minkä on textboxiin kirjottanut.

eli teen textboxin ja commandin ja ku painaa commandista, nii se mitä on kirjottanut textboxiin tallentuu ja sen tallennetun tiedoston voi avata ohjelmasta!

minkälainen koodaus tollaseen pitäs pistää?

1

705

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • VeeBee

      Oletan että käytät VB2005:sta.
      Tässä luku ja kirjoitus funktiot. Kerro jos tarvitset apua niiden käyttämisessä?

      Public Function ReadFromFile(ByVal FilePath As String) As String
      'Declare any variables
      Dim myFileStream As New System.IO.FileStream(FilePath, System.IO.FileMode.OpenOrCreate, System.IO.FileAccess.Read, System.IO.FileShare.ReadWrite)
      'Create the StreamReader and associate the filestream with it
      Dim myReader As New System.IO.StreamReader(myFileStream)
      'Read the entire text, and set it to a string
      Dim sFileContents As String = myReader.ReadToEnd()
      'Close everything when you are finished
      myReader.Close() : myFileStream.Close()
      Return sFileContents
      End Function

      Public Sub WriteToFile(ByVal TextToWrite As String, ByVal FilePath As String)
      'Ensure that the target does not exist.
      System.IO.File.Delete(FilePath)
      'Declare those variables!
      Dim sFileName As String = FilePath
      Dim myFileStream As New System.IO.FileStream(sFileName, System.IO.FileMode.OpenOrCreate, System.IO.FileAccess.Write, System.IO.FileShare.ReadWrite)
      'Create the stream writer
      Dim myWriter As New System.IO.StreamWriter(myFileStream)
      'Write in the text
      myWriter.Write(TextToWrite)
      'Flush before we close
      myWriter.Flush()
      'Close everything
      myWriter.Close(): myFileStream.Close()
      End Sub

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

    Luetuimmat keskustelut

    1. Keitä täällä on??

      Kertokaa nimenne!! 🤔
      Ikävä
      110
      1064
    2. Tiedät, että en voi enää laittaa viestiä

      Aikaa kulunut. Eikä se näyttäisi enää luontevalta vastata näin pitkän ajan jälkeen. Tiedän myös, että sinä et enää lait
      Ikävä
      82
      794
    3. Tuleeko Martinasta rouva Muhis

      Saako vihdoinkin ne haaveilemansa prinsessa häät Hajjin entinen Muhammad kanssa, 😂 yhteistä heillä on se, että molemmat
      Kotimaiset julkkisjuorut
      261
      580
    4. Nostetaanpas kissa pöydälle: Onko Kuhmossa työpaikkakiusaamista?

      Kuka uskaltaa puhua? Vai uskaltaako kukaan? Naisvaltaisella alalla on kuulemma Kuhmossa ruma tilanne. Mitä aikuiset ede
      Kuhmo
      15
      563
    5. Mitä hyvää

      Mitä hyvää hän on tuonut elämääsi?
      Ikävä
      65
      531
    6. Ei enää kauaa rakkaani

      Ensin minun pitää saatella narsistit oikeuden eteen ❤️
      Ikävä
      92
      499
    7. Oletko miettinyt sitä

      Että jos meidän persoonat ei sovi yhtään yhteen ;) No onneksi kumpikin on fiksu eikä halua toiselle mitään pahaa.
      Ikävä
      47
      491
    8. Miten näytät / näytit ihastumisesi hänelle?

      Toimiko, miten hän vastasi? vinkki5
      Ikävä
      26
      482
    9. Mökötätkö, kun jäit ilman vastausta?

      Vai mitä ajattelet...
      Ikävä
      47
      427
    10. Haluatko vain sitä

      Kaivattusi kanssa?
      Ikävä
      30
      416
    Aihe