最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
以前收集的一些资料---转换文本为超联和Email格式的代码
时间：2022-06-30 11:37:54 编辑：袖梨 来源：一聚教程网
如果用户输入了http://aaa.**bb*b.ccc
下面这个代码将把他的输入转换成http://aaa.**bb*b.ccc
大家看看正则表达式有多厉害，呵呵。
'调用这个函数来显示成超联结
Response.Write to_html(s_message)
%>
Function to_html(s_string)
to_html = Replace(s_string, """", """)
to_html = Replace(to_html, " to_html = Replace(to_html, ">", ">")
to_html = Replace(to_html, vbcrlf, "
")
to_html = Replace(to_html, "/ to_html = Replace(to_html, "/>", ">")
to_html = edit_hrefs(to_html)
End Function
%>
下面这个代码将把他的输入转换成http://aaa.**bb*b.ccc
大家看看正则表达式有多厉害，呵呵。
'调用这个函数来显示成超联结
Response.Write to_html(s_message)
%>
Function to_html(s_string)
to_html = Replace(s_string, """", """)
to_html = Replace(to_html, " to_html = Replace(to_html, ">", ">")
to_html = Replace(to_html, vbcrlf, "
")
to_html = Replace(to_html, "/ to_html = Replace(to_html, "/>", ">")
to_html = edit_hrefs(to_html)
End Function
%>
相关文章
- 三角洲行动霰弹枪怎么改 霰弹枪改枪方案汇总 09-15
- 无主之地4贩卖机购买建议 贩卖机哪些值得购买 09-15
- 三角洲行动轻机枪怎么改 轻机枪改枪方案代码汇总 09-15
- 无主之地4投投乐任务怎么做 投投乐支线攻略 09-15
- 三角洲行动射手步枪怎么改 精确射手步枪改枪方案大全 09-15
- 无主之地4阵营聚落有什么功能 阵营聚落作用介绍 09-15