我有一个 SSIS 包,我在其中使用带有 VB 的 Scipt 任务(参见下面的代码)和一个 Http 连接管理器来下载 1 个定义的 .zip 文件。我希望做但无法弄清楚的是循环并下载同一位置的所有 .zip 文件。
任何建议将不胜感激。
这是视觉B:
Imports System
Imports System.IO
Imports System.Text
Imports System.Windows.Forms
Imports Microsoft.SqlServer.Dts.Runtime
Public Sub Main()
'
' Get the unmanaged connection object, from the connection manager called "HTTP Connection Manager"
Dim nativeObject As Object = Dts.Connections("HTTP Connection Manager").AcquireConnection(Nothing)
' Create a new HTTP client connection
Dim connection As New HttpClientConnection(nativeObject)
' Download the file #1
' Save the file from the connection manager to the local path specified
Dim filename As String = "C:\Users\{CurrentUser}\Documents\file.zip"
connection.DownloadFile(filename, True)
' Confirm file is there
If File.Exists(filename) Then
MessageBox.Show(String.Format("File {0} has been downloaded.", filename))
End If
' Download the file #2
' Read the text file straight into memory
Dim buffer As Byte() = connection.DownloadData()
Dim data As String = Encoding.ASCII.GetString(buffer)
End Sub