这个function是何作用?
public   function   rq(str,kit)
    dim   tmp,arr,i
    if   kit   =   "upfile "   then   rq   =   request(str)   :   exit   function
    if   request.form(str) <> " "   then
    tmp   =   request.form(str)
    else
        tmp   =   request.querystring(str)
    end   if
    if   tmp   =   " "   or   kit   =   "no "   then
      rq   =   tmp
    else
        select   case   kit
    case   "tab "
      rq   =   replace(trim(tmp),chr(255), " ")
    case   "sql "
      rq   =   replace(trim(tmp), " ' ", " ")
    case   else
      arr   =   split(kit, ", ")
      for   i=0   to   ubound(arr)
        tmp   =   replace(tmp,arr(i), " ")
      next
        rq   =   tmp
end   select  
    end   if
end   function

------解决方案--------------------
过滤字符串
如果kit为upfile则返回request(str)
如果str为空或kit为no则返回request(str)
否则，如果kit为???怎过滤???，最后返回;
------解决方案--------------------
多用途函数，
跟不同的KIT 值，执行不同的操作。
一种情况，是依据：str值来判断操作。
另一种情况，是依据：KIT值的不同来选择操作。

很少见到有人这样写函数，怎么不分开每个功能来实现，再加注释。