带有 vbscript 的递归列表

Question

我有一个包含 userid 和 manager 字段的 csv 文件。 如何列出向特定经理报告的所有用户 ID 及其直接报告，深入到最后一个用户。 需要一个快速的 vbscript。

谢谢。

Answer 1

Open the CSV file via ADODB。

您需要一个 <final_result> 变量（最初为空）和一个 <managers> 变量（最初是您要为其创建列表的一位经理的 ID）。

然后编写一个循环：

1. SELECT DirectReports FROM TextFile WHERE Manager IN ('<managers>')
2. 根据生成的RecordSet 创建DirectReports ID 列表
3. 将该列表附加到<final_result> 变量
4. 为<managers> 变量分配一个逗号分隔的字符串："'<id1>','...','<idn>'"
5. 从 #1 开始，除非列表为空

循环结束后，最终结果变量保存所有直接报告。

见 - 不需要递归。简单的迭代就足够了。