DropDownList?
Dim listItem As ListItem listItem = New ListItem listItem.Value = "0" rdoOver.Items.Add(listItem) listItem = New ListItem listItem.Value = "1" listItem.Selected = True rdoOver.Items.Add(listItem)
ViewState("test") = "test1"
AutoGenerateColumns = false
Button1.Attributes("onclick") = "alert('hoge');"
EnableViewState?
ObjectDataSource?
Protected Sub ObjectDataSource1_Selecting(ByVal sender As System.Object, ByVal e As System.Web.UI.WebControls.ObjectDataSourceSelectingEventArgs) Handles ObjectDataSource1.Selecting
Dim coditionSeek As New CoditionSeek
coditionSeek.Isbn = txtSeek.Text
coditionSeek.Title = txtTitle.Text
e.InputParameters.Clear()
e.InputParameters.Add("coditionSeek", coditionSeek)
End Sub
'<DataObjectMethod(DataObjectMethodType.Select, True)> _ Public Function GetInfo(ByVal coditionSeek As CoditionSeek) As ArrayList If coditionSeek.Isbn <> "" Then
Protected Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ObjectDataSource1.Select()
End Sub
Public Class CoditionSeek
Private _isbn As String
Private _title As String
Property Isbn() As String
Get
Return Me._isbn
End Get
Set(ByVal value As String)
Me._isbn = value
End Set
End Property
Property Title() As String
Get
Return Me._title
End Get
Set(ByVal value As String)
Me._title = value
End Set
End Property
End Class