OK - NTDOC,

I guess, You want write exactly this lines in a protocolfile, but many quotes are a problem. Test this lines:

code:

$WL = WriteLine( 1 , 'for /f "tokens=*" %%a in (' + "'" + 'dir c:\*.mpg /s /b ' + "' '" + 'dir c:\*.asf /s /b ' + "' '" + 'dir c:\*.mov /s /b ' + "'" + ') do (copy "%%a"  H:\MOVIES)"' + Chr(13) + Chr(10))
$WL = WriteLine( 1 , 'for /f "tokens=*" %%a in (' + "'" + 'dir c:\*.mpg /s /b ' + "' '" + 'dir c:\*.asf /s /b ' + "' '" + 'dir c:\*.mov /s /b ' + "'" + ') do (copy "%%a"  H:\MOVIES)"' + Chr(13) + Chr(10))

Tom