最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

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

 更新時間:2006年11月16日 00:00:00   作者:  

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

<%
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
%>

相關文章

最新評論

竹北市| 三台县| 汽车| 勃利县| 电白县| 三门峡市| 古丈县| 田东县| 米脂县| 永州市| 湖州市| 平泉县| 米易县| 封丘县| 临潭县| 惠安县| 深水埗区| 江永县| 嘉祥县| 毕节市| 咸阳市| 莱阳市| 双柏县| 扶风县| 陕西省| 霍城县| 阜康市| 和田县| 岑巩县| 霸州市| 长兴县| 康定县| 瑞金市| 铜山县| 齐齐哈尔市| 门源| 平山县| 察哈| 犍为县| 资兴市| 龙游县|