واقعا دستور من شبیه دستور شماست ؟
Ad.RecordSource = "delete * from box1
Delete FROM TblName
معمولا هر چیزی رو برای کاری می سازن
می تونید براحتی توسط ADODB.Command دستورات خودتونو در قالب SQL Command و یا Store Procedure اجرا کنید و کمتر در حین کار با خطاهای مختلف برخورد کنید