macro is not working in Excel 2010 but worked in Excel 2003

hello everybody, i need your help. i have macro. this macro is worked in excel 2003 but not worked in excel 2010. Private Sub Workbook_BeforeClose(cancel As Boolean) Set fs = CreateObject("Scripting.FileSystemObject") On Error Resume Next fs.deletefile ..

www.ozgrid.com