 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
<% \\\'调用这个函数来显示成超联结 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, "<br>") to_html = Replace(to_html, "/<", "<") to_html = Replace(to_html, "/>", ">") to_html = edit_hrefs(to_html) End Function %> <script language="javascript1.2" runat=server> function edit_hrefs(s_html){ // 一个使用正则表达式的典范 // 转变文本中所有的超联结和电子邮件格式 s_str = new String(s_html); s_str = s_str.replace(/bhttp://www(.[w+.:/_]+)/gi, "http://¬¤¸$1"); s_str = s_str.replace(/b(http://w+.[w+.:/_]+)/gi, "<a href="$1">$1</a>"); s_str = s_str.replace(/b(www.[w+.:/_]+)/gi, "<a href="http://$1">$1</a>"); s_str = s_str.replace(/bhttp://¬¤¸(.[w+.:/_]+)/gi, "<a href="http://www$1">http://www$1</a>"); s_str = s_str.replace(/b(w+@[w+.?]*)/gi, "<a href="mailto:$1">$1</a>"); return s_str; } </script> 返回类别: 教程 上一教程: 关于ACCESS 2K与ASP的几点想法 下一教程: ASP中通过GETROWS实现数据库记录分页的一段代码 您可以阅读与"转变文本为超联和EMAIL格式的代码"相关的教程: · 用ASP实现的代码批量修改程序，FSO相关 · 一段返回随机记录的代码 · 利用ASP验证身份证号是否准确的代码 · 输出带日期格式的随机数 · 两个控制显示格式的函数(自动换行、自动省略) |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
