SQL with strVarible

[silentwolf]

Hi guys,

something simple for you I am pretty sure )

    Dim db As DAO.Database
    Dim tbd As DAO.TableDef
    Dim strSQL As String
    Dim strTable As String
    
    strTable = "Neu"
    
    Set db = CurrentDb
            
    Set tbd = db.TableDefs(strTable)
    
'this is ok when I use the Query Builder...
    strSQL = "UPDATE Neu SET Neu.Zahlungsreferenz = [Neu].[ZahlRef] " & _
                "WHERE (((Neu.Zahlungsreferenz)=""x"") AND ((Neu.ZahlRef)<>""""));"

'How this need to be changed to be able to use the strTable Varible?            
    strSQL = "UPDATE " & strTable & " SET [Zahlungsreferenz] = [ZahlRef] " & _
              "WHERE (([Zahlungsreferenz])=""x"") AND [ZahlRef]<>""));"

    db.Execute strSQL
    
    Set db = Nothing

Can someone please let me know how does this code need to be changed the strSQL with the strTable varible?

Thanks for your help )

 

[xenou]

If the idea is to simply remove all the parentheses I would certainly give the thumbs up...

 

[silentwolf]

Hi guys I will check when I find time but when I did debug it it gave me an error.
I will look into it a bit closer thanks for the moment!

Just need to get some other things sorted first so I wil get back to you ..when I got a better answer.

Thanks