Project/Components'ten
Microsoft Internet Transfer Control
Microsoft Ado Data Control
Microsoft Datagrid Control
projenize eklyin
1 adet label ve 1 adet command ekleyin
kodlari oldugu gibi forma yapistirin
Private Sub Command1_Click()
Label1.Caption = "Veritabaninda toplam " & Adodc1.Recordset.RecordCount & " kayit var"
End Sub
Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=\\www.sezginweb.com\deneme\kayit.mdb"
Adodc1.RecordSource = "tblogrenciler"
Set DataGrid1.DataSource = Adodc1
End Sub
'''''''sunasoft@hotmail.com
'''''''www.sezginweb.com