(Şekil 1)
Şekil 1
Default.aspx i Şekil 2 deki gibi oluşturun.
Default.aspx i Şekil 2 deki gibi oluşturun.
Şekil 2
Şekil 3
Bu örneğimizde Northwind access veritabanındaki Customers tablosundaki verilerin gösterimini sağlayacağız.
Default.aspx.vb ye yazılacak kodlar:
Imports System.Data
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim baglan As System.Data.OleDb.OleDbConnection = New System.Data.OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("App_Data/Northwind.mdb"))
baglan.Open()
Dim da As System.Data.OleDb.OleDbDataAdapter = New System.Data.OleDb.OleDbDataAdapter("SELECT * FROM Customers", baglan)
Dim ds As DataSet
ds = New System.Data.DataSet()
da.Fill(ds, "Customers")
Repeater1.DataSource = ds
Repeater1.DataMember = "Customers"
Repeater1.DataBind()
baglan.Close()
End Sub
End Class
Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
Bu örneğimizde Northwind access veritabanındaki Customers tablosundaki verilerin gösterimini sağlayacağız.
Default.aspx.vb ye yazılacak kodlar:
Imports System.Data
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim baglan As System.Data.OleDb.OleDbConnection = New System.Data.OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("App_Data/Northwind.mdb"))
baglan.Open()
Dim da As System.Data.OleDb.OleDbDataAdapter = New System.Data.OleDb.OleDbDataAdapter("SELECT * FROM Customers", baglan)
Dim ds As DataSet
ds = New System.Data.DataSet()
da.Fill(ds, "Customers")
Repeater1.DataSource = ds
Repeater1.DataMember = "Customers"
Repeater1.DataBind()
baglan.Close()
End Sub
End Class
Bir sonraki makalede görüşmek üzere. Bahadır ŞAHİN
0 comments:
Yorum Gönder