AccessTr.neT

 Dim baglanti As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source='vt.mdb'")

 Dim dvr As New OleDbDataAdapter("SELECT * from tablo1 where no='" & txtara.Text & "' ", baglanti)

 Dim dsr As New DataSet

 dvr.Fill(dsr, "tablo")



 TextBox1.DataBindings.Add("text", dsr, "tablo.1")

 TextBox2.DataBindings.Add("text", dsr, "tablo.2")

 TextBox3.DataBindings.Add("text", dsr, "tablo.3")

 TextBox4.DataBindings.Add("text", dsr, "tablo.4")

 TextBox5.DataBindings.Add("text", dsr, "tablo.5")

 TextBox6.DataBindings.Add("text", dsr, "tablo.6")

 TextBox7.DataBindings.Add("text", dsr, "tablo.7")

vb.nette textboxa girilen sayıya göre yaptığım Access dosyasının içindeki 1 2 3 4 5 6 7 alanlarını textboxlar içine aktarmak istiyorum bunu bu şekilden başka ne türde yapabilirim databindingins sürekil hata veriyor arka arkaya arama yapınca

Gridview kullanmanı öneririm. Ama veri çekmek istiyorum dersen



        If IsNumeric(TxtAra.Text) Then

        Else

            TxtAra.Text = 0

        End If

        Dim Sql As String = "SELECT * FROM Tablo1 WHERE([0]=" & TxtAra.Text & ")"

        Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source='vt1.mdb'")

        Dim cmd As New OleDbCommand(sql, con)

        If con.State = ConnectionState.Closed Then con.Open()

        Dim tbl As OleDbDataReader = cmd.ExecuteReader()



        While tbl.Read = True

            TextBox1.Text = IIf(IsDBNull(tbl.Item("1")), "", tbl.Item("1"))

            TextBox2.Text = IIf(IsDBNull(tbl.Item("2")), "", tbl.Item("2"))

            TextBox3.Text = IIf(IsDBNull(tbl.Item("3")), "", tbl.Item("3"))

            TextBox4.Text = IIf(IsDBNull(tbl.Item("4")), "", tbl.Item("4"))

            TextBox5.Text = IIf(IsDBNull(tbl.Item("5")), "", tbl.Item("5"))

            TextBox6.Text = IIf(IsDBNull(tbl.Item("6")), "", tbl.Item("6"))

            TextBox7.Text = IIf(IsDBNull(tbl.Item("7")), "", tbl.Item("7"))

        End While

        tbl.Close()

aradağım tamda bu sanırım teşekkürler.

datagrid göstermek istemiyorum o olmadan yapmak istiyorum

basicnet

ayhan2122

basicnet