程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 更多編程語言 >> 編程問題解答 >> 如何編寫一個過濾掉HTML代碼的函數?

如何編寫一個過濾掉HTML代碼的函數?

編輯:編程問題解答

如何編寫一個過濾掉HTML代碼的函數?

<%
Function Filterhtml(strToFilter)
  Dim strTemp
  strTemp = strToFilter
  While Instr(1,strTemp,"<") AND Instr(1, strTemp, ">")
    strTemp = Left(strTemp, Instr(1, strTemp, "<")-1) & Right(strTemp, Len(strTemp)-Instr(1,strTemp, ">"))
  WEnd
  Filterhtml = strTemp
End Function
%>
  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved