Hi Markus
>
>>You did not mention if the data found in the example allows switching over to checking for the first blank.
>>If the stuff/at combo is faster than strtran(), depending on the possible values of vorname this should
>>give you another few millisecs.
>
>I'm not sure what exactly you're talking of here.

SELECT Table2
SCAN
	#if .t.
        *** if StrTran(VorName, " ", "")==Rtrim(Vorname) in table1 you don't need to work via RAT
        *** But table1.Strasse has Spaces Embedded 
	lcStrasse = RTRIM( Strasse )
	
	FPUTS( m.lnFHandle, ;
	    STUFF( RTRIM( Name ), AT( " ", Name ), 1, ", " ) +", "+ ;
	    STUFF( m.lcStrasse, RAT( " ", m.lcStrasse ), 1, ", " ) +", "+ ;
	    STUFF( RTRIM( Ort ), AT( " ", Ort ), 1, ", " ) +", "+ ;
	    RTRIM( eMail ) )
	#else
	lcName = RTRIM( Name )
	lcStrasse = RTRIM( Strasse )
	
	FPUTS( m.lnFHandle, ;
	    STUFF( m.lcName, RAT( " ", m.lcName ), 1, ", " ) +", "+ ;
	    STUFF( m.lcStrasse, RAT( " ", m.lcStrasse ), 1, ", " ) +", "+ ;
	    STUFF( RTRIM( Ort ), AT( " ", Ort ), 1, ", " ) +", "+ ;
	    RTRIM( eMail ) )
	#endif
ENDSCAN
FCLOSE( m.lnFHandle )

thomas