---IE wps excel
App =ActiveXObject("Excel.Application")
App.DisplayAlerts = false 不显示警告
App.Application.Visible = false 不显示界面
objExcelApp.WorkBooks.Open("\1111.xls")
objExcelApp.ActiveWorkBook
objExcelBook.Worksheets
objExcelBook.Sheets(1)
objExcelSheet.Cells(1,1).Value ---