大家来帮帮忙,给个思路..谢谢了.在线等

Question

private sql As String;Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       if Not Page.IsPostBack then
              sql="select * from gameds where [name]='" & Session("name") & "'"
              showe1(sql)
       end if
End SubPrivate Sub showe1(ByVal sqlstr As String)
        Dim ds1 As myDATA = New myDATA
        Me.DataGrid1.DataSource = ds1.GetDataFromDB(sqlstr)
        Me.DataGrid1.DataBind()
        ds1 = Nothing
End SubPrivate Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
sql = "select * from gameds where [name]='" & Session("name") & "'"
showe1(sql)
End SubPrivate Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
sqlstr = "select * from gameds where [name]='" & Session("name") & "'and jy_date=#" & Me.Calendar1.SelectedDate & "#"
showe1(sql)
End SubPrivate Sub DataGrid1_PageIndexChanged(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridPageChangedEventArgs) Handles DataGrid1.PageIndexChanged
        DataGrid1.CurrentPageIndex = e.NewPageIndex
        showe1(sql)
End Sub