Mysql 连接必须在vb 2008中有效且打开
我对cmd.ExecuteNonQuery有问题,它有一个消息连接必须是有效的并且打开的。有人能帮我解决这个问题吗?我不相信你理解新关键字的作用。您正在创建一个新命令并向其添加参数,然后通过重新创建一个全新的MySqlCommand实例来销毁您的工作。除此之外,您从未将命令设置为使用已打开的连接。你最好再去看一遍这些文件 您没有将打开的连接分配给命令。以纯文本形式传递密码信息不是一个好主意。Mysql 连接必须在vb 2008中有效且打开,mysql,vb.net,Mysql,Vb.net,我对cmd.ExecuteNonQuery有问题,它有一个消息连接必须是有效的并且打开的。有人能帮我解决这个问题吗?我不相信你理解新关键字的作用。您正在创建一个新命令并向其添加参数,然后通过重新创建一个全新的MySqlCommand实例来销毁您的工作。除此之外,您从未将命令设置为使用已打开的连接。你最好再去看一遍这些文件 您没有将打开的连接分配给命令。以纯文本形式传递密码信息不是一个好主意。 Imports MySql.Data.MySqlClient Public Class daftar
Imports MySql.Data.MySqlClient
Public Class daftar
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Cn As New MySqlConnection
Dim str As String
Dim dt As New DataTable
Dim cmd As New MySqlCommand
Cn = New MySqlConnection("server=localhost;" _
& "user id=root;" _
& "password=;" _
& "database=loginapp")
Try
Cn.Open()
MsgBox("Connected")
Catch ex As Exception
MsgBox("Failed Connection " & vbCrLf & "Error Message : " & ex.Message, MsgBoxStyle.Critical, "Peringatan")
End Try
cmd.Parameters.AddWithValue("@id", user.Text)
cmd.Parameters.AddWithValue("@pass", pass.Text)
str = "INSERT INTO tbluser(Username,Password) VALUES (@id,@pass)"
cmd = New MySqlCommand(str)
cmd.ExecuteNonQuery()
MessageBox.Show("Insert Data Siswa Berhasil Dilakukan")
Cn.Close()
End Sub
End Class