尝试将数据插入数据库(mysql)时遇到一些问题。似乎我的连接无法正常工作,但我对此表示怀疑,因为我可以从中检索数据,但是插入时没有运气。我也尝试过各种方法,但仍然无法提出解决方案,也找不到错误原因。
有人可以帮我吗?非常感谢您的关注!
Imports MySql.Data.MySqlClient
Imports System.Web.Security
Imports System.Security.Cryptography
Imports System.Web.Configuration
Imports System.Configuration
Partial Class Register
Inherits System.Web.UI.Page
Dim ctc As New Class1
Dim conn As MySqlConnection
Dim connstr As String = ConfigurationManager.ConnectionStrings("dbconn").ConnectionString
Dim cmd As MySqlCommand
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
conn = New MySqlConnection(connstr)
conn.Open()
cmd = New MySqlCommand("INSERT INTO tbl_uinfo (user_id, fname, lname, email, pword, paypal) values (null,@fname,@lname,@email,@pword,@paypal)")
cmd.Parameters.Add("@fname", MySqlDbType.VarChar, 45).Value = firstname.Text
cmd.Parameters.Add("@lname", MySqlDbType.VarChar, 45).Value = lastname.Text
cmd.Parameters.Add("@email", MySqlDbType.VarChar, 45).Value = email.Text
cmd.Parameters.Add("@pword", MySqlDbType.VarChar, 250).Value = password2.Text
cmd.Parameters.Add("@paypal", MySqlDbType.VarChar, 45).Value = paypal.Text
cmd.ExecuteNonQuery()
conn.Dispose()
conn.Close()
cmd.Dispose()
Catch ex As Exception
MsgBox("Registration failed." & ex.Message)
End Try
End Sub
End Class
<connectionStrings>
<add name="dbconn" connectionString="server=localhost;database=db_aspweb;user id=root; pwd=root"/>
</connectionStrings>
CREATE TABLE `tbl_uinfo` (
`user_id` int(11) NOT NULL AUTO_INCREMENT,
`fname` varchar(45) DEFAULT NULL,
`lname` varchar(45) DEFAULT NULL,
`email` varchar(45) DEFAULT NULL,
`pword` varchar(250) DEFAULT NULL,
`paypal` varchar(45) DEFAULT NULL,
PRIMARY KEY (`user_id`),
UNIQUE KEY `email` (`email`),
UNIQUE KEY `paypal` (`paypal`)
) ENGINE=InnoDB DEFAULT CHARSET=utf8;
“注册失败。连接必须有效并且打开。”
通过构造函数或属性将连接(connstr)传递到命令对象(cmd)。
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句