循环遍历结果集并在 ASP Classic 中添加创建逗号分隔的字符串

【问题标题】：Loop through resultset and add create comma separated string in ASP Classic循环遍历结果集并在 ASP Classic 中添加创建逗号分隔的字符串
【发布时间】：2011-03-02 23:56:31
【问题描述】：

这是我的 ASP 经典：

set irs  = recordset(sql,PageDB)            
    if not irs.eof then

        dim new_list
        new_list = ""

        do while not irs.eof

            'Add irs("name") to new_list and separate by comma      

        irs.movenext

        loop

    end if

kill(irs)

如何将irs(name) 添加到new_list 并用逗号分隔？

【问题讨论】：

标签： asp-classic loops resultset

【解决方案1】：

set irs  = recordset(sql,PageDB)            
    if not irs.eof then

        dim new_list
        new_list = ""

        do while not irs.eof

            new_list = new_list & irs("name") & ","     

        irs.movenext

        loop

        new_list = left(new_list, len(new_list)-1)

    end if

kill(irs)

【讨论】：

如果数据库中没有记录，脚本将抛出错误，因此您可能需要在从末尾删除最后一个逗号之前检查该错误。
我稍微干净一点的实现是在 irs.movenext 之后检查 irs.eof，如果仍然为假，则附加“，”。对于更快的解决方案，您可能需要使用 irs.GetString()
最快的解决方案是将记录集加载到带有 getrows 的数组中，然后循环数组集:)