引用:
原帖由 城管 于 2008-7-18 21:40 发表 
修改fun.asp里的设置。
还请指明,俺修改了.结果修改的有问题!
' *** Copyright © KingCMS.com All Rights Reserved ***
private function (l1)
dim rs,i,data,I1
if cstr(l1)="0" then exit function
set rs=conn.execute("select listid1,listname,listpath from kingart_list where listid="&l1&";")
if not rs.eof and not rs.bof then
I1="<a href="""&king.inst&htmlencode(rs(2))&"/"">"&htmlencode(rs(1))&"</a>"
if cstr(rs(0))<>"0" then I1=(rs(0))&" >> "&I1
end if
rs.close
set rs=nothing
=I1
end function
' *** Copyright © KingCMS.com All Rights Reserved ***
可是修改红色部分中的蓝色部分?修改了有问题,请帮忙下!