Como poner un registro de un Dropdownliste como selected

[nancy8120]

hola,

estoy haciendole un mantenimiente a una tabla sql en asp.net

en la parte del insert todo esta bien inserto en la tabla firma: nombre,cargo, si es cliente (este campo guada 1 o 0) y guardo el id_cliente,
ovio si es cliente, ese id_cliente lo tomo de una tabla que se llama Cliente y en mi mantenimiento lo muestro en un dropdownlist,

hasta aqui todo va bien

el asunto es cuando voy a editar de = forma funciona pero con excepcion de un detalle
yo quiere que el id_cliente que guarde en la tabla Firma me salga como selected bueno asi lo asi en asp clasico.

que esra diferente porque yo ponia una rutina y en esa rutina comparaba el valor de las dos tablas y si era = entonces le ponia el selected

entonces cuado ivamos a editar me salia por default el id_liente q se habia insertado en la primera tabla, con el fin de
que si entraba solo a editar el nombre no me afectara ese valor y se mantuviera =

espero me haya explicado

este es el codigo

strConnect = "Data Source=xxx;Initial Catalog=XXX;uid=sa; pwd=XXXX"

Dim sqlselect As String = "SELECT id_firma, nombre, cargo, es_cliente, id_cliente "

sqlselect += " FROM CA_Firmas WHERE id_firma =" & id.ToString


Dim Connection As SqlConnection = New SqlConnection(strConnect)

Dim query As SqlDataAdapter = New SqlDataAdapter(sqlselect, Connection)
Dim ds As DataSet = New DataSet


query.Fill(ds)

If Not Page.IsPostBack Then
nombre.Text = ds.Tables(0).Rows(0)("nombre")
Dim es_clientef As Integer

cargo.Text = ds.Tables(0).Rows(0)("cargo")

es_clientef = ds.Tables(0).Rows(0)("es_cliente")
If (es_clientef = 1) Then
es_cliente.Checked = True
id_cliente.Visible = True

id_cliente.SelectedValue = ds.Tables(0).Rows(0)("id_cliente") '
idC = ds.Tables(0).Rows(0)("id_cliente") ' este es el id que esta en la tabal fima

End If

End If


Connection.Open()
Dim sqlselect1 As String = " SELECT [IDCLIENTE], [NOMBRE] FROM [CLIENTE]"
Dim query1 As SqlDataAdapter = New SqlDataAdapter(sqlselect1, Connection)
query1.SelectCommand.CommandType = CommandType.Text


Dim ds1 As DataSet = New Data.DataSet("CLIENTE")


query1.Fill(ds1, "CLIENTE")
id_cliente.DataSource = ds1.Tables(0)
id_cliente.DataTextField = "Nombre"
id_cliente.DataValueField = "IDCLIENTE"
id_cliente.DataBind()


gracias