peace be with you

dear friend's :
i write this code to delete in database :

Code:
dim del_str,del_w_id

del_str = "delete * from won_tab where w_id = '4'"

db.execute(del_str)
where the :
w_id = is a autonumber
won_tab = the name of table

Code:
Error Type:
Microsoft JET Database Engine (0x80040E07)
Data type mismatch in criteria expression.
/islam/admin_w_ok.asp, line 52
thanks