SSIS med Excel-ark

Dette fungerer muligvis ikke baseret på din virksomheds sikkerhedspolitik (eller overvågning heraf), men du kan skrive en hurtig makro, der åbner alle 200 filer og gemmer dem i en midlertidig "ubeskyttet" mappe uden en adgangskode. Kør derefter dit SSIS-script, og når det er fuldført, skal du slette alle 200 filer (med en sikker deleter såsom Viskelæder )

Sub ManagePWords()

Dim f(1 To 200) As Variant
Dim i As Integer
Dim origpath As String, temppath As String
Dim wb As Excel.Workbook

   origpath = "c:\where_files_are_now\"
   temppath = "c:\where_files_are_now\unprotected\"

   f(1) = Array("filename1", "password1")
   f(2) = Array("filename2", "password2")
   'keep going for all 200 files

   For i = 1 To UBound(f)
      Set wb = Application.Workbooks.Open(origpath & f(i)(0), , , , f(i)(1))
      wb.SaveAs temppath & f(i)(0) & ".xlsx", , ""
      wb.Close
   Next i

End Sub