ASP常用函数:Str4Js()_ASP教程

推荐：ASP常用函数:WriteLn() PrintLn()
程序代码 % '功能:输出字符串加换行 '来源:http://www.cncms.com/asp.asp Function WriteLn(sString) Response.Write( sString vbCrLf ) End Function % 程序代码 % '功能:输出字符串加HTML代码br / '来源:http://www.cncms.com/asp.asp Function PRintLn(sString) Res

 程序代码

<%
'功能:定义转换为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常用函数:getIMG()
目前还是有BUG的,最新的测试页面在: http://www.reallydo.com/getimg.asp 正则分析页面在: http://jorkin.reallydo.com/article.asp?id=380 发现BUG请在后面留言,谢谢. 1.31修正 src=后面有空格不能正确匹配.已修正. src=''为空时出错.已修正. 发现BUG: 图片路径有多个