Hi
I've attempted to do the follwing and get error highlighted below:
..
..
..
Set objFSOFolder = objfso.getfolder(strInboxDir)
for each objFSOFile in objfsofolder.files
if (left(objFSOFile.name, 6) ="EAF1NL" & right(objFSOFile.name,3) =
"xml" then
strFileNameBase = trim(left(objFSOFile.Name, len(objFSOFile.name)-4))
master.WriteLine objFSOFile.name & " in folder @ " & now
end if
next
Set objBulkLoad = CreateObject("SQLXMLBulkLoad.SQLXMLBulkload")
objBulkLoad.ConnectionString = "provider=SQLOLEDB;data
source=localhost;initial catalog=myDB; integrated security=SSPI"
objBulkLoad.Execute "\EAF1NL.xsd", objFSOFile.name '****Error here
Set objBulkLoad = Nothing
Main = DTSTaskExecResult_Success
Set fso = CreateObject("Scripting.FileSystemObject")
..
..
..
>> Stay informed about: help with script