Do you get the same error message as with your first post on this revised code?

VB Code:
  1. 'This does NOT work
  2. dim test as string
  3. test = "1"
  4. Set MyRecSet = MyConn.Execute("DELETE * FROM table1 WHERE ID = " & test)