当我尝试将数据插入数据库(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;
&#34;注册失败。连接必须有效且开放。&#34;
答案 0 :(得分:0)
通过构造函数或属性将连接(connstr)传递给命令对象(cmd)。