Binding enum values alphabetically to a drop down list

[Mark Heimonen]

I haven't worked with enum types that much, and I wrote the following code
to bind a list of enums to a dropdownlist. Using
CType([Enum].Parse(GetType(ManagePointClassLibrary.Utils.Log.E ventType),
strEventType), Integer).ToString is horrible to read, and probably not that
efficient either. Does anybody know a more elegant approach to this
problem?

Dim strEventType As String
For Each strEventType In
[Enum].GetNames(GetType(ManagePointClassLibrary.Utils.Lo g.EventType))
Dim objDataRow As DataRow = objDataTable.NewRow
objDataRow("EventTypeID") =
CType([Enum].Parse(GetType(ManagePointClassLibrary.Utils.Log.E ventType),
strEventType), Integer).ToString
objDataRow("EventType") = strEventType
objDataTable.Rows.Add(objDataRow)
objDataRow.AcceptChanges()
Next
objDataView = New DataView()
objDataView = objDataTable.DefaultView
objDataView.Sort = "EventType"
eventtype.DataSource = objDataView
eventtype.DataTextField = "EventType"
eventtype.DataValueField = "EventTypeID"
eventtype.DataBind()

Thanks,

Mark Heimonen

[John Saunders]

Mark,

You can't do much better than this because the ASP.NET DropDownList can only
handle string values (as opposed to the Windows Forms DropDownList, which
can handle arbitrary objects).

About the only thing you can do is to ignore the integer value entirely. Let
the DropDownList use EventType for both the DataTextField and
DataValueField. When you need a value (perhaps in the SelectedIndexChanged
event), _then_ use Enum.Parse to get the value as your Enum type.
--
John Saunders
Internet Engineer
jo***********@surfcontrol.com
"Mark Heimonen" <ma***@adiaim.com> wrote in message
news:%2****************@TK2MSFTNGP09.phx.gbl...

I haven't worked with enum types that much, and I wrote the following code
to bind a list of enums to a dropdownlist. Using
CType([Enum].Parse(GetType(ManagePointClassLibrary.Utils.Log.E ventType),
strEventType), Integer).ToString is horrible to read, and probably not that efficient either. Does anybody know a more elegant approach to this
problem?

Dim strEventType As String
For Each strEventType In
[Enum].GetNames(GetType(ManagePointClassLibrary.Utils.Lo g.EventType))
Dim objDataRow As DataRow = objDataTable.NewRow
objDataRow("EventTypeID") =
CType([Enum].Parse(GetType(ManagePointClassLibrary.Utils.Log.E ventType),
strEventType), Integer).ToString
objDataRow("EventType") = strEventType
objDataTable.Rows.Add(objDataRow)
objDataRow.AcceptChanges()
Next
objDataView = New DataView()
objDataView = objDataTable.DefaultView
objDataView.Sort = "EventType"
eventtype.DataSource = objDataView
eventtype.DataTextField = "EventType"
eventtype.DataValueField = "EventTypeID"
eventtype.DataBind()

Thanks,

Mark Heimonen

[Mark Heimonen]

Thanks,

Yeah, I think ignoring the integer value entirely is a good step up
performance-wise.

Mark Heimonen
Developer
Adia Information Management Corporation

"John Saunders" <jo***********@surfcontrol.com> wrote in message
news:uR**************@TK2MSFTNGP12.phx.gbl...

Mark,

You can't do much better than this because the ASP.NET DropDownList can only handle string values (as opposed to the Windows Forms DropDownList, which
can handle arbitrary objects).

About the only thing you can do is to ignore the integer value entirely. Let the DropDownList use EventType for both the DataTextField and
DataValueField. When you need a value (perhaps in the SelectedIndexChanged
event), _then_ use Enum.Parse to get the value as your Enum type.
--
John Saunders
Internet Engineer
jo***********@surfcontrol.com
"Mark Heimonen" <ma***@adiaim.com> wrote in message
news:%2****************@TK2MSFTNGP09.phx.gbl...

I haven't worked with enum types that much, and I wrote the following code to bind a list of enums to a dropdownlist. Using
CType([Enum].Parse(GetType(ManagePointClassLibrary.Utils.Log.E ventType),
strEventType), Integer).ToString is horrible to read, and probably not

that

efficient either. Does anybody know a more elegant approach to this
problem?

Dim strEventType As String
For Each strEventType In
[Enum].GetNames(GetType(ManagePointClassLibrary.Utils.Lo g.EventType))
Dim objDataRow As DataRow = objDataTable.NewRow
objDataRow("EventTypeID") =
CType([Enum].Parse(GetType(ManagePointClassLibrary.Utils.Log.E ventType),
strEventType), Integer).ToString
objDataRow("EventType") = strEventType
objDataTable.Rows.Add(objDataRow)
objDataRow.AcceptChanges()
Next
objDataView = New DataView()
objDataView = objDataTable.DefaultView
objDataView.Sort = "EventType"
eventtype.DataSource = objDataView
eventtype.DataTextField = "EventType"
eventtype.DataValueField = "EventTypeID"
eventtype.DataBind()

Thanks,

Mark Heimonen