SelectedItem for a DropDownList, SelectedItem ALWAYS 0

Why is this value always 0?
I have searched this forums and haven't found much.
I have this code:

VB Code:

Private Sub btnSubmit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSubmit.Click
        Dim objComments As New Comment
        With objComments
            .Name = txtName.Text
            .Email = txtEmail.Text
            .TypeID = cboArea.SelectedIndex
            .Comment = txtComments.Text
            .Update()
        End With
    End Sub

Where "comments" is a class module that has 4 props and some code to save to the DB. Simple really.

Regardless of what I select in my combo the selectedindex is always 0, which means I can't get the ID value for the selected item.
I have ASP.NET Unleased and it's sample code is exactly what I have above :(

Woka

Haven't messed around with .Net (it refused to install on my computer...) but the old property was 'listindex', or list(row,column).

listindex was the actual index selected
list allows you to access the columns (such as the hidden one with the value or the text (visible) column.

Vince

Hahahaha...:D You have a point, but alas that is VB6. .NET is very different in that aspect. Most of the controls have completely different interfaces and functionality :(
This is what is making it hard for me to learn as I keep trying to code in VB6 and it doesn't recognise the code...Booooooo, bad .NET *slap* :)

When dealing with ASP.NET the controls act funny coz they arn'ty on the client, they are on the server. So you have to do some strange method to "post" the value back...can't seem to work out what it is though :(

Thanks for your answer.

Woodf

Fixed it :D
I loaded the values in the Page_Load event, but didn't check if was a post back :( This reset my combo to the 1st entry everytime I click the send button :(
What I have now is:

VB Code:

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim ds As DataSet
        Dim db As New Database
        Dim objRow As DataRow
        If Not IsPostBack Then
            ds = db.GetDataSet("SELECT * FROM CommentTypes")
            With cboArea
                .DataSource = ds.Tables(0)
                .DataTextField() = "Description"
                .DataValueField = "ID"
                .DataBind()
            End With
        End If
    End Sub

I know the code can be tidied up a little more. But it works :D

Woof