I get a '3219' (Monsters Inc?) runtime error on opening the following SQL VB6 string. It connects to Access 2003 MDB.

strSQL = "DELETE tblA01.* " _
& "From tblA01 " _
& "WHERE ((tblA01.Bin)=(SELECT tblSSE.BIN " _
& "FROM tblSSE));"

Set rstFDtable = ATLAS.OpenRecordset(strSQL, dbOpenDynaset, dbConsistent, dbOptimistic)


Debug.print result:-

DELETE tblA01.* From tblA01 WHERE ((tblA01.Bin)=(SELECT tblSSE.BIN FROM tblSSE));

Error occurs on execution of Set command. I'm sure it is a syntax prob. but can I find it ..... aghh!

Any help appreciated. Thanks TC