vb.net - 插入查询不工作访问 Vb.net

Question

我的代码是

Dim tmpSQL_2 = New StringBuilder
        tmpSQL_2.AppendLine("Insert into table(tbl_ID,tbl_Type,tbl_Type) ")
        tmpSQL_2.AppendLine(" VALUES ")
        tmpSQL_2.AppendLine("(@tbl_ID,@tbl_Type,@tbl_Type) ")
        Using tmpCMD As New OleDbCommand(tmpSQL_2.ToString, conn)
            tmpCMD.Parameters.AddWithValue("@tbl_ID", "0")
            tmpCMD.Parameters.AddWithValue("@tbl_Type", "my type")
            tmpCMD.Parameters.AddWithValue("@tbl_Ser_Id", "my type")
            tmpCMD.ExecuteNonQuery()
        End Using

用于插入表格但它不起作用。

我也没有收到任何错误。应该是什么问题？

Answer 1

以不同的方式尝试...

Dim cmdText As String = "INSERT INTO table(tbl_ID,tbl_Type,tbl_Type) VALUES (?,?,?)"
Dim cmd As SqlCommand = New OleDBCommand(cmdText, conn)

With cmd.Parameters
    .Add("@p1", OleDbType.Integer).Value = 0
    .Add("@p2", OleDbType.VarChar).Value = "my type"
    .Add("@p3", OleDbType.VarChar).Value = "my type"       
End With
cmd.ExecuteNonQuery()