syscode_corpus.asp

后台登陆admin.asp

<%

'****************************************************
dim mbtitle
mbtitle=Request.QueryString("act")
if mbtitle="news" then start="个人文集 >> 新闻列表"
if mbtitle="joke" then start="个人文集 >> 笑话列表"
if mbtitle="dj" then start="个人文集 >> 音乐列表"
if mbtitle="pic" then start="个人文集 >> 图片列表"
if mbtitle="down" then start="个人文集 >> 下载列表"
if mbtitle="web" then start="个人文集 >> 游记列表"

dim coypus_name
if request.querystring("action")<>"" then 
   coypus_name=request("action")
   if coypus_name="" or len(coypus_name)>20 or Instr(coypus_name,"=")>0 or Instr(coypus_name,"%")>0 or Instr(coypus_name,chr(32))>0 or Instr(coypus_name,"?")>0 or Instr(coypus_name,"&")>0 or Instr(coypus_name,";")>0 or Instr(coypus_name,",")>0 or Instr(coypus_name,"'")>0 or Instr(coypus_name,",")>0 or Instr(coypus_name,chr(34))>0 or Instr(coypus_name,chr(9))>0 or Instr(coypus_name,"