Vb.Net Kaydetme Yardım
-
Beyler listboxı txt olarak exenin oldugu yere nasıl kaydederim başka yerlere kaydedebiliyorum fakat exenin oldugu yere nasıl kaydedebilirim
-
Application.StartupPath()
-
Dim exedizini= System.IO.Path.GetDirectoryName(System.Reflection.Assembly.GetExecutingAssembly().Location) Dim tamyol= System.IO.Path.Combine(exedizini, "dosya.txt") System.IO.File.WriteAllText(tamyol, "birşeyler")
böyle olduğunu tahmin ediyorum
-
unbalanced bunu yazdı
Application.StartupPath()
hocam baktımda birşey yapamadım gene
-
teamviewer yolla bakayım
-
unbalanced bunu yazdı
teamviewer yolla bakayım
hocam şuan teamviewer atamıyorum pcde çok şey açık listboxı exenin oldugu yere txt olarak kaydetmek istiyorum
-
o halde kodlarını paylaş hocam.. ona göre düzeltilecek yerleri de belirtirsen bakalım
-
unbalanced bunu yazdı
o halde kodlarını paylaş hocam.. ona göre düzeltilecek yerleri de belirtirsen bakalım
Dim Yazdir As New IO.StreamWriter("D:\Tarihler.txt") Dim i As Integer For i = 0 To ListBox1.Items.Count - 1 Yazdir.WriteLine(ListBox1.Items.Item(i)) Next Yazdir.Close()
bu kodla d'ye kaydedebiliyorum fakat benim istedigim exenin olduguyere kaydetsin butona tıklayınca (exenin yolunu yazınca exenin yanına kaydediyor ama programı dagıtıcagım için herkesin pc adı farklı oldugu için exe yolu hata veriyor)
-
Using yazdir As New IO.StreamWriter(Application.StartupPath + "\Tarihler.txt") For Each item In ListBox1.Items yazdir.WriteLine(item) Next yazdir.Close() End Using
-
unbalanced bunu yazdı
Using yazdir As New IO.StreamWriter(Application.StartupPath + "\Tarihler.txt") For Each item In ListBox1.Items yazdir.WriteLine(item) Next yazdir.Close() End Using
teşekkürler hocam oldu