| |
|
| |||||||
 |
| | Seçenekler |
|
#1
24-12-2007, 11:27
| ||||||
| ||||||
Database BaĞlantisiDatabase BaĞlantisi Bir vb projesinde database bağlantı yapıp database üzerinde işlem yapmak Şimdi bir vb projesinde bir database bağlantısı yapmak için references bölümünden Microsoft DAO 3.6 Object Library seçip okeyliyoruz. VERİTABANIN AÇILMASI Dim DTBS As Database Dim Tablo1 As Recordset Set DTBS = OpenDatabase("deneme.mdb") Set Tablo1 = DTBS.OpenRecordset("Makale") Makale yerine SQL komutlarıda yazmak mümkündür. VERİTABANINA YENİ KAYIT GİRMEK. Dim DTBS As Database Dim Tablo1 As Recordset Set DTBS = OpenDatabase("deneme.mdb") Set Tablo1 = DTBS.OpenRecordset("Makale") tablo1.addnew tablo1("tablo isimleri")=değişkenler tablo1("Baslik")=text1.text tablo1.update Burada database açıldıktan sonra tablo1.addnew ile database içindeki gizili cursor yeni bir kayıt ekler ve yeni kayıtın oraya sabitlenir. Daha sonra tablo1("Baslik")=text1.text gibi değişkenler eklenir. En son olarak bu kayıtların eklenip kaydolması için tablo1.update komutunu kullanırız... VERİTABANINDA KAYIT SİLMEK. Dim DTBS As Database Dim Tablo1 As Recordset Set DTBS = OpenDatabase("deneme.mdb") Set Tablo1 = DTBS.OpenRecordset(SQL KOMUTU) tablo1.delete Silmek ve aramak için en iyi yöntem tabii ki SQL komutudur. SQL komutu ile bir sorgu oluşturup daha sonra o kayıtı tablo1.delete ile silmek mümkün.. SQL KOMUT ÖRNEĞİ:::: "select*from makale where Baslik="&text1.text gibi bir komut kullanabiliriz. VERİTABANINDA KAYITLARI FORMA GETİRMEK. Dim DTBS As Database Dim Tablo1 As Recordset Set DTBS = OpenDatabase("deneme.mdb") Set Tablo1 = DTBS.OpenRecordset(SQL KOMUTU) do until tablo1.eof list1.additem tablo1("Baslik") tablo1.movenext loop Şeklinde herbir komutu do until döngüsüyle başlatıp forma eklenecek kısımları yazdıktan sonra tablo1.movenext deyip cursorun bir sonraki satıra geçmesi sağlanır. Loop ile döngü bitirilir....  |
|
| Arama Etiketleri: baglantisi, database |
| Seçenekler | |
| |
Benzer Konular | ||||
| Konu | Konu Açanlar | Forum | Cevaplar | Güncel Mesajlar |
| yardım....Database | altunter8051 | Visual Basic & Action script | 3 | 17-09-2008 05:57 |
| Database alacağım | taner_1 | Diğer işlemler | 3 | 20-04-2008 04:59 |
| Database yardım | djaykut043 | Yeni Başlayanlara WebmasterSitesi | 3 | 06-04-2008 12:03 |
| MS Access Database | MaNeX | Webmaster Sözlügü | 0 | 25-02-2008 12:19 |
| Database Yedeği | Efsane2006 | Mysql | 2 | 27-10-2007 01:19 |
 |  |
