Response.Write " <select name=""CharsetCode"">"
      Response.Write " <option value='auto'>自动检测</option>"
      Response.Write " <option value='utf-8' "
   if CharsetCode="utf-8" then response.Write("selected")
   Response.Write " >utf-8</option>"
      Response.Write "<option value='utf-8' "
   if CharsetCode="utf-8" then response.Write("selected")
   Response.Write ">utf-8</option>"
      Response.Write " </select>"

 上面三次改下就完事了

那就自己动手改下了

admin/collect/Collect_ItemModify.asp