एक्सेल शीट के साथ एसएसआईएस

यह आपकी कंपनी की सुरक्षा नीति (या उसकी निगरानी) के आधार पर काम कर सकता है या नहीं भी कर सकता है, लेकिन आप एक त्वरित मैक्रो लिख सकते हैं जो सभी 200 फाइलें खोलता है और उन्हें बिना पासवर्ड के एक अस्थायी "असुरक्षित" निर्देशिका में सहेजता है। फिर अपनी SSIS स्क्रिप्ट चलाएँ, और जब वह पूरी हो जाए, तो सभी 200 फ़ाइलें हटा दें (एक सुरक्षित डिलीटर जैसे के साथ इरेज़र )

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