پر کردن DropDownList با کد Vb

[iman.sad]

من میخوام DropDownList رو با کد vb و اتصال به بانک اطلاعاتی پر کنم لطف کنید اگه کدی در این ضمینه دارید در اختیار من بگذارید
:ممنون:

[rtech]

dim con as new sqlconnection(your connection)
dim str as string
str="select * from your table"
dim com as new sqlcommand(str,con)
dim obj as sqldatareader

con.open
obj=com.executereader
dropdownlist1.DataSource = obj
dropdownlist1.DataTextField = "field name"
dropdownlist1.DataValueField = "id"
dropdownlist1.databind
con.close
obj.close