Thanks Gregory but the solution I am using appears adequate for the file size I am working with.

>>Hi All,
>>
>>I need to build a string of tab delimited fields from a table. I have been using something similar to:
>>
>>

>>cMyString = ""
>>
>>SCAN 
>>
>>  cMyString = m.cMyString + myTable.Field1 + CHR(9) + myTable.Field2 + CHR(9) + CHR(13)
>>
>>ENDSCAN
>>

>>
>>Is there a faster way such as, for example, using TEXTMERGE?
>>
>>TIA
>
>
>If the output is large and you don't want to write to a file, you can use ado stream
>
>

>function do_it()
>
>	&&  http://msdn.microsoft.com/en-us/library/ms678086(VS.85).aspx
>	
>	
>
>#ifndef adTypeBinary
>	&& ADO
>	&& StreamType
>	#define adTypeBinary			(1)
>	#define	adTypeText				(2)
>
>
>	&& saveToFile
>	#define	adSaveCreateNotExist	(1)
>	#define	adSaveCreateOverWrite	(2)
>
>	&& ReadText
>	#define	adReadAll	(-1)
>	#define adReadLine	(-2)
>	
>	&& StreamWriteEnum
>	#define adWriteChar	(0)
>	#define	adWriteLine	(1)	&& appends a CRLF
>#endif
>	local streamObj
>	
>	streamObj = createObject('ADODB.Stream')
>	streamObj.Type = adTypeText
>	=m.streamObj.Open()
>	
>	&& write without CRLF
>	=m.streamObj.WriteText('Part of a line', adWriteChar)
>	
>	&& write with CTLF
>	
>	=m.streamObj.WriteText('Line 1', adWriteLine)
>	
>	=m.streamObj.WriteText('Line 2', adWriteLine)
>	
>	
>	
>	&& get the contents
>	
>	local s
>	streamObj.Position = 0
>	
>	s = m.streamObj.ReadText(adReadAll)
>	
>	
>	?s
>	
>	&& read line by line
>	streamObj.Position = 0
>	do while ( !m.streamObj.EOS )
>		s = streamObj.ReadText(adReadLine)
>		?s
>	enddo
>	
>	=m.streamObj.Close()
>	
>	
>endfunc
>