PDA

View Full Version : bind combo



arsalansalar
سه شنبه 17 اردیبهشت 1387, 11:01 صبح
من برای bind کردن بانک به combo از کد زیر استفاده کردم.ولی نمایش نمی دهد.به نظر شما اشکال از کجاست؟


con = New OleDbConnection("provider=microsoft.jet.oledb.4.0 ; data source=" & Application.StartupPath() & "\database.mdb")
con.Open()
Dim da AsNew OleDbDataAdapter("select * from data", con)
Dim ds AsNew DataSet
da.Fill(ds, "text")
co.DataSource = ds
co.DisplayMember = "text"

masoodp666
سه شنبه 17 اردیبهشت 1387, 11:17 صبح
به خاطر اینکه table رو توی dataset تعریف نکردی !


co.DataSource = ds


عوضش کن به:


co.DataSource = ds.Table("data")


البته قبل از اون باید table به dataset اضافه کنی.

ساران سافت
جمعه 01 آذر 1387, 16:30 عصر
جواب نمی ده

s.k711
شنبه 02 آذر 1387, 12:08 عصر
salam. bayad in ghesmat ha ra meghdar bedin.