Menjanje stringa unutar fajlaCode (vbnet):
Dim Fs As FileStream = New FileStream("c:\Test.dat", FileMode.OpenOrCreate, FileAccess.ReadWrite, FileShare.ReadWrite)
Dim sw As New StreamWriter(Fs)
Dim sr As New StreamReader(Fs)
Dim str As String
str = sr.ReadToEnd()
str = str.Replace("Sta menjam", "U cega menjam")
Fs.Position = 0
Fs.SetLength(str.Length)
sw.Write(str)
sw.Flush()
sw.Close()
Fs.Close()
Dim Fs As FileStream = New FileStream("c:\Test.dat", FileMode.OpenOrCreate, FileAccess.ReadWrite, FileShare.ReadWrite)
Dim sw As New StreamWriter(Fs)
Dim sr As New StreamReader(Fs)
Dim str As String
str = sr.ReadToEnd()
str = str.Replace("Sta menjam", "U cega menjam")
Fs.Position = 0
Fs.SetLength(str.Length)
sw.Write(str)
sw.Flush()
sw.Close()
Fs.Close()
Na ovaj nacin menjam sve zapise tako reci u trenu a za ovaj program mi je brzina preko potrebna. E sad moj problem se odnosi na sledece.
Zapisi u datoteci su grupisani na ovaj nacin:
"zapis1","zapis2","zapis3"
"zapis1","zapis2","zapis3"
"zapis1","zapis2","zapis3"
"zapis1","zapis2","zapis3"
...
"zapis1",zapis2",zapis3"
Ako bih primenio gore prikazan code, promenio bih trazeni string u svim zapisima a meni to ne treba. Meni je potrebno da izmenu izvrsim samo npr u koloni zapis2. Znaci gde god da pronadje u koloni zapis2 trazeni string da ga promeni a da ne dira ostale kolone.
[Ovu poruku je menjao Shadowed dana 31.05.2011. u 17:25 GMT+1]
. Jedino ako baza nije dugo kompaktovana, ali da dođe do 50Mb za 300Kb osnovnog teksta malo teže, pod normalnim okolnostima. Mada uvek bi se pre odlučio za SQLite nego za Access, osim ako ne treba neka integracija sa ostalim MS rešenjima, mada i za to mislim da postoji SQLite oledb provajder.
Re: Menjanje stringa unutar fajla
Re: Menjanje stringa unutar fajla
Re: Menjanje stringa unutar fajla