Pisanje i pamcenje txt dokumenta (vb 2010), pitanje?

Pisanje i pamcenje txt dokumenta (vb 2010), pitanje?

offline
  • Pridružio: 05 Sep 2008
  • Poruke: 204

Znaci zelim da otvorim neki txt dokument u textbox, odradim neke matematicke operacije i zapamtim tu vrednost u taj isti dokument.
Problem je u tome sto nemogu (neznam) da tu vrednost zapamtim u taj isti dokument, uspem da zapamtim u novi ali ne u taj isti.
Zapamtim preko ovog koda:

  If System.IO.File.Exists("C:\Program Files\PES 11 Score\PES 11 Score\PES 11 Score\Score\Marko\IzMih.txt") = True Then                         MessageBox.Show("That file does not exist!")                     Else                         Dim objwriter As New System.IO.StreamWriter("C:\Program Files\PES 11 Score\PES 11 Score\PES 11 Score\Score\Marko\IzMih.txt")                         objwriter.Write(TextBox1.Text)                         objwriter.Close()                     End If
Znaci kada stavim adresu dokumenta koji vec postoji, koji ocu da replace-ujem, on izbacuje That file does not exist!

????



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
offline
  • Pridružio: 04 Jan 2009
  • Poruke: 2168

Malo si konfuzno objasnio problem, ali vidim iz koda otprilike šta želiš da odradiš.

Zamenio si naredbe... ako file postoji, onda msgbox "ne postoji". Smile

Trebalo bi ovako ako sam dobro shvatio problem:

If System.IO.File.Exists("c:\mihajlo994.txt") = True Then             Dim objwriter As System.IO.StreamWriter = New System.IO.StreamWriter("c:\mihajlo994.txt")             objwriter.Write(TextBox1.Text)             objwriter.Close()         Else             MessageBox.Show("That file does not exist!")                     End If



offline
  • Pridružio: 05 Sep 2008
  • Poruke: 204

To je to... HVALA!

offline
  • Pridružio: 04 Jan 2009
  • Poruke: 2168

Nema na čemu. Smile


Ne bi ti bilo loše da umesto fiksnih path-ova, da tako kažem, koristiš Enviroment da bi program mogao da se koristi i na drugim računarima... ako me ražumeš.

Na primer ako je sistemska particija obeležena sa D:\ ili je ime korisnika (UserName) drugačije, onda ti neće funkcionisati.


I da, ne znam šta tačno radiš, ali ako svakako kreiraš taj novi file onda ti nije potrebna provera da li taj file postoji.

Sa tim prvim delom koda ukoliko file postoji, biće zamenjen, a ako ne postoji biće kreiran novi i upisani podaci iz TextBox-a.

Mislim na ovaj deo:
Dim objwriter As System.IO.StreamWriter = New System.IO.StreamWriter("c:\mihajlo994.txt")             objwriter.Write(TextBox1.Text)             objwriter.Close()

Sem ako ti ne planiraš umesto ovog:
MessageBox.Show("That file does not exist!")

... da vršiš neku drugu komandu, na primer da kopiraš postojeći negde, rename-uješ postojeći... itd., ali malo je podataka da bih znao tačnu namenu programa.

Ko je trenutno na forumu
 

Ukupno su 1039 korisnika na forumu :: 41 registrovanih, 5 sakrivenih i 993 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 357magnum, A.R.Chafee.Jr., black sabah, bladesu, bokisha253, BratSrpska, cemix, Dannyboy, DPera, drimer, dzoni19, FileFinder, Georgius, gomago, goxin, Jeremiah, Još malo pa deda, Kriglord, Kubovac, Lieutenant, lord sir giga, Lošmi, Mcdado, mercedesamg, milenko crazy north, Mirage 2000N, MiroslavD, mkukoleca, moldway, nenad81, Petarvu, Pretender, proka89, royst33, Sirius, Snorks, stegonosa, Stoilkovic, Tvrtko I, vladaa012, wolf431