Unprotect Excel workbook usign a dts package
I have been asked to create a dts package and need a little advice to get me started please.
A User uploads a workbook via an asp page, this asp page will then call a dts package to do the following;
unprotect the workbook (I know the password in advance)
read certain cells and compare them to values stored in a sql server table
move the file location or delete as a result of the above check.
Ive tried an activeX script in the dts to unprotect the workbook
VB Code:
Function Main()
Dim ExFile
ExFile= (path)
Dim xl
xl = CreateObject("Excel.Application")
Dim myWorkbooks
myWorkbooks = xl.Workbooks
xl.Visible = False
myWorkbooks.Open(ExFile)
myWorkboks.ACTIVEWorkbook.Unprotect(password)
End Function
but am getting error object required 'xl' at line 13 (myWorkbooks = xl.Workbooks)
any help would be apprectiated