Hi trips
Can you show us what have you done so far? So that we'll try to bring out the solution to your problem : )
Rey Sean
Set aXmlNodeList = aXmlDom.documentElement.selectNodes("//Department/Member")
If (aXmlNodeList.length > 0) Then
For ii = 0 To (aXmlNodeList.length - 1)
aValue = aXmlNodeList.Item(ii).selectSingleNode("Role").Tex t
Combo1.AddItem (aValue)
Next
If (Combo1.ListCount > 0) Then
Combo1.Text = Combo1.List(0)
End If