http://snippets.dzone.com/posts Fri, 25 Jul 2008 08:36:33 GMT DZone Snippets: Willpost's Code Snippets http://snippets.dzone.com/posts/show/1735 ;The following example is in VBScript. Any scripting language that uses com objects will be similar <br />;1 Install PLT Scheme - it will register the dlls <br />;2 Control Panel > Administrative Tools > Component Services <br />; My Computer > DCOM Config > MzCOM <br />; Properties > Security > Launch and Activation Permissions > Customize <br />; Add Everyone or IUSR_<Computername> Allow Local Launch, Local Activation <br /> <br />;Output <br />;(define test (lambda () (+ 1 2 3 4 5))) <br />;15 <br /><code> <br />strScheme = "(define test (lambda () (+ 1 2 3 4 5)))" 'Test Function <br /> <br />Set objScheme = Server.CreateObject("MzCOM.MzObj") <br />result = objScheme.Eval(strScheme) <br />result = objScheme.Eval("(test)") 'It remembers the function <br />Set objScheme = Nothing <br /> <br />Response.Write(strScheme & "<br>" & result & "<br>") 'Display Results <br /></code> Thu, 23 Mar 2006 13:23:16 GMT http://snippets.dzone.com/posts/show/1735 willpost () http://snippets.dzone.com/posts/show/1734 ;Calculate the factorial of a number <br />;(factorial 5) = 1 * 2 * 3 * 4 * 5 = 120 <br />;(factorial 50) = 30414093201713378043612608166064768844377641568960512000000000000 <br /><code> <br />(define factorial <br /> (lambda (n) <br /> (if (= n 0) 1 <br /> (* n (factorial (- n 1)))))) <br /></code> Thu, 23 Mar 2006 12:59:22 GMT http://snippets.dzone.com/posts/show/1734 willpost ()