| Article |
|---|
CSV Dosyasından Okuma Yapmak
Merhaba arkadaşlar bu makalemizde CSV formatındaki dosyamızdan kriterimize göre aradığımız verileri ListBox ta listelenmesini sağlayacağız. Bu örneğimizde yazarların kitaplarının fiyatına göre arama yapacağız. |
GridView da Dosya İndirme İşlemi
Merhaba arkadaşlar bu makalemizde GridView nesnesine ekleyeceğimiz hyperlink linkine tıkladığımızda files klasöründe bulunan dosyaları indirme işlemini gerçekleştireceğiz. Projemize GridView ve SqlDataSource ekleyelim. |
ProgressBar İle Birlikte Dosya Kopyalama Örneği
Merhaba arkadaşlar bu makalemizde progressbar ile birlikte dosya kopyalama ile ilgili bir örnek yapacağız. OpenFileDialog ile seçtiğimiz dosyayı kopyalarken kopyalama yüzdesi ve kopyalama boyutunu da ekran da göstereceğiz. |
GridView da Seçili Dosyaları Çoklu Olarak Sıkıştırmak
Merhaba arkadaşlar bu makalemizde Gridview nesnesinde seçilecek olan dosyaları çoklu olarak zipleyeceğiz. İlk önce Ionic.Zip.dll dosyasını buradan indiriniz.
|
Dosya İsimlerini Sıralı Şekilde Oluşturma
Merhaba arkadaşlar, bu makalemizde deneme klasöründe oluşturduğumuz dosyalara, ekleyeceğimiz yeni dosya isimleri ve numaraları sıralı bir şekilde önceki dosyaları takip edecek şekilde dosya ismi vereceğiz |
Dosya Kopyalama,Taşıma ve Silme İşlemleri
Merhaba arkadaşlar, bu makalede Directory, dosya kopyalama, taşıma ve silme işlemlerini göreceğiz. İlk önce class kısmına using System.IO; ekleyin. |
Dosya Adı ve Sayısını Öğrenmek
Merhaba arkadaşlar, bu makalemizde C sürücüsünde bulunan Text dosyalarının adını ve sayısını öğreneceğiz. |
Dosya Bilgilerinin Alınması
Merhaba arkadaşlar. Bu makalemizde WalPaper adlı dosyadaki jpeg resimlere ait bilgileri alacağız. Oluşturacağınız ConsoleApplication dosyasına aşağıdaki kodları yazın. |
Excel Dosyası Oluşturma
Bu örneğimizde Excel dosyası oluşturacağız. Formunuza 1 adet Button ekleyin ve aşağıdaki kodları yazın... |
Dosya Uzantısı Arama
Merhaba arkadaşlar, bu örnekte TextBox a girilen dosya uzantılarını arayıp, ListBox ta gösterimini sağlayacağız. Şekil 1 de görüldüğü gibi C dizininde arama yaptık. |
C sürücüsündeki txt Uzantılı Dosyaları Listelemek
Proje için Console Application formu oluşturun. Imports System.IO ı formunuza ekleyin. C sürücüsünde bulunan txt dosyaları
gösterimini aşağıdaki Şekil 1 deki gibi sağlıyacağız.
Imports System.IO
Module getfiles
Sub Main()
Dim dInfo As DirectoryInfo
dInfo = New DirectoryInfo("C:\\")
Dim dbilgi() As FileInfo
Try
dbilgi = dInfo.GetFiles("*.txt")
For Each bilgi In dbilgi
Console.WriteLine(bilgi.FullName)
Next
Catch ex As Exception
Console.WriteLine(ex.Message)
End Try
Console.ReadLine()
End Sub
End Module
Bir makalenin daha sonuna geldik. Bir sonraki makalede görüşünceye kadar. Hoşçakalın. Bahadır ŞAHİN
|
Dosya Boyutunu Öğrenme
C sürücüsündeki deneme.txt dosyasının boyutunu öğreneceğiz.
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim dosyaBoyut As IO.FileInfo
dosyaBoyut = My.Computer.FileSystem.GetFileInfo("C:/deneme.txt")
MessageBox.Show("Dosya Boyut: " & dosyaBoyut.Length & " byte(s)")
End Sub
End Class
Bir sonraki makalede görüşmek dileğiyle. Bahadır ŞAHİN |
Şifreli Text Dosyasını Çözmek
Bir önceki makalede Textbox a girilen stringi şifreledik ve sifreli.txt dosyası olarak kaydetmiştik. (Şekil1)
Şimdi ise şifrelidiğimiz dosyadaki bilgileri
tekrardan çözeceğiz.
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using System.IO;
using System.Security.Cryptography;
namespace WindowsFormsApplication1
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
private void button1_Click(object sender, EventArgs e)
{
TripleDESCryptoServiceProvider tdes = new TripleDESCryptoServiceProvider();
FileStream fs = File.OpenRead(@"c:\sifreli.key");
BinaryReader br = new BinaryReader(fs);
tdes.Key = br.ReadBytes(24);
tdes.IV = br.ReadBytes(8);
FileStream fstream = File.OpenRead(@"c:\sifreli.txt");
CryptoStream cs = new CryptoStream(fstream, tdes.CreateDecryptor(), CryptoStreamMode.Read);
StreamReader sr = new StreamReader(cs);
textBox1.Text = sr.ReadToEnd();
sr.Close();
}
}
}
//Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN |
Dosya ve Klasör Kontrolü
Bu makalemizde C:\ sürücüsünde adı geçen dosya ve klasör mevcut mu? Eğer yok ise otomatik olarak oluşturacağız.
İlk önce;
using System.IO;
i ekleyin.
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
using System.IO;
namespace WindowsApplication1
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
private void Form1_Load(object sender, EventArgs e)
{
}
private void button1_Click(object sender, EventArgs e)
{
//dosya kontrol
string str;
str = "C:\\deneme.text";
if (File.Exists(str) == false)
{
File.Create(str);
MessageBox.Show(str + " oluşturuldu", "Uyarı");
}
else if(File.Exists(str) == true)
{
MessageBox.Show(str + " dosyası zaten var.", "Uyarı");
}
}
private void button2_Click(object sender, EventArgs e)
{
//klasor kontrol
string str;
str = "C:\\dosyalar";
if (Directory.Exists(str) == false)
{
Directory.CreateDirectory(str);
MessageBox.Show(str + " oluşturuldu", "Uyarı");
}
else if(Directory.Exists(str) == true)
{
MessageBox.Show(str + " dosyası zaten var.", "Uyarı");
}
}
}
}
//Bir sonraki makalede görüşmek üzere. Bahadır.
|
Seçili Dosyanın Genel Özelliklerinin Alınması
Bu makalede openFileDialog ile seçilen dosyanın uzantısını, dosya yolunu, boyutunu, oluşturulma tarihi gibi genel özelliklerini alacağız. Formunuza 5 adet label, textBox, 1 adet button ve openFileDialog ekleyin. Şekil1 i inceleyin.
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using System.IO;
namespace WindowsFormsApplication1
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
private void textBox4_TextChanged(object sender, EventArgs e)
{
}
private void Form1_Load(object sender, EventArgs e)
{
this.Text = "Dosya Özellikleri...Bahadirsa";
this.MaximizeBox = false;
this.Location = new Point(250, 200);
this.Size = new System.Drawing.Size(274, 235);
}
private void btnTikla_Click(object sender, EventArgs e)
{
openFileDialog1.Title = "Dosya Aç-Bahadır ŞAHİN";
openFileDialog1.InitialDirectory = "C:\\";
openFileDialog1.Filter = "Tüm Dosyalar(*.*)|*.*";
if (openFileDialog1.ShowDialog() == System.Windows.Forms.DialogResult.OK)
{
string path = openFileDialog1.FileName;
FileInfo dosya = new System.IO.FileInfo(path);
float str;
str = ((dosya.Length) / 1000);
txtName.Text =dosya.Name.ToUpper();
txtUzanti.Text =dosya.Extension.ToUpper();
txtLength.Text =str.ToString() + " KB.";
txtDate.Text = dosya.CreationTime.ToString();
txtAdres.Text =dosya.DirectoryName;
}
}
}
}
//Bir sonraki makalede görüşmek üzere. Bahadır |
Dosya Yolunu Açmak
Bu örneğimizde dosyalarımızın bulunduğu klasörü açacağız. Bunun için process metodundan faydalanacağız. Bu örnekte Windows klasörünü açacağız.
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
namespace WindowsFormsApplication1
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
private void button1_Click(object sender, EventArgs e)
{
System.Diagnostics.Process yeniProcess;
yeniProcess = System.Diagnostics.Process.Start("Explorer.exe ", "C:\\Windows");
yeniProcess.CloseMainWindow();
yeniProcess.Close();
}
}
}
//Bir sonraki makalede buluşmak üzere. Bahadır |
Dosya Yolunu ve Özelliklerini Öğrenmek
Bu örnekte dosyanın yolunu, uzantısını, adını, directory i öğreneceğiz. İlk önce ConsoleAplication sayfası açın. Aşağıdaki şekli inceleyin.
Imports System.IO
Module Module1
Sub Main()
Dim P As String = "C:\Test.txt"
Try
Console.WriteLine("Başlama Adresi: {0}", P)
Console.WriteLine("Directory Adı: {0}", Path.GetDirectoryName(P))
Console.WriteLine("Uzantı: {0}", Path.GetExtension(P))
Console.WriteLine("Dosya Adı: {0}", Path.GetFileName(P))
Console.WriteLine("Uzantı İle Birlikte Dosya Adı: {0}", Path.GetFileNameWithoutExtension(P))
Console.WriteLine("Tam Adres: {0}", Path.GetFullPath(P))
Console.WriteLine("Root: {0}", Path.GetPathRoot(P))
Catch E As Exception
Console.WriteLine("Hata: {0}", E.Message)
End Try
Console.WriteLine()
Threading.Thread.Sleep(10000)
End Sub
End Module
Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN |
Dosya İsmi Değiştirme
İstediğiniz dosyanın ismini küçük bir kod
parçasıyla değiştirebilirsiniz.
İlk önce;
Imports System.IO i
formunuza eklemeyi unutmayın.
Imports System.IO
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim dosyabilgi As New FileInfo("C:\image.jpg")
'image.jpg ismini resim.jpg olarak değiştireceğiz.
dosyabilgi.MoveTo("C:\resim.jpg")
'veya klasör ismi değiştirmek istersek;
'Dim dosyabilgi As New FileInfo("C:\test")
'dosyabilgi.MoveTo("C:\test2")
End Sub
End Class
Bir sonraki makalede buluşmak üzere. Bahadır ŞAHİN |
Haftanın Gününe Göre Dosya Kopyalama
Haftanın gününe göre seçilen dosyanın yedeğini
alınmasını sağlıyacağız. Aşağıdaki şekilleri inceleyin.
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim tarih As Date = Now
Dim gun
Dim gunadi
gun = Weekday(tarih, FirstDayOfWeek.Monday)
gunadi = WeekdayName(gun, False, FirstDayOfWeek.Monday)
Dim gunsayi
gunsayi = Weekday(tarih, FirstDayOfWeek.Monday)
‘kopyalacak text dosyası oluşturuluyor.
‘sizler istediğiniz dosyanın günlük olarak yedeğini
‘alabilirsiniz.
Dim dosya As New System.IO.StreamWriter("C:\test" & gunsayi.ToString & ".txt")
dosya.WriteLine("Bugün :" & tarih & " Günlerden : " & gunadi)
dosya.Close()
Dim i As Integer
For i = 1 To 7 Step 1
‘Ör:gün sayısı 3 ise Gün: Çarşamba
‘test3.txt dosyasını yedek3.txt olarak Çarşamba günü
‘kopyalayacaktır.
If gunsayi = i Then
FileCopy("C:\test" & gunsayi.ToString & ".txt", "C:\yedek" & gunsayi.ToString & ".txt")
MessageBox.Show("C:\test" & gunsayi.ToString & " dosyası " & " C:\yedek" & gunsayi.ToString & ".txt" & " olarak kopyalandı")
End If
Next
Me.Close()
End Sub
End Class
‘Bir sonraki makalede görüşmek üzere. Bahadır
|
Dosya Kopyalama
Bu örnekte FileCopy metodu ile txt, doc, xls, jpg vb. uzantıdaki dosyaları mevcut konumlarından istediğiniz konuma kopyalamayı göreceğiz.
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.SizableToolWindow
Me.Text = "Dosya Kopyalama"
Me.Left = 300
Me.Top = 180
Me.Width = 205
Me.Height = 108
Button1.Size = New System.Drawing.Size(150, 30)
Button1.Text = "Yeni Dizine Kopyala"
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
FileCopy("C:\dosya\deneme.txt", "C:\deneme.txt")
FileCopy("C:\dosya\deneme.doc", "C:\deneme.doc")
FileCopy("C:\dosya\deneme.xls", "C:\deneme.xls")
FileCopy("C:\dosya\deneme.jpg", "C:\deneme.jpg")
MessageBox.Show("Dosyalar yeni dizine kopyalandı")
End Sub
End Class
Bir sonraki makalede görüşmek üzere. Bahadır
|
Xml Dosyasına Kayıt
Bu örneğimizde Northwind.mdb veritabanındaki alanlardan çektiğimiz bilgileri, Xml olarak kaydedeceğiz...Bahadirsa
Forma yazılacak kodlar:
Imports System.Xml
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim baglan As OleDb.OleDbConnection = New Data.OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Northwind.mdb")
Dim adp As New OleDb.OleDbDataAdapter
Dim str As String = "Select * From " & cmb.Text
adp.SelectCommand = New OleDb.OleDbCommand(str, baglan)
baglan.Open()
Dim ds As New Data.DataSet
adp.Fill(ds)
Dim xreader As Xml.XmlReader
‘bu xmlreader executereader dan farklı olarak sonucu xml olarak üretiyor.
ds.ReadXml(xreader)
‘datasetimize xml mizi okutuyoruz.
ds.WriteXml("C:\test.xml")
‘ve harddiskimize dataseti yazdırıyoruz.
baglan.Close()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
cmb.Text = "Customers"
With Me
.Text = "XML Olarak Kayıt...Bahadirsa"
.MaximizeBox = False
.MinimizeBox = False
.Location = New Point(350, 200)
End With
End Sub
End Class
‘Bir sonraki makalede görüşmek dileğiyle...Bahadirsa |
Xml Dosyasından Kayıt Okuma
Arkadaşlar bu örneğimizde, hazır bulunan xml dosyamızdan, oluşturduğumuz textboxlara veri ve picturebox ımıza resim çekeceğiz.
İlk önce yapmanız gereken Xml dosyanızı oluşturmak. Bunun için Microsoftun sitesinden xmlnotepad programından yararlanabilirsiniz.
Örnektede görüldüğü gibi, XmlReader metodu kullanarak bilgilerimizi xml dosyasından çekeceğiz...Bahadirsa
Forma yazılacak kodlar:
Imports System.XML
Public Class Form1
Dim i As Integer = 0
Private Sub btnVeriAl_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnVeriAl.Click
i = i + 1
btnVeriAl.Text = "Kayıt İleri"
Dim reader As Xml.XmlReader = New System.Xml.XmlTextReader("bahadirsa_bilgi.xml")
While (reader.Read())
If i = 1 Then
If (reader.NodeType = XmlNodeType.Element) Then
If (reader.Name.Equals("id")) Then
TextBox1.Text = reader.ReadString()
ElseIf (reader.Name.Equals("ad")) Then
TextBox2.Text = reader.ReadString()
ElseIf (reader.Name.Equals("soyad")) Then
TextBox3.Text = reader.ReadString()
ElseIf (reader.Name.Equals("ogrenim")) Then
TextBox4.Text = reader.ReadString()
ElseIf (reader.Name.Equals("meslek")) Then
TextBox5.Text = reader.ReadString()
ElseIf (reader.Name.Equals("il")) Then
TextBox6.Text = reader.ReadString()
ElseIf (reader.Name.Equals("image1")) Then
PictureBox1.Image = Image.FromFile(reader.ReadString())
End If
End If
End If
If i = 2 Then
If (reader.NodeType = XmlNodeType.Element) Then
If (reader.Name.Equals("id2")) Then
TextBox1.Text = reader.ReadString()
ElseIf (reader.Name.Equals("ad2")) Then
TextBox2.Text = reader.ReadString()
ElseIf (reader.Name.Equals("soyad2")) Then
TextBox3.Text = reader.ReadString()
ElseIf (reader.Name.Equals("ogrenim2")) Then
TextBox4.Text = reader.ReadString()
ElseIf (reader.Name.Equals("meslek2")) Then
TextBox5.Text = reader.ReadString()
ElseIf (reader.Name.Equals("il2")) Then
TextBox6.Text = reader.ReadString()
ElseIf (reader.Name.Equals("image2")) Then
PictureBox1.Image = Image.FromFile(reader.ReadString())
End If
End If
End If
If i = 3 Then
If (reader.NodeType = XmlNodeType.Element) Then
If (reader.Name.Equals("id3")) Then
TextBox1.Text = reader.ReadString()
ElseIf (reader.Name.Equals("ad3")) Then
TextBox2.Text = reader.ReadString()
ElseIf (reader.Name.Equals("soyad3")) Then
TextBox3.Text = reader.ReadString()
ElseIf (reader.Name.Equals("ogrenim3")) Then
TextBox4.Text = reader.ReadString()
ElseIf (reader.Name.Equals("meslek3")) Then
TextBox5.Text = reader.ReadString()
ElseIf (reader.Name.Equals("il3")) Then
TextBox6.Text = reader.ReadString()
ElseIf (reader.Name.Equals("image3")) Then
PictureBox1.Image = Image.FromFile(reader.ReadString())
End If
End If
End If
If i > 3 Then
i = 1
End If
End While
reader.Close()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
With Me
.Text = "Xml Dosyadan Veri Okuma...Bahadirsa"
.MaximizeBox = False
.Location = New Point(250, 200)
End With
End Sub
End Class
‘Bir sonraki makalede görüşmek dileğiyle...Bahadirsa |
Text Dosyasından Okuma ve Text Dosyasına Kayıt
Bu makalemizde oluşturduğumuz text dosyasından bilgi okuyacağız. Ayrıca text dosyamıza kayıt gerçekleştireceğiz. Bu örneğimizde text dosyamızı C:\test.txt olarak oluşturduk. Aşağıdaki şekilden örneğimizi görebilirsiniz.
Forma yazılacak kodlar:
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
With Me
.Text = "Text Dosyaya Kayıt...Bahadirsa"
.MaximizeBox = False
.Location = New Point(300, 200)
End With
End Sub
‘Text dosyaya kayıt StreamWriter
‘metodu ile olmaktadır.
Private Sub btnkaydet_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnkaydet.Click
Dim dosya As New System.IO.StreamWriter("C:\test.txt")
dosya.WriteLine(txtyaz.Text)
dosya.Close()
End Sub
‘ Text dosyadan okuma StreamReader
‘metodu ile yapılıyor.
Private Sub btnoku_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnoku.Click
Dim dosya As New System.IO.StreamReader("C:\test.txt")
Dim str As String = dosya.ReadToEnd()
txtyaz.Text = str
dosya.Close()
End Sub
End Class |
Text Dosya Download Etmek
Aşağıdaki küçük kod parçası ile, text dosyayı bilgisayarımıza indireceğiz. Aşağıdaki şekilleri inceleyin. |
Metin Dosyasındaki Verileri GridView da Gösterme
Bu makalemizde App_Data mızdaki kayitlar.txt metin dosyamızdaki verileri, GridView nesnemize aktarıp, gösterimini sağlayacağız. Aşağıdaki şekilleri inceleyin. |
GridView daki Verileri Metin Dosyasına Kaydetme
Önceki makalelerde Excel dosyasına aktarmayı gördük. Şimdi Gridview nesnemizdeki verileri Metin dosyasına aktaracağız. Ayrıca Sil ve Güncelle butonları ekleyeceğiz.
|
FileUpload ile Sitenize Dosya Yükleyin-C#
Evet arkadaşlar. FileUpLoad metodu ile sitenize istediğiniz dosyaları yükleyebilirsiniz. Bu örneğimizde resim dosyalarını sitemize yükleyeceğiz. Aşağıdaki örnek şekillerden uygulamayı görebilirsiniz. |
DataGridView da Dosya Boyutunun Gösterilmesi
Bu makalemizde DataGridView nesnesinde dosyanın konumu ve boyutunu göstereceğiz. İlk önce formumuza 1 adet OpenFile Dialog, 1 adet DataGridView ve Button ekliyelim. Formumuzu aşağıdaki şekildeki gibi oluşturalım... |
Xml Dosyasına Kayıt
Bu örneğimizde Northwind.mdb veritabanındaki alanlardan çektiğimiz bilgileri, Xml olarak kaydedeceğiz... |