我有一个用户表单,其中用户登录&可以查看已存储在数据库中的所有信息。所以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
答案 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。它应该工作,但如果它不起作用,你可以尝试用用户名更新记录吗?