VB de txt

Başlatan dalavi, 27 Mart 2006, 10:14:34

dalavi

Selam arkadaslar.
vb yardimiy la bir txt dosyasinda bazi düzenlemeler yaptirmam gerekiyo.
dosyayi satir satir okuyorum ve dosyaya birsey yazmak istedigimde ,örnegin 1234 ,bunu tirnak icerisinde txt ye yaziyor ("1234").
ama malesef bu benim icin kötü. cünkü baska bir program bu txt yi kullaniyor ve tirnak isaretini tanimiyor simdiden tesekküler.

uzaylivolkan

Birkere dosyayı yanlış formatta açtığın için tırnak atıyor.
Aşağıda örnek veriyorum. Formuna bir command button koy.
Butonun click olayına aşağıdaki kodu oluştur
tabi c ye C:\asildosya.txt   adli içi dolu bir dosya oluşturmayı unutma.

Set AA = CreateObject("Scripting.FileSystemObject")
Set okunandosya = AA.OpenTextFile("C:\asildosya.txt")
Set yazilandosya = AA.CreateTextFile("C:\kopyadosya.txt")
Do While okunandosya.AtEndOfStream = False  
yazilandosya.WriteLine okunandosya.ReadLine 
Loop
yazilandosya.WriteLine "12345" 
okunandosya.Close
yazilandosya.Close