更新表格中的一行時，在多選擇列

Question

表B中插入我有一個2個表，以便：

Visitors  ID|Name|Visit_from|To|image 
Visitor_log ID|Name|Visit_from|To|requestor 

當我記錄插入Visitor_log的日期是在遊客表更新。當有一位訪問者被請求時，我有這個工作。問題是Visitor_log.Visitor場是多選場，使代碼只適用於一個訪問者：

sub row_inserted (rsold, rsnew) 

ew_execute ("UPDATE [Visitors] SET [To Visit On] = ('" & rsnew("To Visit On") & "'), 
[To] = ('" & rsnew("To") & "') 
WHERE [Visitors].[Visitor(s) Name] = ('" & rsnew("Visitor") & "');") 

where子句變成：

WHERE [Visitors].[Visitor(s) Name] = (Visitor A) 

但是，當選擇了多個觀衆就變成：

WHERE [Visitors].[Visitor(s) Name] = (Visitor A, Visitor B, Visitor C) 

訪客表中沒有名爲Visitor A, Visitor B, Visitor C的訪客作爲一個名稱，因此SQL查詢失敗。

我一直堅持這一段時間，現在任何幫助非常感謝。

更新：我已經查詢設置爲response.write證明有多少SQL做...

sql: UPDATE [Visitors] SET [To Visit On] = ('10/10/2014'), [To] = ('10/10/2014') WHERE [Visitors].[Visitor(s) Name] = ('Mark M, Paul P');

Answer 1

已解決！

下面是完整的工作答案：

Dim sql
sql = ("UPDATE [Visitors] SET [To Visit On] = ('" & rsnew("To Visit On") & "'), [To] = ('" & rsnew("To") & "') WHERE [Visitors].[Visitor(s) Name] IN ('" & replace(rsnew("Visitor"),", ","','") & "');")
Call ew_Execute(sql)

這是smalarons有輕微編輯的間距替換statment回答。

感謝大家的支持。

Answer 2

也許你可以在visitor_log表定義一個觸發器來更新訪問者表。 在MySQL中，這將是這樣的：

Answer 3

查看您的更新，我覺得你的問題就出在引號。應引用每個不同的值，並應使用IN運算符。 所以您的查詢應該是這樣的：

UPDATE [Visitors] SET [To Visit On] = ('10/10/2014'), [To] = ('10/10/2014') 
WHERE [Visitors].[Visitor(s) Name] IN ('Mark M', 'Paul P'); 

所以假設rsnew（「訪客」）是用逗號分隔值的和你的語言是VBScript，你可以做這樣的事情

ew_execute ("UPDATE [Visitors] SET [To Visit On] = ('" & rsnew("To Visit On") & "'), 
[To] = ('" & rsnew("To") & "') 
WHERE [Visitors].[Visitor(s) Name] IN ('" & replace(rsnew("Visitor"),",","','") & "');") 

字符串