wantyou5354 2014-07-29 15:46 采纳率: 60%
浏览 302
已采纳

ASP查询无限级分类子栏目ID

我写了一个查询无限级子栏目ID的函数,代码如下:
Function ChildSort(Cuz,SortID)
fSortID = Int(SortID)
Set RsLs=server.CreateObject("adodb.recordset")
Sql="Select SortID From [Cuz_"&Cuz&"Sort] where ParentID="&fSortID&" order by SortSeq"
RsLs.Open Sql,Conn,1,1
While Not RsLs.Eof
ChildSort=ChildSort&","&Int(RsLs("SortID"))&ChildSort(Cuz,RsLs("SortID"))
RsLs.MoveNext
Wend

RsLs.Close:Set RsLs=Nothing
End Function
显示结果是“,1,2,3”的形式,如何在函数内把最前面的“,”去掉,注意我说的函数内解决

  • 写回答

1条回答 默认 最新

  • renminzdb2 2014-07-29 16:21
    关注

    if ChildSort ="" or isnull(ChildSort)
    then ChildSort=&Int(RsLs("SortID"))&ChildSort(Cuz,RsLs("SortID"))
    else
    ChildSort=ChildSort&","&Int(RsLs("SortID"))&ChildSort(Cuz,RsLs("SortID"))
    end if

    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论

报告相同问题?

悬赏问题

  • ¥15 Index was outside the bounds of the array
  • ¥15 (标签-Python|关键词-数据类型)(相关搜索:数据类型)
  • ¥15 一个识别内容的自动化脚本程序
  • ¥15 anaconda虚拟python环境部署langchain-chatchat报错
  • ¥20 matlab有约束条件下的多元函数求最小值
  • ¥50 如何隐藏网页弹出框的url地址栏
  • ¥20 metropolis算法模拟二维ising模型来计算磁化强度,fortran
  • ¥15 uniapp-typescript-vue报错
  • ¥15 oracle强制关机以后报错01033
  • ¥15 给Chat with RTX添加语言模型时遇到问题