让用户方便地把链接收藏到网络书签（适合1.2所有板块）

sub bookmark_request()
  dim tmp_ty
  tmp_ty="|article|news|jober|learn|person|trade|zazhi|zazhi_book|team|ypage|shop|gallery|blog|website|forum|down|team_photo|"'这里可以添加更多板块识别
  dim gg,ty,o_gg
  name=""
  url=""
  ty=trim(request.querystring("ty"))
  if instr(tmp_ty,"|"&ty&"|")<1 then
      url=trim(request.querystring("addurl"))
      if len(url)<8 or len(url)>100 or instr("http://",url)<1 then
          url="http://"
          exit sub
      end if
  else
    gg=trim(request.querystring("addid"))
    if not(isnumeric(gg)) then
      exit sub
    end if
    select case ty '这里可以添加更多特殊板块处理
      case "team_photo"
        o_gg=trim(request.querystring("o_id"))
        if not(isnumeric(gg)) then
              exit sub
           end if
          url=ty&"_view.asp?id="&gg&"&pid="&o_gg
      case "zazhi_book"
          url=ty&".asp?id="&gg
      case "forum"
        url=ty&"_view.asp?view_id="&gg
      case else
        url=ty&"_view.asp?id="&gg
    end select
  end if
  name=trim(request.querystring("addname"))
  if len(name)<1 then
      url="http://"
      name=""
      exit sub
  end if
  name=joekoe_cms.code_html(name,1,48)
end sub

<input type=text name=name value="<%response.write joekoe_cms.code_html(name,1,0)%>" size=30 maxlength=50>

<input type=text name=url size=50 value="<%response.write joekoe_cms.code_html(url,1,0)%>" maxlength=100>

<a href="user_bookmark.asp?ty=article&addid><% response.write id%>&addname=<% response.write topic%>" target=_blank class="red">〖加入网络书签〗</a>

<a href="你的网址/user_bookmark.asp?addurl=他的网址/他的叶面&addname=他的叶面标题 target=_blank>〖加入新阳江的网络书签〗</a>