您现在的位置： 万盛学电脑网 >> 程序编程 >> 网络编程 >> asp编程 >> 正文
ASP常用函数:Str4Js()
作者：佚名 责任编辑：admin 更新时间：2022-06-22
程序代码
<%
'功能:定义转换为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
%>
- 上一个程序编程： ASP常用函数:WriteLn() PrintLn()
- 下一个程序编程： ASP常用函数:CheckBoxScript()
