关于输入框中显示双引号和单引号

前台显示解决办法:
方法一:
单引号
双引号
方法二:
单引号
双引号

从后台读取数据前台显示解决办法:
我们从数据库中读取值到前台显示时应该加入转换
JavaScript版本:

<% @Language="JavaScript" %>
<%
function ForamtValue(oStr)
{
    switch(typeof(oStr))
    {
        case "date"     :  
//直接toString()转换,可以加入丰富的显示方式
            sStr = (new Date(oStr)).toString();
            break;
        default         :
            sStr = String(oStr);
    }
    sStr = sStr.replace(//"/g,"""); //输入框中显示双引号问题
    sStr = sStr.replace(//'/g,"'"); //输入框中显示单引号问题
    return sStr;
}
%>

<%
//测试
var str = "/"灰豆宝宝.net(魔幻季节)/"";
var str = new Date();
%>


[不能正常显示]

[正常显示]

VBScript版本:
<% @Language="VBScript" %>
<%
function ForamtValue(oStr)
    Select Case VarType(oStr)
        Case "vbDate"    
'直接toString()转换,可以加入丰富的显示方式
            sStr = CDate(oStr)
        Case Else       
            sStr = CStr(oStr)
End Select
sStr = Replace(sStr,"""",""") '输入框中显示双引号问题
    sStr = Replace(sStr,"'","'")  '输入框中显示单引号问题
    ForamtValue = sStr
End Function
%>

<%
'测试
Dim str
str = """'灰豆宝宝.net(魔幻季节)'"""
%>


[不能正常显示]

[正常显示]