如何从使用 vb.net 查找不匹配记录的查询中在 MS Access 中插入行

Question

我有 2 个表 'tbl_Images' 和 'tbl_ImagesDetails'。第一个表具有在第二个表中找不到的 ImageID。

我做了一个查询，首先找到不匹配的记录，然后将结果行添加到第二个表中。

如果我在 Access 2010 中运行查询，它会要求确认，然后添加行。

但是，如果我从 VB.net 运行它，它不会添加任何行并且没有错误消息。代码如下：

Dim strsql As String = "INSERT INTO tbl_ImagesDetails ( ImageID )
SELECT tbl_Images.ImageID
FROM tbl_Images LEFT JOIN tbl_ImagesDetails ON tbl_Images.[ImageID] = tbl_ImagesDetails.[ImageID]
WHERE (((tbl_Images.ImageID) Like 'ZOOMED*') 
AND ((tbl_ImagesDetails.ImageID) Is Null));"        
'Debug.Print(strsql)

Dim MyConn As New OleDbConnection(connString)
Dim cmd As New OleDbCommand(strsql, MyConn)
cmd.CommandType = CommandType.Text

If Not MyConn.State = ConnectionState.Open Then MyConn.Open()

Dim iResult As Integer = cmd.ExecuteNonQuery()
Return iResult

上面的查询应该返回 9 行，但 iResult = 0

我的问题：

1. 确认对话框是否妨碍了您？如果是这样，我如何使用 vb 代码覆盖？

2. ExecuteNonQuery() 是否允许一次性插入多行？

3. 如何插入作为另一个查询结果的行（即在同一个查询中）？

Answer 1

1) 确认对话框是否妨碍了您？如果是这样，我如何使用 vb 代码覆盖？

Ans：如果您通过代码（即 vb.net）执行命令，则没有确认框

2) ExecuteNonQuery() 是否允许一次插入多行？

回答：是的

3) 如何插入作为另一个查询结果的行（即在同一个查询中）？

我认为您需要检查在 vb.net 中通过查询获取的结果/记录，可能没有得到任何记录。最好编写一个函数来检查获取的记录。否则看起来还可以。

希望这会有所帮助！