01. 网站界面后台随意更换，每个分类可以定义不同界面风格 02. 完善留言簿功能，添加管理员回复功能 03. 增加缺货登记功能：客户需要网站没有的相关商品，可以在这里提交，网站如果条件可以及时补货，供客户选择 04. 订单状态增加：已处理等待付款 状态 05. 订单各状态管理时增加补充说明功能，包括：客户付款后将订单状态更改为已付款，可以在补充说明里注明付款方式和金额管理员处理新订单时可以说明处理情况管理员确认收款时可以说明收款状态管理员发货时可以注明发货途径、到货时间、查询单号等用户&管理员确认到货订单完成可以进行补充说明 06. 客户下单后可以对定购物品数量进行修改，付款后无法修改 07. 客户下单后可以修改订货人、收货人信息，付款、收货方式等，发货后无法修改 08. 品牌功能完善，支持品牌图片及介绍 09. 后台管理增加详细注释功能，客户更容易操作 10. 首页推荐产品、特价产品、滚动产品显示数量后台自定义 11. 商品评论支持两种显示模式，管理员后台可以设置：发表即显示、管理员确认之后显示 12. 增加销售汇总功能，可以按照时间段、用户、订单状态统计商品销售情况 13. 新闻增加二级分类，可以按照分类增加新闻资讯 14. 增加ACCESS数据库在线压缩、在线备份、在线还原功能（仅限Access版） 15. 内部性能优化：无用数据连接自动关闭，不会产生数据库占用的情况，更稳定 16. 增加商品JS调用功能，可以按照分类、推荐、特价、热卖自定义数量的商品，支持图标自定义 17. 商品图片显示自动压缩，防止图片变形 18. 分页直接显示分页码，方便客户查找同时有利于搜索引擎优化 19. 增加多关键字查询功能，多关键字用空格隔开即可 20. 新增商品价格支持小数功能，更方便了小商品销售 21. 增加报价单与报价单打印功能，后台可以关闭报价单 22. 注册成功、定购成功邮件支持HTML格式 23. 新增对联广告、弹出窗口广告、图片广告、Flash广告等 24. 大小分类标题显示在网站标题，有利于SEO优化 25. 一个订单支持购买同款商品不同类型 26. 收藏夹功能完善 27. 所有用户输入字段增加特殊字符屏蔽功能，进一步防止SQL注入 28. 会员等级设置增加升级所需积分，客户积分到达标准自动升级 29. 增加发货单功能，发货之后可以发布在网站，让客户放心

原本是这样的：
01. 网站界面后台随意更换，每个分类可以定义不同界面风格
02. 完善留言簿功能，添加管理员回复功能
03. 增加缺货登记功能：客户需要网站没有的相关商品，可以在这里提交，网站如果条件可以及时补货，供客户选择
04. 订单状态增加：已处理等待付款 状态
05. 订单各状态管理时增加补充说明功能，包括：
客户付款后将订单状态更改为已付款，可以在补充说明里注明付款方式和金额
管理员处理新订单时可以说明处理情况
管理员确认收款时可以说明收款状态
管理员发货时可以注明发货途径、到货时间、查询单号等
用户&管理员确认到货订单完成可以进行补充说明
06. 客户下单后可以对定购物品数量进行修改，付款后无法修改
07. 客户下单后可以修改订货人、收货人信息，付款、收货方式等，发货后无法修改
08. 品牌功能完善，支持品牌图片及介绍
09. 后台管理增加详细注释功能，客户更容易操作
10. 首页推荐产品、特价产品、滚动产品显示数量后台自定义
11. 商品评论支持两种显示模式，管理员后台可以设置：发表即显示、管理员确认之后显示
12. 增加销售汇总功能，可以按照时间段、用户、订单状态统计商品销售情况
13. 新闻增加二级分类，可以按照分类增加新闻资讯
14. 增加ACCESS数据库在线压缩、在线备份、在线还原功能（仅限Access版）
15. 内部性能优化：无用数据连接自动关闭，不会产生数据库占用的情况，更稳定
16. 增加商品JS调用功能，可以按照分类、推荐、特价、热卖自定义数量的商品，支持图标自定义
17. 商品图片显示自动压缩，防止图片变形
18. 分页直接显示分页码，方便客户查找同时有利于搜索引擎优化
19. 增加多关键字查询功能，多关键字用空格隔开即可
20. 新增商品价格支持小数功能，更方便了小商品销售
21. 增加报价单与报价单打印功能，后台可以关闭报价单
22. 注册成功、定购成功邮件支持HTML格式
23. 新增对联广告、弹出窗口广告、图片广告、Flash广告等
24. 大小分类标题显示在网站标题，有利于SEO优化
25. 一个订单支持购买同款商品不同类型
26. 收藏夹功能完善
27. 所有用户输入字段增加特殊字符屏蔽功能，进一步防止SQL注入
28. 会员等级设置增加升级所需积分，客户积分到达标准自动升级
29. 增加发货单功能，发货之后可以发布在网站，让客户放心

写一个转化函数：

Function HTMLEncode(fString)
If Not IsNull(fString) Then
fString = Replace(fString, CHR(38), "&")
fString = Replace(fString, ">", ">")
fString = Replace(fString, "<", "&lt;")
fString = Replace(fString, CHR(39), "&#39;")
fString = Replace(fString, CHR(32), "&nbsp;")
fString = Replace(fString, CHR(34), "&quot;")
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10), "<br>")
HTMLEncode = fString
End If
End Function

显示时引用：

response.write HTMLEncode(要输出的内容)

那么麻烦，直接 server.HTMLEncode() 录入就可以了