>lcConn = "'o'+mytable.cname+'_'+mytable.ctype && e.g. lcConn now equals 'oDSN_Data' >PUBLIC &lcConn >&lcConn = CREATEOBJECT('ConnClass.ConnObj') && Create an object named (lcConn) >lcConnServer = lcConn + '.pServerName' && Set the connection object servername prop >&lcConnServer = TRIM(mytable.cserver) && Slowest oDSN_Data.pServerName now = mytable.cserver value > >or > >&lcConnServer..pServerName = TRIM(mytable.cserver) && oDSN_Data.pServerName now = mytable.cserver value > >or > >loControl = EVAL(lcConn) && Should be 2nd fastest to process >loControl.pServerName = TRIM(mytable.cserver) && oDSN_Data.pServerName now = mytable.cserver value > >or > >STORE TRIM(mytable.cserver) TO (lcConn+'.pcServer') && Should be fastest > >>
select cServer as pServername from myTable into cursor myServers nofilter oApp.AddProperty( "loConn["+ltrim(str(reccount()))+"]" ) scan oApp.loConn[ recno() ] = CREATEOBJECT('ConnClass.ConnObj') && Create an object oApp.loConn[ recno() ].pservername = trim(pServername) endscanCetin