Sihirbaz yardımıyla bağlantı

Microsoft Ado Data Control unu ekleriz.
Adodc uzerinde farenin sağ tuşuna basıp Properties komutuna tıklarız.
Karşımıza gelen pencereden Use Connection String ifadesinin hemen sağındaki Build komutuna tıklayarak sihirbaz yardımıyla veritabanı bağlantımızı yaparız.
Recordsource tabına tıklarız.
CommandType seceneğinden adcmdTable seceneğini
Hemen altındaki Table or Stroed Procedure Name acılır kutusundan Tablo adımızı seceriz.
Eğer SQL ifadeleri kendimiz yazmak istiyorsak. CommandType kısmından adcmdText sectikten sonra Command Text (SQL) kısmına SQL kodumuzu yazarız.
Tamam duğmesine basarız.
Adodc1 kontrolumuzun bağlantısını yapmış olduk.
Bundan sonraki işlemlerimiz gayet basit
İstediğimiz kontrolu formumuza ekleyebiliriz. Orneğin ben datagrid kontrolunu formuma eklemek istiyorum.
Bunun icin yine Microsoft Datagrid Controlunu formumuza ekledikten sonra
Bunun datasource ozelliğini Adodc1 yapıyoruz.

Kodla Bağlantı

Microsoft Ado Data Control unu ekleriz.
Adodc uzerinde farenin sağ tuşuna basıp Properties komutuna tıklarız.
Karşımıza gelen pencereden Use Connection String ifadesinin hemen sağındaki Build komutuna tıklayarak sihirbaz yardımıyla veritabanı bağlantımızı yaparız.
Use Connection String Kısmındaki ifadeyi keseriz. İptal tuşuna basarız.
Form_load olayına aşağıdaki kodları yazarız.
Kestiğimiz kodu adodc1.connectionstring= yazdıktan sonra yapıştırıyoruz.

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\ogrenci takip\okulogrenci.mdb"
Adodc1.RecordSource = "OGRENCI"

Bundan sonraki işlemlerimiz gayet basit
İstediğimiz kontrolu formumuza ekleyebiliriz. Orneğin ben datagrid kontrolunu formuma eklemek istiyorum.
Bunun icin yine Microsoft Datagrid Controlunu formumuza ekledikten sonra
form load kısmındaki kodu aşağıdaki kodu ekliyoruz.

Set DataGrid1.DataSource = Adodc1

Değişkenleri kendimiz kullanarak bağlantı yapma.

Yeni bir proje acarız.
Project Menusunden Preferences seceneğine tıklarız.
Microsoft ActiveX Data Object 2.8 Library seceniğini seceriz.
General kod kısmında aşağıdaki 2 değişkenimizi tanımlarız.

Dim baglanti as new adodb.connection
Dim kayitseti as new adodb.recordset

Form_load olayına aşağıdaki kodları yazarız.

baglanti.Open "Provider=Microsoft.Jet.Oledb.4.0; Data Source=D:\ado\okulogrenci.mdb"
kayitseti.Open "select * from OGRENCI", baglanti, adOpenKeyset, adLockOptimistic

Kontrollerimizi ekledikten sonra bunları kodla bağlamamız gerekecek.

Text1=kayitseti!ADSOYAD
Text2=kayitseti!NUMARA gibi…
__________________