Hej,

Jag har problem att fylla upp en listbox och kan bara inte förstå varför inget händer. Jag får inget felmeddelande, men den fylls inte heller upp.

Jag har provat samma kod(alltså samma metod) och fyllde en datagrid och det funkar bra.

Så här ser det ut:
<code>
Private Sub loadResearchAreas()

Dim dsResearchArea As DataSet
Dim iCounter As Integer = 0
Dim drResearchArea As DataRow

'Page facade object
Dim objFacade As Facade_Services.fcdMaintainResearchArea

'Create dataset
dsResearchArea = objFacade.getAllResearchAreas(sTempAccessToken)

lstResearchArea.Items.Clear()
For Each drResearchArea In dsResearchArea.Tables(0).Rows
iCounter += 1
lstResearchArea.Items.Add(iCounter)
lstResearchArea.Items(iCounter).Text = drResearchArea.Item("NAME")
lstResearchArea.Items(iCounter).Value = drResearchArea.Item("OBJECTID")
Next

End Sub
</code>
Databastabellen(Oracle) innehåller endast två fält, NAME och OBJECTID

Snälla hjälp...!!

/Jocke

Det är löst.
Glömde en rad:
objFacade = New Facade_Services.fcdMaintainResearchArea

/Jocke