在 ASP 中常用的 Str4J() 函数

在 ASP 中常用的 Str4J() 函数:

程序代码:

<%

'功能:定义转换为javascript字符串输出(约定Javascript中，用单引号引用字符串)

'来源:http://www.cncms.com/asp.asp

Function Str4Js(sString)

 Str4Js = sString

 If IsNull(sString) Then Str4Js = "" : Exit Function

 Str4Js = Replace(Str4Js, "/", "//")

 Str4Js = Replace(Str4Js, "'", "/'")

 Str4Js = Replace(Str4Js, vbCrLf, "/n")

 Str4Js = Replace(Str4Js, vbCr, "/n")

 Str4Js = Replace(Str4Js, vbLf, "/n")

 Str4Js = Replace(Str4Js, vbTab, "/t")

 Str4Js = Replace(Str4Js, "script", "scr'+'ipt", 1, -1 , 1)

End Function

%>

（编辑：银川站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!