llenado de DropDownList

01/07/2004 - 18:24 por Enrique Rodríguez | Informe spam
¿Como puedo poner en blanco la primera seleccion de mi dropdownlist?

Algo asi como:
-Nada-
Y que al desplegar el dropdownlist me muestre todos los demas registros

El llenado de mi dropdownlist lo hago de la sig manera:

Sub Page_Load(Sender As Object, E As EventArgs)
If Not Page.IsPostBack Then
DropDownList1.DataTextField = "TipoCont"
DropDownList1.DataSource = TiposDeContactos()
DropDownList1.DataBind()
End If
End Sub

Function TiposDeContactos() As System.Data.DataSet
Dim connectionString As String "Provider=Microsoft.Jet.OLEDB.4.0; Ole DB Services=-4; Data
Source=C:\Inetpub\wwwr"& _
"oot\ContactosASP\contactos.mdb"
Dim dbConnection As System.Data.IDbConnection = New
System.Data.OleDb.OleDbConnection(connectionString)

Dim queryString As String = "SELECT
[TiposDeContacto].[TipoCont] FROM [TiposDeContacto]"
Dim dbCommand As System.Data.IDbCommand = New
System.Data.OleDb.OleDbCommand
dbCommand.CommandText = queryString
dbCommand.Connection = dbConnection

Dim dataAdapter As System.Data.IDbDataAdapter = New
System.Data.OleDb.OleDbDataAdapter
dataAdapter.SelectCommand = dbCommand
Dim dataSet As System.Data.DataSet = New System.Data.DataSet
dataAdapter.Fill(dataSet)
Return dataSet
End Function

Saludos desde México y Gracias por leer mi post.
Enrique Rodríguez
 

Leer las respuestas

#1 Sergio Florez M.
01/07/2004 - 18:33 | Informe spam
Despues de que hagas el DataBind() pones lo siguiente:

TuDDL.Items.Insert(0,"")

El que persevera insiste
Sergio Florez M.
Medellín, Colombia


"Enrique Rodríguez" escribió en el
mensaje news:
¿Como puedo poner en blanco la primera seleccion de mi dropdownlist?

Algo asi como:
-Nada-
Y que al desplegar el dropdownlist me muestre todos los demas registros

El llenado de mi dropdownlist lo hago de la sig manera:

Sub Page_Load(Sender As Object, E As EventArgs)
If Not Page.IsPostBack Then
DropDownList1.DataTextField = "TipoCont"
DropDownList1.DataSource = TiposDeContactos()
DropDownList1.DataBind()
End If
End Sub

Function TiposDeContactos() As System.Data.DataSet
Dim connectionString As String > "Provider=Microsoft.Jet.OLEDB.4.0; Ole DB Services=-4; Data
Source=C:\Inetpub\wwwr"& _
"oot\ContactosASP\contactos.mdb"
Dim dbConnection As System.Data.IDbConnection = New
System.Data.OleDb.OleDbConnection(connectionString)

Dim queryString As String = "SELECT
[TiposDeContacto].[TipoCont] FROM [TiposDeContacto]"
Dim dbCommand As System.Data.IDbCommand = New
System.Data.OleDb.OleDbCommand
dbCommand.CommandText = queryString
dbCommand.Connection = dbConnection

Dim dataAdapter As System.Data.IDbDataAdapter = New
System.Data.OleDb.OleDbDataAdapter
dataAdapter.SelectCommand = dbCommand
Dim dataSet As System.Data.DataSet = New System.Data.DataSet
dataAdapter.Fill(dataSet)
Return dataSet
End Function

Saludos desde México y Gracias por leer mi post.
Enrique Rodríguez



Preguntas similares