Question

我正在尝试创建一个按钮来保存数据并同时更新另一个表上的数据。（我正在使用mysql workbench）

我有代码将插入数据，但目前卡在更新部分。

要插入的表是“ngpmain”，需要更新的表是“ngpsites”和“ngpplanters”

这是我的插入代码..

Try
                Dim myAdapter As New MySqlDataAdapter("INSERT INTO ngpmain (CENRO) values ('" + combobox2.selecteditem + "')", connection)
                Dim myDatatable As New DataTable
                myAdapter.Fill(myDatatable)
                MsgBox("The data has been added.")
                clearfields()
            Catch ex As Exception
                MsgBox(ex.Message)
            Finally
                connection.Dispose()
            End Try

Answer 1

尝试编写一个将插入和更新表的过程从VB调用过程。像这样的东西

PROCEDURE [dbo]。[UpdateFields]

(
@ColumnName nvarchar (50),
@FormID int
)

作为

if exists (select * from Fields Where FormID=@FormID)
Update FieldsIntegration set [ColumnName] = @ColumnName Where FormID=@FormID 
else
insert into FieldsIntegration (ColumnName) values (@ColumnName)
RETURN

使用VB一次单击即可插入和更新到不同的表

1 个答案: