DoCmd.RunSQL SELECT語句

Question

select g.mailbox 
from voorwerp v inner join bod b 
ON v.voorwerpnummer = b.voorwerp 
inner join gebruiker g 
ON g.gebruikersnaam = b.gebruiker 
where v.verkoper = Me.gebruikersnaam 
AND v.veiling_gesloten = 'false' 

你好！

看看上面的代碼。我需要在acces VBA代碼中使用此代碼。在這段代碼中，我使用了3個不同的表格。 Me.gebruikersnaam是acces應用程序中的一個字段。 我希望你們知道一種方法，以便我可以在Acces VBA代碼中使用此代碼！

謝謝！

Answer 1

您還需要一個字符串：

SQL = "select g.mailbox " & _ 
    "from ((voorwerp v inner join bod b " & _ 
    "ON v.voorwerpnummer = b.voorwerp) " & _ 
    "inner join gebruiker g " & _ 
    "ON g.gebruikersnaam = b.gebruiker) " & _ 
    "where v.verkoper = '" & Me.gebruikersnaam & "' " & _ 
    "AND v.veiling_gesloten = 'false'" 

Answer 2

試試這個

select g.mailbox 
from ((voorwerp v inner join bod b 
ON v.voorwerpnummer = b.voorwerp) 
inner join gebruiker g 
ON g.gebruikersnaam = b.gebruiker) 
where v.verkoper = Me.gebruikersnaam 
AND v.veiling_gesloten = 'false' 

問候3組I-項目