text dosyaya kayıt yapan basit bir prg. yapmaya çalışıyorum ama bir sorun var.textbox1 deki yazıyı kaydedecek ama başına sıra numarası koyacak dosya bomboş ise 1den başlayacak boş değilse en son satırdaki (sıra) adlı değişkeni okuyup bir arttıracak ve yeni kaydı yapacak.
1 ,"ahmet" 2,"mehmet" 3,"ali" gibi
baya uğraştım yapamadım bilen varsa yardımlarını bekliyorum
db de id tanımlıcaksın olay biticek anladıgım kadarıyla ...
kardesım soyledıın sey basıt aslında if isnumeris(left(text1,1,1)) then write #1,k else close #1 open "c:\deneme.txt" for read as 1 while not oef(1) input #1,x wend m=val(left(x,1,1)) m=m+1 l=str(m) l=m+k write #1,l end if buna benzer bir algoritmayla cozebılırsın bunu bıraz deıstırmen gerekebılır
Arkadaş işin mantığını vermiş. Gerisi size kalmış. Kodu baştan sona yazmamız yanlış olur. Gerçi hemen hepsi yukarıda var ancak kontrol ve düzeltme işi sizin işiniz.
lof(1) ile dosya boşmu değilmi diye kontrol edebilirsin
yeni mesaja git
Yeni mesajları sizin için sürekli kontrol ediyoruz, bir mesaj yazılırsa otomatik yükleyeceğiz.Bir Daha Gösterme