Dropdownlist, selected value fra database.

Min kode..

Og det er så VB.NET

        Sub SalesList()
            Dim DS As DataSet
            Dim MyConnection As SqlConnection
            Dim MyCommand As SqlDataAdapter

            MyConnection = New SqlConnection(System.Configuration.ConfigurationSettings.AppSettings("PubsString"))
            MyCommand = New SqlDataAdapter("select Id, Fname+' '+LName As Name from Employee Order by FName", MyConnection)

            DS = New DataSet
            MyCommand.Fill(DS, "Authors")
            Sales.DataSource = DS.Tables("Authors").DefaultView
            Sales.DataTextField = "Name"
            Sales.DataValueField = "Id"
            Sales.DataBind()
        End Sub

Indsættelse af nyt element i toppen kan ske med:
  Me.Sales.Items.Insert(0, New ListItem("Vælg noget fra listen", "0"))

Valg af element kan ske ved:
  Dim sValue = Request.QueryString("Id")
  Me.Sales.Items.FindByValue(sValue).Selected = True

som måske bør indpakkes i
  If Not Me.Sales.Items.FindByValue(sValue) Is Nothing Then
    Me.Sales.SelectedItem.Selected = False
    Me.Sales.Items.FindByValue(sValue).Selected = True
  End If

Helt perfekt. Det var lige hvad jeg manglede.