SSIS script task中用代碼的方式查詢資料庫範例__資料庫

            Dim sqlconstr As String = "Data Source=" + Dts.Variables("SQL01").Value.ToString() + ";Initial Catalog=EDW_PreSource;Integrated Security=True"            Dim conn As SqlConnection = New SqlConnection(sqlconstr)            Try                conn.Open()                Dim sSql As String = "select top 1 substring(dw_file_name,1,len(dw_file_name)-4) + '_' +  replace(replace(replace(CONVERT(varchar, dw_insert_date, 120 ),'-',''),' ',''),':','') + '.txt' as DW_FILE_NAME2" + _                                    " FROM [EDW_PreSource].[dbo].[WELLCARE_SERVICEFUND] order by DW_INSERT_DATE desc"                Dim cmd As SqlCommand = New SqlCommand(sSql, conn)                Dts.Variables("FileShortName_ServiceFund").Value = Convert.ToString(cmd.ExecuteScalar())                Dts.TaskResult = Convert.ToInt32(ScriptResults.Success)            Catch                Dts.TaskResult = Convert.ToInt32(ScriptResults.Failure)            Finally                conn.Close()            End Try    Enum ScriptResults        Success = Microsoft.SqlServer.Dts.Runtime.DTSExecResult.Success        Failure = Microsoft.SqlServer.Dts.Runtime.DTSExecResult.Failure    End Enum