让nextmap和lastpaged 输出的文字变成指定图片？

就看到这段代码，可是始终修改不成功，非常渴望热心朋友能给指点

'  *** Copyright &copy KingCMS.com All Rights Reserved ***
private function nextpage(l1,l2,l3,l4,l5)'artid,artorder,listid,listpath,tmphtm //下一页
 if instr(lcase(l5),"{king:nextpage")>0 then
  dim rs,I1
  set rs=conn.execute("select top 1 arttitle,artgrade,artpath,artid from kingart where artshow=1 and listid="&l3&" and artorder>"&l2&" order by artorder asc,artid asc;")
   if not rs.eof and not rs.bof then
    I1="<a href="""&getpath(rs(3),rs(1),king.inst&l4&"/"&rs(2))&"""><img src='"&htmlencode(rs(0))&"'></a>"
'   out I1
   else'如果不存在，则输出js加载来验证
    I1="<script type=""text/javascript"">posthtm('"&king.page&"article/page.asp?action=nextpage','k_nextpage','artid="&l1&"');</script>"
   end if
   rs.close
  set rs=nothing
  nextpage="<span id=""k_nextpage"">"&I1&"</span>"
 end if
end function

好像很难回答啊，请问长老们有在的吗？

唉  ~！！！！ 热心的网友呢，你们在哪里啊

谁能帮帮我 救命呀

为什么这一切都是为什么？ 是我提问方式有问题吗？

原来坛子的人气去哪里了？
是长时间不来，规则改了，还是世界在变化？