Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim oData As New DataSet() oData.ReadXml("c:\ServerData.xml") Me.DropDownList1.DataSource = oData Me.DropDownList1.DataValueField = "ServerName" Me.DropDownList1.DataTextField = "ServerName" Page.DataBind() End SubXML File Contents
<?xml version="1.0" encoding="Windows-1252"?> <!-- edited with XML Spy v4.4 U (http://www.xmlspy.com) by Kirk Kelly (CQI) --> <configuration> <SERVERNAME>CQI-TERMSERV</SERVERNAME> <SERVERNAME>(LOCAL)</SERVERNAME> </configuration>