I have a ASP.NET (VB) web application running. The DTS package is suppose to
generates a flat file to a file path (aka: \\myStation\outputFiles\). When
it runs it generates the following error on one of the steps (the others run
successfully):

Step 'Copy Data from Results to H:\Data\outfilename.txt Step' failed

Step Error Source: Microsoft Data Transformation Services Flat File Rowset
Provider
Step Error Description:Error opening datafile: The referenced account is
currently locked out and may not be logged on to.

I am using DTS active X in code behine to execute the package. The web
server is on one machine and the sqlserver is on another. Also I am
impersonating a domain account (aka: mydomain\RequestAccount ) that has
verified access to the path. I have run the package with DTSRun.exe
successfully from DOS and successfully from Enterprise Manager (with the
afore mentioned impersonating account). I know I'm successfully running
under the impersonated account because it shows it in the DTS log header:

Package Name: PG_WCSOUTPUTFILE
Package Description: DTS package description
Package ID: {6CC1492D-C5A4-427D-9D1A-7A4BE050ED56}
Package Version: {515B6214-F967-413D-AE1C-35FB78692E3E}
Package Execution Lineage: {36DD6EC4-190E-4900-BD8A-28F1AA95CBA3}
Executed On: ISBSA-WS05
Executed By: RequestAccount
Execution Started: 1/7/2005 10:50:28 AM
Execution Completed: 1/7/2005 10:50:29 AM
Total Execution Time: 1.063 seconds

Any idea why this is taking place?

Code:

Dim pkg As New DTS.Package2
Dim DTSServerName As String =
ConfigurationSettings.AppSettings(Constants.DTS_SE RVER_NAME)

Dim impObj As New Impersonate(Constants.ImpersonateAccount, _

Constants.ImpersonatePassword, _

Constants.ImpersonateDomain)

Dim DTSUserName As String =
ConfigurationSettings.AppSettings(Constants.DTS_US ER_NAME)
Dim DTSPassword As String =
ConfigurationSettings.AppSettings(Constants.DTS_PA SSWORD)

impObj.BeginImpersonation()

pkg.LoadFromSQLServer( DTSServerName, _
DTSUserName, DTSPassword, _

DTS.DTSSQLServerStorageFlags.DTSSQLStgFlag_Default , _
"", _
"", _
"", _
Constants.DTS_PACKAGE_NAME, _
Nothing )
pkg.WriteCompletionStatusToNTEventLog = True
pkg.Execute()
pkg.UnInitialize()

impObj.EndImpersonation()
Thanks.

Page