Опция явная
Function Striphtml (strtext)
Dim -Arysplit, i, J, Stroutput
arysplit = split (strText "
Если Len (Arysplit (0))> 0, то J = 1 else J = 0
для i = j до ubund (арисплита)
Если instr (Arysplit (i), ">") тогда
arysplit (i) = mid (Arysplit (i), instr (arysplit (i), ">")+1)
еще
ARYSPLIT (i) = "END IF
следующий
stroutput = join (arysplit, "")
Stroutput = Mid (Stroutput, 2-J)
stroutput = replace (stroutput, ">", ">")
stroutput = reply (stroutput »,
Striphtml = Stroutput
Конечная функция
%>
0 затем %>
Просмотр строки без HTML Striping:
Просмотр строки с HTML Striping:
Выше приведено о том, как очистить теги HTML в контенте. Спасибо за чтение. Для получения дополнительного контента, пожалуйста, обратите внимание на веб -сайт канала Wuxin Technology.