Hi everybody,

What is the simplest way to print txt file?

Thanks in advance.

This code

if not empty(thisform.cReportFile)
   do case 
      case lower(justext(thisform.cReportFile)) = 'txt'
   		try
   			ShellExe(thisform.cReportFile,,'notepad.exe','Print')   
   		catch to loErr
   		lcError = Log_Error(m.loErr)	
   		=ErrorMsg(m.lcError)
   		endtry
   endcase
endif

doesn't work.