Dosya İşlemleri

Vb.Net derslerimizden olan bu derste dosya oluşturmayı, dosya taşımayı, dosya silmeyi, yeniden adlandırmayı göreceğiz.

Vb.Net derslerimizden olan bu derste dosya oluşturmayı, dosya taşımayı, dosya silmeyi, yeniden adlandırmayı göreceğiz.



KODLAR:

Dosya Taşıma:


My.Computer.FileSystem.MoveFile("C:eski_klasordosya.txt", "C:yeni_klasordosya.txt")



Klasör Taşıma:

My.Computer.FileSystem.CopyDirectory("C:kaynak_klasor", "D:Hedef_klasor")



Dosya Yaratma:

My.Computer.FileSystem.WriteAllText("C:Test.txt", String.Empty, False)



Klasör Yaratma:

My.Computer.FileSystem.CreateDirectory("C:Yeni_klasor")



Dosya Kopyalama:

My.Computer.FileSystem.CopyFile("C:kaynak.txt", "C:yeni_klasorhedef.txt")



Klasör Kopyalama:

My.Computer.FileSystem.CopyDirectory("C:kaynak_klasor", "D:yeni_klasor")



Geçici Dosya Oluşturma: Uygulamaya import visual.basic desteği eklenmeli.

Dim dosyaadi As String = My.Computer.FileSystem.GetTempFileName()



Bir Dosya Silme:

My.Computer.FileSystem.DeleteFile("C:Test.txt", FileIO.UIOption.AllDialogs, FileIO.RecycleOption.SendToRecycleBin)



Bir Klasör Silme:

My.Computer.FileSystem.DeleteDirectory("C:Test.txt", FileIO.UIOption.AllDialogs, FileIO.RecycleOption.SendToRecycleBin)



İstenen Dosya Var mı?

Dim dvarmi As Boolean= My.Computer.FileSystem.FileExists("C:Test.txt")



İstenen Klasör Var mı?

Dim kvarmi As Boolean = My.Computer.FileSystem.DirectoryExists("C:hedef_klasor")



Bir Dosyanın Boyutu Kaç?

Dim dboyutu As Long = My.Computer.FileSystem.GetFileInfo("dosya.txt").Length



Diskin Boş Boyutunu Öğrenmek:

Dim bosalan As Long = My.Computer.FileSystem.GetDriveInfo("C:").TotalFreeSpace



Bir Dosyanın Bilgilerini Öğrenme:
Dim dbilgi As FileInfo = My.Computer.FileSystem.GetFileInfo("C:Test.txt")

Dosyadan Metin Okuma:

Dim dicerigi As String = My.Computer.FileSystem.ReadAllText("C:Test.txt")



Klasörü Yeniden Adlandırma:

My.Computer.FileSystem.RenameDirectory("C:eski_klasor", "yeni_klasor")



Dosyayı Yeniden Adlandırma:

My.Computer.FileSystem.RenameFile("C:eski.txt", "yeni.txt")


  • Etiketler;
Berkay Yılmaz
Bilişim Teknolojileri - Web Tasarım bölümünde okuyor. Visual Basic, C#, C++, Flash ve Dreamveawer gibi programları kullanıyor.
Yorum Yaz

Yorum yazabilmek için üye girişi yapmanız gerekiyor!

Kardeş ben bu arkadaşın gösterdiği her komutu kendi seçimine bağlı olarak yaptıran bi program yaptım ve 2 gündür vb.net programlamayla uğraşıorm bakarsanız sevinirim vede bu komutları anlatan arkadaşa teşekkür ederim çok sağol
Pardon linki vermeyi unutmuşum :D
yine unuttum :D al altta http://hotfile.com/dl/103128729/491175c/Dosya_lemleri_y_KaJeMaiL.rar.html
Merhaba arkadaşım . Ben visual basic 6 da bir program yazdım . Programın çalıştıgı zaman kendi boyutunu bir label e yazdırmasını istiyorum nasıl yapabilirim ? Teşekkürler .
Berkay Hocam Merhaba. Vb ye yeni Başladım ve Şöyle bir Çalışam Yapmak istedim. Bilgisayardaki Masaüstü ve Belgelerim Klasörünü KOpyalayacak. Ama Bu Her Hangi Bir Pc de Çalışacak. Yani K.Adı Faklı Oluncada.. Şöyle bir Cod yazdım ama Belgelerim köasörünü Almıyor. Masaüstünü Alıyor Belgelerimi Kopyalamıyor. Imports System Imports System.IO Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If TextBox1.Text = "" Then SaveFileDialog1.FileName = Label1.Text Else SaveFileDialog1.FileName = TextBox1.Text End If SaveFileDialog1.ShowDialog() My.Computer.FileSystem.CreateDirectory(SaveFileDialog1.FileName) My.Computer.FileSystem.CopyDirectory(Environment.GetFolderPath(Environment.SpecialFolder.Desktop), SaveFileDialog1.FileName) End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles My
Video görünmüyor :(

Yukarı Git