台灣最大程式設計社群網站
線上人數
991
 
會員總數:246138
討論主題:189722
歡迎您免費加入會員
討論區列表 >> 專欄文章 >> 去除 HTML 標籤
[]  
[我要回覆]
回應主題 加入我的關注話題 檢舉此篇討論 將提問者加入個人黑名單
去除 HTML 標籤
價值 : 0 QP  點閱數:1924 回應數:0
樓主

站務人員 站長
門外漢
0 1580
542 9
發送站內信

捐贈 VP 給 站務人員
--------------------------------------------
<Script Language="VBScript">
<!--
Function RemoveHTML(strText)
Dim RegEx
Set RegEx = New RegExp
RegEx.Pattern = "<[^>]*>"
RegEx.Global = True
RemoveHTML = RegEx.Replace(strText, "")
frmRemoveHTML.strHTML.Value = RemoveHTML 'frmRemoveHTML.strHTML.Value 表單的物件
End Function
-->
</Script>

以上為關鍵的程式碼...
看了以上的程式碼才發現自己的技術領域是那麼的狹隘
奇怪我怎麼會知道...(去微軟看的不過都是英文)
我自己也看到許多網友曾為了去除 HTML 標籤而煩惱
當然希望能對那些人有些幫助

其實這種做法有滿多種的每個程式設計師寫出來的都不一樣
有的用回圈跑(可以決定哪個標籤要去除)有的就是用上述的方法(去除所有 HTML 標籤)

如果有人有更好的方式別忘了通知我ㄚ...^_^

DEMO:http://home.kimo.com.tw/jiaren/

***************************************************************
方法二(提供者:阿尼 yuchen128@home.com)
------------------------------------------
ㄚ仁兄:
這個是我的方法, 可以直接連結資料庫其中的 step2 直接改成資料庫的名稱就可以了.這個也可以改成 Filesystem 也就是可以只接把一個 asp 程式直接讀成 html
<%
Lines = Split( step2, vbCrLf )
For I = 0 To UBound(Lines)
Response.Write "" & Server.HTMLEncode( Lines(I) )
If I <> UBound(Lines) Then Response.Write "<BR>"
Next
%>


本篇文章發表於2001-04-27 00:00
目前尚無任何回覆
   

回覆
如要回應,請先登入.