UC知道急急急 急需要ASP3级或3级以上的新闻分类功能
来源：百度知道 编辑：UC知道 时间：2024/06/05 05:35:41
急需要ASP3级或3级以上的新闻分类功能
要求：有后台类的管理，新闻的添加，修改，删除。前台调用一个文件的变量如：call xxxx(1,1,2,3) 有好人帮解决下。忙啊。。。
QQ：239631951
先谢谢了。。
有没有人啊。。。麻烦帮小弟。解决啥。。。
要求：有后台类的管理，新闻的添加，修改，删除。前台调用一个文件的变量如：call xxxx(1,1,2,3) 有好人帮解决下。忙啊。。。
QQ：239631951
先谢谢了。。
有没有人啊。。。麻烦帮小弟。解决啥。。。
dim ClassID1
Sub newsclass(ClassID)
dim strchildId,array_chid,intC,wsc_rs
strchildId=""
sql="select ID,ClassName,ChildID from Class where ID="&ClassID&" order by Sequence DESC"
set wsc_rs=oconn.execute(sql)
if not(wsc_rs.eof and wsc_rs.bof) then
do while not wsc_rs.eof
if isnull(wsc_rs("ChildID")) then
ClassID1=ClassID1&wsc_rs("ID")&","
Else
array_chid = split(wsc_rs("ChildID"),",")
For intC = 0 to Ubound(array_chid)
Call newsclass(array_chid(intC))
Next
End If
wsc_rs.movenext
loop
else
response.write ""
end if
End Sub