实现Activescr ipt应用程序脚本，代码写得很规范，有学习价值。-Achieve Activescr ipt application scr ipts, code written very norms, have learning value.

By creating a custom type library it is possible to implement IActivescr iptSite directly in VB and add scr ipting support to your VB apps without having to include the MSscr ipt control. Includes support for AddObject and Eval()