Salve a tutti, devo selezionare il valore estratto da un database in una dropdownlist ma mi va semopre in errore. Posto il codice dove commentato c'è anche un'altra versione sperimentata.

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim objConnessione As Data.OleDb.OleDbConnection
Dim objComando As Data.OleDb.OleDbCommand
Dim objDataReader As Data.OleDb.OleDbDataReader
Dim stringaSql As String
Dim piano As String
Dim accesso As String
Dim tempistiche As String
Dim metodiche As String
Dim accessoP As String
Dim tempisticheP As String
Dim metodicheP As String
Dim idpreventivoutente As String
Dim situazione As String

Me.lblPreventivo.Text = Session("idpreventivoutente")
idpreventivoutente = Session("idpreventivoutente")

objConnessione = New Data.OleDb.OleDbConnection(Me.AccessDataSource4.ConnectionString)
objConnessione.Open()
stringaSql = "SELECT * FROM PreventiviTesta WHERE IdPreventivoUtente = " & idpreventivoutente & ""
objComando = New Data.OleDb.OleDbCommand(stringaSql, objConnessione)
objDataReader = objComando.ExecuteReader

If objDataReader.Read() Then
piano = objDataReader.Item("PianoP")
Me.txtPiano.Text = piano

accesso = objDataReader.Item("AccessoCantiere")
dpdAccesso.SelectedValue = dpdAccesso.Items.FindByText(accesso).Value
'dpdAccesso.Items.FindByText(accesso).Selected = True
Else

End If


End Sub

Grazie
ciao

selezionare un valore in una lista già caricata. il valore lo passo perchè se metto un punto di interruzione e vado a leggere il contenuto della variabile accesso trovo che c'è "Scale". Anche se immetto il testo in questo modo:

dpdAccesso.SelectedValue = dpdAccesso.Items.FindByText("Scale").Value

mi va in errore, eppure Scale fa parte del contenuto della ddl

ciao