使用vb脚本将密码传递给excel文件

Question

我有一个 Excel 文件，它在脚本任务中启用了密码，我正在使用 Vb 读取该文件，

我无法传递密码，以便它允许我从文件中读取。

我该怎么办。密码在哪里可以传递。我还尝试使用 FileInfo 类，但没有选项。

目前的脚本是：

    Dim fs As FileStream
    Dim sr As StreamReader
    Dim line As String
    fs = File.OpenRead(Dts.Variables("File_Name").Value)
    sr = File.OpenText(Dts.Variables("File_Name").Value)
   'Read first line of the file
    line = sr.ReadLine
    Dim str As String
    str = line
     sr.Close()
    fs.Close()

如果文件未启用密码，则它可以工作。任何帮助。请

Answer 1

您可以使用实际的 Excel COM 对象模型。< /a>

Workbook 类有一个属性允许您设置密码。