多级菜单生成器

我做的这个菜单生成器与kangking 做的菜单生成器方法不一样。主要不同处在于：1、在数据表中没有指定某一项是子菜单还是按钮，而是根据这个项下有或者没有下级来确定它是子菜单还是按钮。2、因为子菜单是没有faceid的也没有onaction，所以不管表中有没有填入这二项，凡是子菜单一律不设置这二项内容。3、采用数组来确定子菜单。4、将子菜单和按钮分别处理成二个记录集，分别加载，速度比较快。5、肯定不是最佳方案，如果哪位有更好的方案，请跟帖交流。
谢谢浏览和下载这个附件。
如果使用时出现“某某未定义”对话框，请引用microsoft office xx.x object library