devcom.TestMeClass devCom = new devcom.TestMeClass(); devCom.ProcessReq( _sWriter.ToString() ); string retVal = devCom.OUTPUTFINAL.ToString(); devCom = null; return retVal;Here is what is at the top of my MTDLL main.prg:
#INCLUDE SC.H #INCLUDE VFP.H #DEFINE CRLF Chr(13)+Chr(10) Define Class TestMe as Session OlePublic Function Init Local ; pathString as String , ; nothing as Variant nothing = Sys(2340,1) Set Cpdialog Off Set Safety Off Set Exclusive Off Set Multilocks On Set Deleted Off Set Collate To "MACHINE" Set Date to ANSI Set Century On Set Mark to "." Set Near On Set Exact Off Set Ansi Off Set TextMerge Delimiters To "{{","}}" This.dllPath = Lower( JUSTPATH(_VFP.Servername) ) This.xDomDoc = CreateObject("Msxml2.FreeThreadedDOMDocument.4.0") if ( Left(This.LoadConfig() , 1 ) ="!" ) Return .f. endif if ( This.SetTempDirectory() = "0" ) Return .f. EndIf pathString = ( This.dllPath )+ ";" + ( JustPath(This.dbcPath) ) Set Path to &pathString Return .t. EndFunc