用javascript为DropDownList控件下拉式选择添加一个Item至定义索引位置
更新时间:2013年01月16日 09:23:59 作者:
用Javascript为DropDownList控件下拉式选择添加一个Item至定义索引位置;准备数据,创建一个对象,将是存储DropDownList控件每个Item数据
用Javascript为DropDownList控件下拉式选择添加一个Item至定义索引位置。
准备数据,创建一个对象,将是存储DropDownList控件每个Item数据。
Imports Microsoft.VisualBasic
Namespace Insus.NET
Public Class Catalog
Private _ID As Integer
Private _Name As String
Public Property ID As Integer
Get
Return _ID
End Get
Set(value As Integer)
_ID = value
End Set
End Property
Public Property Name As String
Get
Return _Name
End Get
Set(value As String)
_Name = value
End Set
End Property
End Class
End Namespace
在.aspx放置一个DropDownList控件:
<asp:DropDownList ID="DropDownListCatalog" runat="server"></asp:DropDownList>
在.aspx.vb绑定数据:
Imports Insus.NET
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not IsPostBack Then
Data_Binding()
End If
End Sub
Private Sub Data_Binding()
Me.DropDownListCatalog.DataSource = GetData()
Me.DropDownListCatalog.DataValueField = "ID"
Me.DropDownListCatalog.DataTextField = "Name"
Me.DropDownListCatalog.DataBind()
End Sub
Private Function GetData() As List(Of Catalog)
Dim cls As New List(Of Catalog)
Dim cl As Catalog = New Catalog()
cl.ID = 1
cl.Name = "新闻频道"
cls.Add(cl)
cl = New Catalog()
cl.ID = 2
cl.Name = "体育频道"
cls.Add(cl)
cl = New Catalog()
cl.ID = 3
cl.Name = "军事频道"
cls.Add(cl)
cl = New Catalog()
cl.ID = 4
cl.Name = "教育频道"
cls.Add(cl)
Return cls
End Function
End Class
准备数据与环境后,写Javascript:
window.onload = function () {
var catalog = document.getElementById("<%=DropDownListCatalog.ClientID%>");
var obj = document.createElement("option")
obj.text = "请选择..."
obj.value = 0
catalog.options.insertBefore(obj, catalog.options[0]);
}
DEMO:
准备数据,创建一个对象,将是存储DropDownList控件每个Item数据。
复制代码 代码如下:
Imports Microsoft.VisualBasic
Namespace Insus.NET
Public Class Catalog
Private _ID As Integer
Private _Name As String
Public Property ID As Integer
Get
Return _ID
End Get
Set(value As Integer)
_ID = value
End Set
End Property
Public Property Name As String
Get
Return _Name
End Get
Set(value As String)
_Name = value
End Set
End Property
End Class
End Namespace
在.aspx放置一个DropDownList控件:
复制代码 代码如下:
<asp:DropDownList ID="DropDownListCatalog" runat="server"></asp:DropDownList>
在.aspx.vb绑定数据:
复制代码 代码如下:
Imports Insus.NET
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not IsPostBack Then
Data_Binding()
End If
End Sub
Private Sub Data_Binding()
Me.DropDownListCatalog.DataSource = GetData()
Me.DropDownListCatalog.DataValueField = "ID"
Me.DropDownListCatalog.DataTextField = "Name"
Me.DropDownListCatalog.DataBind()
End Sub
Private Function GetData() As List(Of Catalog)
Dim cls As New List(Of Catalog)
Dim cl As Catalog = New Catalog()
cl.ID = 1
cl.Name = "新闻频道"
cls.Add(cl)
cl = New Catalog()
cl.ID = 2
cl.Name = "体育频道"
cls.Add(cl)
cl = New Catalog()
cl.ID = 3
cl.Name = "军事频道"
cls.Add(cl)
cl = New Catalog()
cl.ID = 4
cl.Name = "教育频道"
cls.Add(cl)
Return cls
End Function
End Class
准备数据与环境后,写Javascript:
复制代码 代码如下:
window.onload = function () {
var catalog = document.getElementById("<%=DropDownListCatalog.ClientID%>");
var obj = document.createElement("option")
obj.text = "请选择..."
obj.value = 0
catalog.options.insertBefore(obj, catalog.options[0]);
}
DEMO:
相关文章
GridView中checkbox"全选/取消"完美兼容IE和Firefox
GridView中checkbox的的"全选/取消"使用还是比较频繁的,本文有个不错的示例完美兼容IE和Firefox,感兴趣的朋友可以参考下,希望对大家有所帮助2013-10-10
ASP.NET下将Excel表格中的数据规则的导入数据库思路分析及实现
今天接到新的需求,要求将Excel表格中的数据显示在页面上个人想法:首先是规则的Excel数据导入,再有就是不规则的Excel数据导入,还有就是根据数据生成Excel2013-01-01
C# XML操作 代码大全(读XML,写XML,更新,删除节点,与dataset结合等)
C#操作XML(读XML,写XML,更新,删除节点,与dataset结合等),以下就是操作XML的所有方法,相信可以满足很大一部份的使用了。2009-06-06
aspx实现的 jquery ui 的 flexgrid demo
这几天没事研究着jquery,真是个好东西,慢慢的知道了有jquery ui,一开始就被华丽的界面和简单的操作给吸引了,尤其是里面的flexgrid,对我而言可以说是非常宝贵的东西2009-12-12


最新评论