VBA- long SQL command 1

[Ramy27]

Trying to connect to DB from Excel using VBA.
The following SQL command has some errors. I'm quite sure it's got to do with " ' " etc....but I couldn't figure out. Can someone help?


DeleteSQL = "DELETE * FROM TimeSheet WHERE " _
& "Name = '" & CStr(wb.Sheets("TimeSheet").Cells(3, 2).Value) & "'" _
& "Date = '" & FormatDateForSQL(TRangeC.Cells(i, 1).Value, conn) & "'" _
& "AmPm = '" & CStr(TRangeC.Cells(i, 3).Value) & "'"

---------------------------------
Your help is much appreciated, R.
---------------------------------

 

[gmmastros]

You need to seperate the where clause condition with the word AND. Like this...

DeleteSQL = "DELETE * FROM TimeSheet WHERE " _
        & "Name = '" & CStr(wb.Sheets("TimeSheet").Cells(3, 2).Value) & "'" _
        & " AND Date = '" & FormatDateForSQL(TRangeC.Cells(i, 1).Value, conn) & "'" _
        & " AND AmPm = '" & CStr(TRangeC.Cells(i, 3).Value) & "'"

-George

Strong and bitter words indicate a weak cause. - Fortune cookie wisdom

 

[Ramy27]

Thanks.

---------------------------------
Your help is much appreciated, R.
---------------------------------