asp.net-优快云博客

文章描述了一个ASP.NET页面，使用MySql.Data.MySqlClient库连接数据库，展示了如何操作SqlDataSource和GridView控件，包括数据绑定、分页、编辑、删除和更新用户数据的操作。

Imports MySql.Data.MySqlClient
Imports System.Data

Partial Class _Default
    Inherits System.Web.UI.Page
    Private sds As SqlDataSource = New SqlDataSource("Server=.;Database=mydata;Uid=sa;Pwd=sa", "select * from t_user")

    Protected Sub GridView1_PreRender(sender As Object, e As EventArgs) Handles GridView1.PreRender
        Me.GridView1.DataSource = sds
        Me.GridView1.DataBind()
    End Sub

    Protected Sub GridView1_PageIndexChanging(sender As Object, e As GridViewPageEventArgs) Handles GridView1.PageIndexChanging
        Me.GridView1.PageIndex = e.NewPageIndex
    End Sub

    Protected Sub GridView1_RowEditing(sender As Object, e As GridViewEditEventArgs) Handles GridView1.RowEditing
        Me.GridView1.EditIndex = e.NewEditIndex
    End Sub

    Protected Sub GridView1_RowCancelingEdit(sender As Object, e As GridViewCancelEditEventArgs) Handles GridView1.RowCancelingEdit
        Me.GridView1.EditIndex = -1
    End Sub

    Protected Sub GridView1_RowDeleting(sender As Object, e As GridViewDeleteEventArgs) Handles GridView1.RowDeleting
        Dim user_index As String = Me.GridView1.DataKeys(e.RowIndex)(0).ToString()
        sds.DeleteCommand = "delete from t_user where user_index = @user_index"
        sds.DeleteParameters.Add("user_index", user_index)
        sds.Delete()
    End Sub

    Protected Sub GridView1_RowUpdating(sender As Object, e As GridViewUpdateEventArgs) Handles GridView1.RowUpdating
        Dim user_name As String = CType(Me.GridView1.Rows(e.RowIndex).Cells(4).Controls(0), TextBox).Text
        Dim user_pass As String = CType(Me.GridView1.Rows(e.RowIndex).Cells(5).Controls(0), TextBox).Text
        Dim user_index As String = Me.GridView1.DataKeys(e.RowIndex)(0).ToString()
        sds.UpdateCommand = "update t_user set user_name = @user_name, user_pass = @user_pass where user_index = @user_index"
        sds.UpdateParameters.Add("user_name", user_name)
        sds.UpdateParameters.Add("user_pass", user_pass)
        sds.UpdateParameters.Add("user_index", user_index)
        sds.Update()
        Me.GridView1.EditIndex = -1
    End Sub

    Protected Sub GridView1_SelectedIndexChanging(sender As Object, e As GridViewSelectEventArgs) Handles GridView1.SelectedIndexChanging
        Response.Write(e.NewSelectedIndex)
    End Sub
End Class