Question

asp用什么函数是转成正常的网页

以下是我从数据库中输出的，网页显示：
外景拍摄：2010年热拍地任选<BR>拍摄时间：三天<BR>拍摄方式：资深造型师+优秀摄影师+高级灯光师全程三对一专业贴心的服务<BR>消费方式: 高速免费提供外景拍摄商务车供可口午餐及景点门票<BR>          一次性消费（无后期消费）<BR>拍摄300张以上(多拍多送)<BR>时尚新品婚纱随意穿（无VIP限制)（工作室承诺所有服装均以消毒)<BR>拍摄当天提供一对新人免费时尚造型<BR>使用国际影星专用MAC Bobbrbrown  CHANEL  Dior化妆品（无须安瓶定妆)<BR>提供高级化装间，动听的音乐伴随，享受做新人的幸福<BR>完全免费提供高级进口仿真假睫毛一副<BR>完全免费提供高级饰品、头饰等等<BR>※20寸欧式帝王相册一本20页（无重复数码设计)<BR>※16寸欧式帝王相册一本 20页（无重复数码设计)<BR>※12寸欧式帝王相册一本20页（无重复数码设计)<BR>※60寸顶级依魔拉巨幅油画相框一幅<BR>※60寸华丽绢丝水晶挂轴一幅<BR>※40寸时尚韩国皮质油画框一幅<BR>※80寸时尚巨幅X展架一幅<BR>※36寸精致时尚水晶或拉米纳桌摆一幅<BR>※24寸精致时尚水晶或拉米纳桌摆一幅<BR>※16寸精致时尚水晶或拉米纳桌摆一幅<BR>※12寸精致时尚水晶或拉米纳桌摆一幅<BR>※时尚水晶拉丝相框任选<BR>※DVD一张内含所有底片加精修数码文件

后台是用多行文本框录入出现这个问题：
本应该换行却显示br不换行，本显示空格却显示; 
用什么函数能解决啊，大哥们帮忙？给个函数，在线等

Answer 1

读取多行文本框内容时，先用这个函数转换，然后再存入数据库，再直接从数据库中读取就行了：

function htmlencode2(str)
dim result
dim l
if isNULL(str) then
htmlencode2=""
exit function
end if
l=len(str)
result=""
dim i
for i = 1 to l
select case mid(str,i,1)
case "<"
result=result+"<"
case ">"
result=result+">"
case chr(13)
result=result+"<br>"
case chr(34)
result=result+"""
case "&"
result=result+"&"
case chr(32)
'result=result+" "
if i+1<=l and i-1>0 then
if mid(str,i+1,1)=chr(32) or mid(str,i+1,1)=chr(9) or mid(str,i-1,1)=chr(32) or mid(str,i-1,1)=chr(9) then
result=result+" "
else
result=result+" "
end if
else
result=result+" "
end if
case chr(9)
result=result+" "
case else
result=result+mid(str,i,1)
end select
next
htmlencode2=result
end function

Answer 2

response.write replace(replace(rs("content"),"<","<"),">",">")