Originally Posted by bala24

Well glad to help.
Do remember to set this thread as Solved so that others could benefit from this solution.

Originally Posted by johnny.g

thnks dude ,,,will go thr tht link n let u know if it wrks for me,,,,
by the way i found a the code tht i wanted finally,,,here it is ,its very simple using only sql data reader,,,here it is

Help with Code Tags

(Toggle Plain Text)

Dim conn = New SqlConnection("Data Source=(local);Initial Catalog=(databasename);user id=;pwd=;Trusted_Connection=yes")
        conn.open()
        Dim dr As SqlDataReader
        Dim cmd = New SqlCommand("select * from details", conn)
        dr = cmd.ExecuteReader()
        DropDownList1.DataSource = dr
        DropDownList1.DataTextField = "fname"
        DropDownList1.DataValueField = "srno"
        DropDownList1.DataBind()

Dim conn = New SqlConnection("Data Source=(local);Initial Catalog=(databasename);user id=;pwd=;Trusted_Connection=yes") conn.open() Dim dr As SqlDataReader Dim cmd = New SqlCommand("select * from details", conn) dr = cmd.ExecuteReader() DropDownList1.DataSource = dr DropDownList1.DataTextField = "fname" DropDownList1.DataValueField = "srno" DropDownList1.DataBind()

well this works for me,,thnks for all ur help

While end of datareader
create list item instance
add fname of row(i) to listitem text
add srid of row(i) to listitem value
add listitem to dropdownlist
end while

Originally Posted by bala24

Well one way is to loop through the datareader and get the values in each row and add it to dropdownlist.
This involves the following steps.

Originally Posted by bala24

Do fill in the rest of the details

Help with Code Tags

(Toggle Plain Text)

Dim li As ListItem

If rd.HasRows Then
Do While rd.Read
	
        li = New ListItem
        li.Text= rd.Item("fname")
        li.Value = rd.Item("srid")
        <dropdownlist>.Items.Add(li)
Loop

rd.close()

End If

Dim li As ListItem If rd.HasRows Then Do While rd.Read li = New ListItem li.Text= rd.Item("fname") li.Value = rd.Item("srid") <dropdownlist>.Items.Add(li) Loop rd.close() End If