Hello,
We recently upgraded from SQL2k to SQL2005 and our DTS packages, we have two, run fine when I run them right from the Legacy folder created when we converted them after the upgrade but fail when they run as a job. This is the error: [DBNETLIB][ConnectionOpen (Connect()).]SQL Server does not exist or access denied. Error source: Microsoft OLE DB Provider for SQL Server
It gets an error when it gets moved to a staging area, here is the vbscript
Dim o ''As Scripting.FileSystemObject
Dim f ''As Scripting.File
Dim destinationFolder ''As Scripting.Folder
Dim t ''As Scripting.TextStream
Const LS_DESTINATION_FILENAME = "\\servername\d$\Inetpub\Const LS_SOURCE_FILENAME = "\\servername\data\InfoService\ASSOC\WebDir\Test\document.txt"
Set o = CreateObject("Scripting.FileSystemObject")
o.CopyFile LS_SOURCE_FILENAME, LS_DESTINATION_FILENAME, True
Set destinationFolder = o.GetFolder("\\servername\d$\Inetpub\Set t = penTextFile("C:\myfile.txt", 8, -1)
For Each f In destinationFolder.Files
t.WriteLine f.Name
Next
SET o=nothing
SET f = Nothing
SET d = Nothing
SET t = Nothing
Thanks!
We recently upgraded from SQL2k to SQL2005 and our DTS packages, we have two, run fine when I run them right from the Legacy folder created when we converted them after the upgrade but fail when they run as a job. This is the error: [DBNETLIB][ConnectionOpen (Connect()).]SQL Server does not exist or access denied. Error source: Microsoft OLE DB Provider for SQL Server
It gets an error when it gets moved to a staging area, here is the vbscript
Dim o ''As Scripting.FileSystemObject
Dim f ''As Scripting.File
Dim destinationFolder ''As Scripting.Folder
Dim t ''As Scripting.TextStream
Const LS_DESTINATION_FILENAME = "\\servername\d$\Inetpub\Const LS_SOURCE_FILENAME = "\\servername\data\InfoService\ASSOC\WebDir\Test\document.txt"
Set o = CreateObject("Scripting.FileSystemObject")
o.CopyFile LS_SOURCE_FILENAME, LS_DESTINATION_FILENAME, True
Set destinationFolder = o.GetFolder("\\servername\d$\Inetpub\Set t = penTextFile("C:\myfile.txt", 8, -1)
For Each f In destinationFolder.Files
t.WriteLine f.Name
Next
SET o=nothing
SET f = Nothing
SET d = Nothing
SET t = Nothing
Thanks!