Koxp, Koxp Türkiye, Koxp 1868, 1869 Koxp  

Geri git   Koxp, Koxp Türkiye, Koxp 1868, 1869 Koxp > Programlama > Visual Basic > Vb Paylaşımlar

Vb Paylaşımlar Genel paylaşımlar..

Hoş geldiniz..
www.HilePort.Com



Yeni sitemize sizleride bekleriz.

Cevapla
 
LinkBack Konu Araçları Stil
Alt 05-10-2011, 18:54   #1 (permalink)
Kral
 
DieChild - ait Kullanıcı Resmi (Avatar)
 
Kişisel
Bulunduğu yer: in ne önemi var gönüller bir olsun
Forum
Üye No: 28641
Üyelik tarihi: Jun 2010
Mesajlar: 469
Teşekkürler
+ Puan Verdi: 39
+ Puan Aldı: 108
Rep Bilgileri
Rep Gücü: 100
Rep Derecesi:
DieChild will become famous soon enoughDieChild will become famous soon enough
Standart Dosyalama Türleri

1.Rastgele Erişimli Dosyalar

Rastgele Erişimli Data dosyalarında veriler dosyalara bir kayıt numarası ile kaydedilirler. Her verinin bir kayıt numarası vardır ve okuma işlemi bu kayıt numaralarına göre yapılır. Bu nedenden dolayı sıralı erişimli data dosyalarına göre çok daha hızlıdır. Şimdi de bazı fonksiyon ve deyimleri öğreneceğiz.

1.Open Deyimi
Arkadaşlar, bu deyim dosyayı açmak için kullanılır. Sıralı erişimli dosyalarda da kullanıldığı için Rastgele açmak için "Random" modu kullanılır.
Dizilim ::>Open dosya adıve yolu [For Random],As[#]dosya adı
Örnek ::>Open "C:\diechild.dat" For Random As #1

2.Put Deyimi
Arkadaşlar bu deyim ise dosyaya veri yazmak için kullanılır.
Dizilim ::>Put[#] dosya no,[Kayıt no],değişken ismi
Örnek ::>Put #1 ,kimlik ,text ,kimlik

3.Get
Dosyadan programa veri okumak iin kullanılır.Okunması istenen veri kayıt numarası ile belirtilir.
Dizilim ::>Get [#] dosya no,[kayıt no],değişken ismi
Örnek ::>Get #1 ,12 ,kimlik

4.EOF
Dosya sonun belirlenmesinde kullanılır.

5.Close Deyimi
Open deyimi ile açılan dosyanın kapatılmasında kullanılır..


>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

Şimdi ilk önce bir uyarı yapıyım ::>> ARkadaşlar C:\ dizinine ilk önce bir "diechild.dat" diye bir dat dosyası oluşturun. Daha Sonra gelelim şimdi program kodlarına. İlk önce form'a şunu yazıyoruz.

Alıntı:
Private Type DieChild
kayitno As Long
isimsoyisim As String * 20
dogum As Date
yer As String * 20
End Type
Dim kayit As DieChild
Command1'e eklenecek kod;

Alıntı:
On Error GoTo hata
Open "C:\diechild.dat" For Random As #1
oku = Val(InputBox("Kayıt No :", "Kayıt No"))
Get #1, oku, kayit
Text1.Text = kayit.kayitno
Text2.Text = kayit.isimsoyisim
Text3.Text = kayit.dogum
Text4.Text = kayit.yer
Close #1: Exit Sub
hata:MsgBox "Hatalı İşlem!",vbExclamation,"Hata":
Close #1
Command2'e eklenecek kod;


Alıntı:
Open "C:\diechild.dat" For Random As #1
On Error GoTo hata
kayit.kayitno = Text1.Text
kayit.isimsoyisim = Text2.Text
kayit.dogum = Text3.Text
kayit.yer = Text4.Text
Put #1, kayit.kayitno, kayit
Close #1: Exit Sub
hata:MsgBox "Hatalı İşlem!",vbExclamation,"Hata":
Close #1
Command3'e eklenecek kod;

Alıntı:
Private Sub Command3_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
End Sub
Bu Şekilde Programınızı Yapabilirsiniz.

>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> >>>>

Bilgilere Devam Edelim.


2.Sıralı Erişimli Dosyalar

Sıralı erişimli data dosyalarında veriler dosyaya birbirini takip edecek şekilde sıra ile yazılır. Yani veriler dosyanın sonuna eklenir. Bu dosyalam tipi Rastgele Erişimli dosyalama tipine göre daha yavaştır.

1.Open Deyimi
Open deyimi dosyayı veri giriş-çıkış için hazılar.Bir dosyaya veri yazmadan veya okumadan önce dosya mutlaka Open deyimi ile açılmalıdır..
Dizilim ::>Open dosya adı ve yolu [Form Mod],As[#] dosya no
Örnek ::>Open "C:\diechild.dat" For Input As #1

2.Input Parametresi
Input parametresi bir veri dosyasından programa veri okunabilmesi için Open deyimi ile birlikte kullanılması gereken mod'tur..
Dizilim ::>Open dosya adı ve yolu [Form Mod],As[#] dosya no
Örnek ::>Open "C:\diechild.dat" For Input As #1

3.Output Parametresi
Dosyaya veri yazılabilmesi için dosyanın output modunda açılması gerekir.Output modu ile açılan dosyanın tüm içeriği silinir.Bir dosyaya içeriğini silmeden veri eklemek için "Append" modu kullanılır.
Dizilim ::>Open dosya adı ve yolu [Form Mod],As[#] dosya no
Örnek ::>Open "C:\diechild.dat" For Output As #1

4.Append Parametresi
Arkadaşlar az önceki madde de belirtiğiminin aynısı fakat ben farklı bir madde anlatıyım dedim..Yeni bir veri eklediğimiz de diğer verilerin silinmemesini sağlıyor.
Örnek ::>Open "C:\diechild.dat" For Append As #1

5.Input # Deyimi
Evet arkadaşlar dosyadan veri okunmasını sağlar.Input # deyimöini kullanabilmek için Open deyimi ve Input modunda dosyanın açılmış olması gerekmektedir.Input ile Input # karıştırmayın.Input dosyadan okuma yapılabilmesi için gerekli olan izini verir ,Input # ise dosyadan veri okumak için kullanılır.

6.Write # Deyimi
Write # dosyaya veri yamak için kullanılır.Bunu kullanabilmek için dosyanın Open deyimi ve Output parametresi ile açılmış olması gerekir.
Dizilim ::> Write # dosyanumarası [Dosyaya yazılacak değişken veya ifade]

7.Print # Deyimi
Write # gibi dosyaya veri yazmak için kullanılır.Arasındaki fark dosyaya yazış şeklidir.Genellikle programlar da write # kullanılır.
Dizilim ::> Print # dosyanumarası [Dosyaya yazılacak değişken veya ifade]

8.Close Deyimi
Açık olan dosyaları kapatmak için kullaılır.
Dizilim ::> Close # [dosya numarası]

9.EOF
EOF fonksiyonu sayfanın sonuna gelinip gelinmediğini kontrol eder. Sayfa sonunda kadar değeri "False " geldiğinde ise "True" olur.
Örnek ::>Eof [dosyano]


Not: Bu dosyalama tipi fazla kullanılmamaktadır. Sebebi ise yavaş olmasıdır.
DieChild isimli Üye şimdilik offline konumundadır   Alıntı ile Cevapla
1 + Puan Aldı
KiSSoFDeaTH (05-10-2011)
Cevapla

Etiket
dosyalama, türleri


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Konu Araçları
Stil

Yetkileriniz
Yeni Mesaj yazma yetkiniz Aktif değil dir.
Mesajlara Cevap verme yetkiniz aktif değil dir.
Eklenti ekleme yetkiniz Aktif değil dir.
Kendi Mesajınızı değiştirme yetkiniz Aktif değildir dir.

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-KodlarıKapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık

Sponsor : balon patlatma puanlı giysi giydirme oyunları süper oyunlar kral oyun mario oyunları

Bütün Zaman Ayarları WEZ +2 olarak düzenlenmiştir. Şu Anki Saat: 09:54 .

Powered by vBulletin® Copyright ©2000 - 2012, Jelsoft Enterprises Ltd.
# CaN.