VBNET-2008 Yeni bir txt dosyası oluşturmak ve veri girmek
#1
Merhabalar.
VBNET'in kendi kodları ile savedioalogfile penceresini kullanmadan.
direk yolu belli olan bir klasöre yeni bir txt dosyası oluşturmak.Ve içine listviewdeki verileri girmek.
Teşekkür ederim.Smile



  Alıntı
Bu mesajı beğenenler:
#2
Merhaba;

Alttaki kod ile yeni bir txt dosyası oluşur ve listboxtaki tüm itemleri yazdırır.

Dikkat edin alttaki kodda eğer txt dosyası yoksa önce oluşturuyor ve yazdırma işlemlerini yapıyor. Siz onu kendi durumunuza göre değiştirirsiniz. Sizin nasıl istediğinizi de bilemiyorum tabii..

vb.net
  1. Dim Yol As String = "C:\TextDosyam.txt"
  2. If System.IO.File.Exists(Yol) = False Then
  3.  
  4. Dim YazYap As System.IO.StreamWriter = System.IO.File.CreateText(Yol)
  5.  
  6. Dim Item As Object
  7. For Each Item In Me.ListBox1.Items
  8. YazYap.WriteLine(Item & vbNewLine)
  9. Next
  10. YazYap.Flush()
  11. YazYap.Close()
  12. End If


Javascript
  1. this.setState({sign:"Here comes the sun...."})







  Alıntı
Bu mesajı beğenenler:
#3
[/code]
(22-06-2010, 14:01)Berkant Öztürk demiş ki: Merhaba;

Alttaki kod ile yeni bir txt dosyası oluşur ve listboxtaki tüm itemleri yazdırır.

Dikkat edin alttaki kodda eğer txt dosyası yoksa önce oluşturuyor ve yazdırma işlemlerini yapıyor. Siz onu kendi durumunuza göre değiştirirsiniz. Sizin nasıl istediğinizi de bilemiyorum tabii..

vb.net
  1. Dim Yol As String = "C:\TextDosyam.txt"
  2. If System.IO.File.Exists(Yol) = False Then
  3.  
  4. Dim YazYap As System.IO.StreamWriter = System.IO.File.CreateText(Yol)
  5.  
  6. Dim Item As Object
  7. For Each Item In Me.ListBox1.Items
  8. YazYap.WriteLine(Item & vbNewLine)
  9. Next
  10. YazYap.Flush()
  11. YazYap.Close()
  12. End If


Berkant bey teşekkür ederim.Smile
diğer kodların ne yaptığını az çok kestiriyorumda.
Bu aşağıdaki kodla yeni tanıştım.
Acaba o kod ne iş yapıyor?Yani Flush
Visual Basic
  1. YazYap.Flush()


[code=vba]



  Alıntı
Bu mesajı beğenenler:
#4
İlgili streamdeki tüm buffer ı temizliyor.
Javascript
  1. this.setState({sign:"Here comes the sun...."})







  Alıntı
Bu mesajı beğenenler:
#5
(22-06-2010, 17:04)Berkant Öztürk demiş ki: İlgili streamdeki tüm buffer ı temizliyor.
Teşekkür ederim.Smile



  Alıntı
Bu mesajı beğenenler:
#6
Berkant bey merhaba,
2 sorum olucak
1.birden fazla text'i nasıl yazdırıcaz "Me.t1.text,t2.text" yada "Me.t1.text and t2.text" gibi yollar denedım fakat olmadı sadece bır tane textı kaydedıyor o textide ornegın ıcınde 100 rakamı yazılıysa "100" seklınde degılde (1) alt satıra (0) alt satıra (0) olarak kaydedıyor ilgilenirseniz cok sevinirim

2.sorum lıstboxtakı ıtemı kaydetti program tekrar calıstırıldı ve lıstboxtakı ıtem degıstı tekrar kaydet dıyınce ıcındekı ıtemı guncellemıyor
İyi calısmalar...



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  vbnet acsess bağlantısında dlookup kullanımı kokotuna 2 1.758 10-04-2014, 09:36
Son Mesaj: kokotuna
  VBNET 2008 Userform hep üstte oluyor. Orion 2 2.517 10-11-2011, 18:44
Son Mesaj: Orion
  msn Kişisel iletiye textboxtan değer girmek. Orion 0 1.540 10-11-2010, 17:12
Son Mesaj: Orion
  VBNET alternatif msgbox Orion 3 3.183 10-09-2010, 18:20
Son Mesaj: omaTR
  VBNET 2008 Listviewde font style öğrenmek Orion 1 1.996 03-07-2010, 10:59
Son Mesaj: Orion
  VBNET 2008 Shared değiişken tanımlama. Orion 2 2.742 30-06-2010, 08:13
Son Mesaj: Orion
  VBNET 2008 Comboboxta Pr.nterleri listelemek Orion 5 2.997 29-06-2010, 21:20
Son Mesaj: assenucler
  VBNET 2008 #Region Orion 4 3.972 28-06-2010, 16:52
Son Mesaj: Orion

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi