VB.Net 和 MySQL

Question

我使用 VB.Net 和 MySQL 作为数据库，我是新手。我在 MySQL 中使用外键时遇到问题。在 MySQL 中，我创建了 inq 表作为其主表和 inqcontact 表。这是我的 MySQL 代码：

CREATE TABLE inq(
     number INT NOT NULL AUTO_INCREMENT,
     lastname VARCHAR(20),
     firstname VARCHAR(20),
     middlename VARCHAR(20),
     PRIMARY KEY(number));

CREATE TABLE inqcontact(
     noinqcontact INT NOT NULL AUTO_INCREMENT,
     mobile VARCHAR(20),
     telephone VARCHAR(20),
     emailadd VARCHAR(20),
     number INT,
     PRIMARY KEY(noinqcontact),
     FOREIGN KEY(number) REFERENCES inq(number));

这是我的 VB.Net 代码：

CommInq1 = New MySqlCommand("INSERT INTO inq VALUES (number,'" & txtLastName.Text & "','" & txtFirstName.Text & "','" & txtMiddleName.Text & "')", ConnInq)
        ConnInq.Open()
        CommInq1.ExecuteNonQuery()

        CommInq2 = New MySqlCommand("INSERT INTO inqcontact VALUES (noinqcontact,'" & txtMobileNo.Text & "','" & txtTelephoneNo.Text & "','" & txtEmailAdd.Text & "',number )", ConnInq)
        CommInq2.ExecuteNonQuery()
        ConnInq.Close()

        MessageBox.Show("Saved!", "")

我的 VB.Net 代码将 NULL 值返回到 inqcontact 表中的 number 外键。我的意思是，在 inq 表中，number 字段会自动递增，因此没有问题。但在inqcontact 表中，number 字段（即外键）为NULL 值。您能告诉我我提供的代码有什么问题吗？我认为错误在于从我的 VB.Net 插入数据。

Answer 1

试试这个，

CommInq1 = New MySqlCommand("INSERT INTO inq (lastname,firstname,middlename)
                 VALUES (@lastname,@firstname,@middlename)",ConnInq)

CommInq1.Parameters.Add("@lastname",MySql.Data.MySqlClient.MySqlDbType.VarChar,20).Value=txtLastName.Text
CommInq1.Parameters.Add("@firstname",MySql.Data.MySqlClient.MySqlDbType.VarChar,20).Value=txtFirstName.Text
CommInq1.Parameters.Add("@middlename",MySql.Data.MySqlClient.MySqlDbType.VarChar,20).Value=txtMiddleName.Text

ConnInq.Open()
CommInq1.ExecuteNonQuery()

CommInq2 = New MySqlCommand("INSERT INTO inqcontact (mobile,telephone,emailadd,number)  
                 VALUES (@mobile,@telephone,@emailadd,@number)",ConnInq)

CommInq2.Parameters.Add("@mobile",MySql.Data.MySqlClient.MySqlDbType.VarChar,20).Value=txtMobileNo.Text
CommInq2.Parameters.Add("@telephone",MySql.Data.MySqlClient.MySqlDbType.VarChar,20).Value=txtTelephoneNo.Text
CommInq2.Parameters.Add("@emailadde",MySql.Data.MySqlClient.MySqlDbType.VarChar,20).Value=txtEmailAdd.Text
CommInq2.Parameters.Add("@number",MySql.Data.MySqlClient.MySqlDbType.Int32)
       .Value=CommInq1.LastInsertedId  
             ' or use select last_insert_id() to get the last id

CommInq2.ExecuteNonQuery()
ConnInq.Close()

Answer 2

我通常使用 SQL Server 而不是我的 SQL，但我相信您应该能够基本上执行以下操作：

CommInq1 = New MySqlCommand("INSERT INTO inq (lastname,firstname,middlename)
                 VALUES (@lastname,@firstname,@middlename); select last_insert_id()" ,ConnInq)
CommInq1.Parameters.Add("@lastname",MySql.Data.MySqlClient.MySqlDbType.VarChar,20).Value=txtLastName.Text
CommInq1.Parameters.Add("@firstname",MySql.Data.MySqlClient.MySqlDbType.VarChar,20).Value=txtFirstName.Text
CommInq1.Parameters.Add("@middlename",MySql.Data.MySqlClient.MySqlDbType.VarChar,20).Value=txtMiddleName.Text

ConnInq.Open()
Dim id as Integer = cint(CommInq1.ExecuteScalar())

然后使用 id 作为插入项的键的值继续执行第二个查询。我从上面的答案中复制了代码，因为它更合适（防止注入等的安全性）和一种习惯，但是 ;接下来的第二个查询获取刚刚插入的 id 也应该适用于您的查询。