表格数据不更新

时间:2016-03-04 04:37:08

标签: asp.net vb.net

我有一个用户表单,其中用户登录&可以查看已存储在数据库中的所有信息。所以onPageLoad我有选择查询。现在如果用户想要更新文本字段中的任何记录,他们可以编辑,但这里我修改的信息不是在数据库中进行更新。这是我的代码。

我试图在我的更新查询中断点&在那之下,我没有看到我填写的更新信息。它只需要现有的。

的onPageLoad

Private Sub list_business_hospital_Load(sender As Object, e As EventArgs) Handles Me.Load

        If Not IsPostBack Then
            Try
                Dim str As String = "SELECT * FROM  hospitals WHERE username='" + Server.HtmlEncode(Request.Cookies("chkusername").Value) + "';"
                con.Open()
                Dim cmd As New MySqlCommand(str, con)
                Dim da As New MySqlDataAdapter(cmd)
                Dim dt As New DataTable
                Dim lblservice As New Label
                For Each chk As ListItem In servicesList.Items
                    If chk.Selected = True Then
                        lblservice.Text = String.Concat(lblservice.Text + ",", chk.Value)

                    End If
                Next

                da.Fill(dt)
                con.Close()
                TextId.Text = dt.Rows(0)("hospitalID").ToString
                businessName.Text = dt.Rows(0)("name").ToString
                welcome.Text = dt.Rows(0)("name").ToString
                subCat.Text = dt.Rows(0)("subcategory").ToString
                contactPerson.Text = dt.Rows(0)("contactPerson").ToString
                websiteName.Text = dt.Rows(0)("websiteName").ToString
                emailName.Text = dt.Rows(0)("email").ToString
                phone1.Text = dt.Rows(0)("phone1").ToString

            Catch ex As Exception
                Response.Write(ex)
            End Try
        End If
    End Sub

更新按钮

Private Sub updateInfo_Click(sender As Object, e As EventArgs) Handles updateInfo.Click
        Try
            Dim con As New MySqlConnection
            Dim query As New MySqlCommand
            con.ConnectionString = ConfigurationManager _
                .ConnectionStrings("conio").ConnectionString()
            query.Connection = con
            con.Open()
            query.CommandText = "UPDATE hospitals SET name = '" + businessName.Text + "', contactPerson = '" + contactPerson.Text + "', websiteName = '" + websiteName.Text + "', email = '" + emailName.Text + "', phone1 = '" + phone1.Text + "' WHERE hospitalID = '" & TextId.Text + "'"
            query.ExecuteNonQuery()
            con.Close()
            Response.Write("<script language='javascript'>alert('Information updated successfully.');</script>")
        Catch ex As Exception
            Response.Write(ex)
        End Try
    End Sub

2 个答案:

答案 0 :(得分:0)

在您的更新查询中,您使用了hospitalID ='“&amp; TextId.Text +”',这是错误的。你有兴趣&amp; +

像这样做

query.CommandText = "UPDATE hospitals SET name = '" + businessName.Text + "', contactPerson = '" + contactPerson.Text + "', websiteName = '" + websiteName.Text + "', email = '" + emailName.Text + "', phone1 = '" + phone1.Text + "' WHERE hospitalID = '" + TextId.Text + "'"

答案 1 :(得分:-1)

在选择中,您使用用户名来查找记录,在更新中您使用了hospitalID。它应该工作,但如果它不起作用,你可以尝试用用户名更新记录吗?