Binde data til dropdownlist fra to kolonner

Vil gerne at DataTextField opbygges af to kolloner fra strSQL, nemlig Name og Aktiv.

Kode udgangspunkt:

Dim strSQLDemo As String
strSQLDemo = "SELECT Name, Aktiv FROM tbl"
Dim Command As New System.Data.SqlClient.SqlCommand(strSQLKlasseOversigt, Connection)

Connection.Open()

Dim objDR As Data.SqlClient.SqlDataReader
objDR = Command.ExecuteReader()


ddlDemo.DataTextField = "Name"
ddlDemo.DataSource = objDR
ddlDemo.DataBind()

Command.Connection.Close()
objDR.Close()


Vil gerne at værdien for ddlDemo.DataTextField  bliver

If Aktiv = 1
"Name - Aktiv"

If Aktiv = 0
"Name - Deaktiv"

"Name" er varchar og Aktiv er boolean

Hvordan gøres det?

??:-) karsten_larsen