Visual Basic'te ADODC nasıl kullanılır

Veri Denetiminin ADO (Active Data Objects) (ADODC), Visual Basic 6.0'da eklenen yeni bir yöntemdir.

1. Adım

Visual Basic 6.0 programına sağ tıklayın ve "Yönetici olarak çalıştır" ı seçin. "Dosya" ve ardından "Yeni Proje" üzerine tıklayarak yeni bir proje başlatın. Listeden "Proje Verileri" şablonunu seçin.

2. Adım

Sağdaki "Veri Projesi" listesinde görüntülenen "frmDataEnv" ye çift tıklayın. Form üzerine bir ADO veri denetimi yerleştirin, ekranın solundaki araç kutusundaki ADODC kontrolüne çift tıklayın.

3. adım

Varolan bir veritabanına bağlantı yapılandırın, "ADODC Özellikleri" ni seçerek formda şimdi ADODC denetimini tıklayın. Özellikler sayfasında "Dize bağlantısı kullan" seçeneğinin seçildiğinden ve "Oluştur" a tıkladığınızdan emin olun. Kullanılacak veri türü seçiminde, veritabanını bilgisayarda nerede bulacağınız ve parola kullanmak isteyip istemediğinizi belirten, görüntülenen adımları izleyin.

4. Adım

3. adımdaki tüm bilgiler tamamlandığında, veri bağlantısının özelliklerinde "Bağlantı" diyaloğunda bulunan "Test bağlantısı" na tıklayın. Bağlantı başarısız olursa, geri dönüp veritabanınıza bağlanmak için seçilen senaryoları gözden geçirin.

Adım 5

Araç kutusundaki "düğmesine" çift tıklayarak ve daha sonra tekrar yaparak fmDataEnv üzerinde iki komut düğmesi yerleştirin. Bir düğmenin adını "cmdAddNewRecord" ve altyazıyı "Yeni Kayıt Ekle" olarak değiştirin. Diğer düğmenin adını "cmdDeleteRecord" olarak ve başlığı "Kaydı sil" olarak değiştirin.

6. Adım

"CmdAddNewRecord" üzerine çift tıklayın ve rutinin başlangıcı ile bitişi arasındaki kodu girin: "Adodc1.Recordset.AddNew". Bu kod ile "cmdDeleteRecord" düğmesi için de aynı şeyi yapın: "Adodc1.Recordset.Delete" (bu kodun sonundaki süreyi dahil etmeyin).

7. adım

Kullanıcı 6. adımdaki seçeneklerden birini tıkladığında ne olması gerektiğine dikkat etmek için kodu yazın: Özel Alt Form_Load () Adodc1.Recordset.ActiveConnection.BeginTrans End Sub Özel Alt Form_Unload (Tam Sayı Olarak İptal Et) Eğer MsgBox ("Kayıt defteri değişikliklerini kabul et?", VbYesNo) = vbYes Sonra Adodc1.RecordSet.ActiveConnection.CommitTrans Else Adodc1.Recordsete.ActiveConnection.RollbackTrans End If End Sub

8. adım

Kullanıcı eklemek veya silmek için bir mekanizma oluşturmak için forma etiketleri ve TextBox denetimleri ekleyerek ADODC yapılandırmasını sonlandırır. Spesifik kontroller veritabanı ihtiyaçlarına bağlı olacaktır. Nasıl görüneceğine dair bir örnek görmek için resme bakın.