How to export xml in dts "Excute SQL Task" to a flat file

[AJ2]

Hi Guys,

I included "for xml auto" in sql statement in "Excute SQL Task" and aimed to dump the output to a flat file. I added "ActiveX Script Task" into my package and with the following lines:

dim strRecord
dim objFSO
dim objStream
dim objResults

const OUTPUT_FILE = "c:\XmlOutput.txt"
const fsoForWriting = 2

set objFSO = CreateObject("Scripting.FileSystemObject")
set objStream = objFSO.OpenTextFile(OUTPUT_FILE, fsoForWriting, true)
set objResults = DTSGlobalVariables("gResults").Value

Where "gResults" is my Rowset output parameter set as a global variable. If without "for xml auto" clause I could get my result something like:

strRecord = objResults.Fields(0).value & " " & objResults.Fields(1).value
objStream.WriteLine(strRecord)

in a loop to dump the result to my flat file. With "for xml auto" clause "objResults.Fields(0).value" is not working any more. Any suggestions what I am going to do in this situation?

Regards,