dropdownlist怎样实现自动刷新

[curkoo]

dropdownlist怎样实现自动刷新，有没有实列

[hikele]

这是我做过的一个工程中的例子，希望能对你有所帮助
strsql5 = "select distinct 公司 from tdepartment"
Dim sqlcmd5 As SqlDataAdapter = New SqlDataAdapter(strsql5, conn)
sqlcmd5.Fill(ds, "gongsi")
dlcom.DataSource = ds.Tables("gongsi").DefaultView
dlcom.DataTextField = "公司"
dlcom.DataBind()
Dim strSelected1 As String
strSelected1 = dlcom.SelectedItem.Text

strSQL1 = "select distinct 部门 from Tdepartment where 公司='" & strSelected1 & "'"
Dim sqlcmd1 As SqlDataAdapter = New SqlDataAdapter(strSQL1, conn)
sqlcmd1.Fill(ds, "bumen")
dlbu.DataSource = ds.Tables("bumen").DefaultView
dlbu.DataTextField = "部门"
dlbu.DataBind()

[curkoo]

我的意思是Datalist绑定的内容随着dropdownlist的选择自动刷新

[jackyhzzjcn]

将DropDownList的AutoPostBack设置为true,在ddl的 Selectchanged下写代码，绑定数据到DataList就可以了。