11.Nas_1


새창 작성 수정 목록 링크 Edit G카랜다 HDD HDD HDD 게시물 주소 복사


[ClassicASP] 모든 태그 제거 & 허용태그 외의 모든 html 태그 제거 (2012-04-18 수정)

♨ 카랜더 일정 :
  • 링크

  • 첨부

  • 컨텐츠 정보

    본문

    \r\n
    \r\n
    [ClassicASP] 모든 태그 제거 & 허용태그 외의 모든 html 태그 제거 (2012-04-18 수정)글자 확대 글자 축소
    \r\n
      2012-04-17 22:22 Hit.560 트랙백주소 게시글을 twitter로 보내기 게시글을 facebook으로 보내기 게시글을 Me2Day로 보내기 이 게시글을 요즘으로 보내기 게시글을 구글로 북마크 하기 게시글을 네이버로 북마크 하기
    \r\n
    \r\n
    \r\n
    \r\n
    <% Option Explicit %>
    \r\n

    <%
    \r\n
    \r\n
    ' =========================================================
    \r\n
    ' 패턴으로 치환할수 있는 eregi_replace()함수
    \r\n
    ' PHP에는 있으나 ASP에는 없기 때문
    \r\n
    ' =========================================================
    \r\n
    Function eregi_replace(pattern, replace, text)
    \r\n
     Dim eregObj
    \r\n
     
    \r\n
     Set eregObj = New RegExp
    \r\n
     
    \r\n
     eregObj.Pattern = pattern '패턴 설정
    \r\n
     eregObj.IgnoreCase = True '대소문자 구분 여부
    \r\n
     eregObj.Global = True '전체 문서에서 검색
    \r\n
     
    \r\n
     eregi_replace = eregObj.Replace(text, replace) 'Replace String
    \r\n
    End Function
    \r\n
     
    \r\n
     
    \r\n
    ' =========================================================
    \r\n
    ' 모든 태그제거
    \r\n
    ' 사용법 : strip_tags1(content)
    \r\n
    ' content = "....."
    \r\n
    ' strip_tags2(content)
    \r\n
    ' =========================================================
    \r\n
    Function strip_tags1(str)
    \r\n
      Dim content
    \r\n

      content = str  
    \r\n
      content = eregi_replace("<(/)?([a-zA-Z]*)(\\s[a-zA-Z]*=[^>]*)?(\\s)*(/)?>","",content)  ' all
    \r\n
      content = eregi_replace("<(no)?script[^>]*>.*?</(no)?script>","",content)  ' scripts
    \r\n
      content = eregi_replace("<style[^>]*>.*</style>", "", content)  ' style
    \r\n
      content = eregi_replace("<(\""[^\""]*\""|\'[^\']*\'|[^\'\"">])*>","",content)  ' TAGS
    \r\n
      content = eregi_replace("<\\w+\\s+[^<]*\\s*>","",content)  ' nTAGS
    \r\n
      content = eregi_replace("&[^;]+;","",content)  ' entity_refs
    \r\n
      content = eregi_replace("\\s\\s+","",content)  ' whitespace
    \r\n

      strip_tags1 = content
    \r\n
    End Function
    \r\n
     
    \r\n
     
    \r\n
    ' =========================================================
    \r\n
    ' 허용태그 외의 모든 태그제거
    \r\n
    ' 사용법 : strip_tags2(content, allowtags)
    \r\n
    ' content = "....."
    \r\n
    ' allowtags = "br,a,img,table,b,font,div,center,embed"  ' 허용 ※ 태그 붙여서 연속으로, 공백 오류발생
    \r\n
    ' strip_tags2(content, allowtags)
    \r\n
    ' =========================================================
    \r\n
    Function strip_tags2(str,allowtags)
    \r\n
      Dim content, tags
    \r\n
     
    \r\n
      content = str
    \r\n
      tags = replace(allowtags,",","|")
    \r\n
      content = eregi_replace("<(/?)(?!/|" & tags & ")([^<>]*)?>","<$1$2&gt",content)
    \r\n
      content = eregi_replace("(javascript|vbscript)+","$1//",content)
    \r\n
      content = eregi_replace("(.location|location.|onload=|.cookie|alert|window.open|onmouse|onkey|onclick|view-source)+","//",content) '//자바스크립트 실행방지
    \r\n
     
    \r\n
      strip_tags2 = content
    \r\n
    End Function
    \r\n
     
    \r\n
     
    \r\n
    '사용예
    \r\n
    Dim allowtags, content
    \r\n
    allowtags = "br,a,img,b,font,div,center,embed"  ' 허용 ※ 태그 붙여서 연속으로, 공백 오류발생
    \r\n
     
    \r\n
    content = "<font color=red>허용하지 않은 태그</font>가<br />잘 <b>보이나요?</b><br /><script></script>"
    \r\n
    content = content & "<table><div align=center>아주 유용할꺼에요~</div><body><html><xmp><pre>"
    \r\n
     
    \r\n
    response.write "strip_tags1 결과<br />"& strip_tags1(content) &"<br /><br />"
    \r\n
    response.write "strip_tags2 결과<br />"& strip_tags2(content, allowtags)
    \r\n
    %>
    \r\n

    결과


    <소스보기>
    \r\n
    strip_tags1 결과
    \r\n
    허용하지 않은 태그가잘 보이나요?아주 유용할꺼에요~
    \r\n
     
    \r\n
    strip_tags2 결과
    \r\n
    <font color=red>허용하지 않은 태그</font>가<br />잘 <b>보이나요?</b><br /><script&gt</script&gt<table&gt<div align=center>아주 유용할꺼에요~</div><body><html&gt<xmp&gt<pre&gt


    참고자료
    http://flashcafe.org/3717 
    http://dualist.tistory.com/115
    \r\n

    \n
    [이 게시물은 관리자님에 의해 2013-11-18 21:29:50 11.H_BBS에서 이동 됨]
    [ 추가 정보 ... 더보기) ]
    뷰PDF 1,2



    office view

    관련자료

    댓글목록

    등록된 댓글이 없습니다.

    목록

    새창 작성 수정 목록 링크 Edit G카랜다 HDD HDD HDD 게시물 주소 복사




    Total 1,684 / 72 Page
    [ new.php 호출시 head.php속에 그림불러오기 error 에 대한 m_path 추가 ]

    new.php 호출시 head.php속에 그림불러오기 error 에 대한 m_path 추가\r\nnew.php에 다음을 추가\r\n\n[이 게시…

    [ 불당썸, 에디터 사용시 썸네일 생성 에러 근본적인 해결방법 ]

    불당썸, 에디터 사용시 썸네일 생성 에러 근본적인 해결방법 \r\n\r\n 리리치요 \r\n작성일시 2013.01.25 18:41:15 \r\n…

    [ 전체게시물 (new.php) 불러오기에서 이미지를 불러오고 싶은데요.. ]

    .전체게시물 불러오기에서 이미지 추출방법 좀 알려주세요??채택됨뱅마까치작성일시2013.03.23 23:02:41조회167댓글8전체게시물 (new…

    [ 글제목을 크릭시 링크1으로 이동하기 ]

    이미지+제목 롤링 최신글입니다.이미지와 제목이 함께 돌아갑니다.skin -> latest 폴더에 업로드 후<?=latest("hn_r…

    [ amina 스킨 홈 페이지 수정 상단 자동메뉴 automenu 아미나스킨 테마에 적용 ] 댓글 1

    .amina 스킨 홈 페이지 수정 상단 자동메뉴 automenu 아미나스킨 테마에 적용\r\n\r\n<!-- gnb 시작--><…

    [ 림스 모바일 빌더 - jquery mobile Update - 업데이트 까지 m.zip ] 댓글 2

    림스 모바일 빌더 - jquery mobile Update - 업데이트파일명/업데이트제목작성일수정버젼조회m/skin/write.skin.basi…

    [ [게시판] 상단 메뉴 그룹>게시판 자동 메뉴[추천] ]

    [게시판] 상단 메뉴 그룹>게시판 자동 메뉴글쓴이 :이빌더스조회 : 2,680 추천 : 21 스킨화.zip (18.6K)[94]DATE :…

    [ 블로그나 홈페이지에 BGM 넣기(시계와 날씨창(600종) 큐브) ]

    블로그나 홈페이지에 BGM 넣기(시계와 날씨창(600종) 큐브)전체공개무료BGM 설치하기 팁|2008/01/30 17:30http://blog.…

    [ amina thema 설정변경 파일 위치 ]

    ###■ https://11q.kr는 정보를 찾아 공유 합니다..■ https://11q.kr\r\n\r\n\r\n\r\n\n[이 게시물은 관리…

    [ 배추 라이트와 아미나 스킨 테마 적용 ]

    배추 라이트와 아미나 스킨테마 적용\n[이 게시물은 관리자님에 의해 2013-11-17 19:08:52 11.H_BBS에서 이동 됨]\n[이 게…

    [ 시놀로지 서버 자료 공유하기 sw공유 방법 ]

    시놀로지 diskstation의 filestation의 파일 공유 방법은 패스워드를 입력해야 공유됨\r\n\r\n\n[이 게시물은 관리자님에 의…

    [ disk station에 로그인할 권한이 없습니다라는 메세지가 뜹니다 외부ip ddns또는 특정 pc 접속… ] 댓글 2

    disk station에 로그인할 권한이 없습니다라는 메세지가 뜹니다 외부ip ddns로 집에서 접속하니 dsm이 접속이되지 않음- 저는 내부 …

    [ filestation에서 디랙토리가 삭제되지 안음 해결 ]

    11q.kr 는 네이버/구글에서 검색 찾아오세요\r\n----------------------------------------------file…

    [ 림스모바일 2.6.3 검색이 되지 안되네요 (1/14일 버전 해결) ] 댓글 2

    심봉사 \r\n감사 합니다 새롭게 업데이트 하여 금일 림스모바일 2.6.3 버전 설치 하였습니다 찾기가 되지 않아 문의 드립니다 림스 모바일 홈…

    [ 배추빌더 lite 전체 업데이트 하기 ]

    배추빌더 lite 전체 업데이트 하기\r\n\r\n.Shims HomePage[https://11q.kr 홈피] .\n[이 게시물은 관리자님에 …

    [ 게시판 공유 카카오톡으로 링크 공유 하기_성공 20150109 ] 댓글 1

    >https://developers.kakao.com/docs/js카카오톡개발가이드에 접속 / 카카오톡 링크 에서1.원본 아래 소스를 게시…


    ♥간단_메모글♥


    최근글


    새댓글



    PHP 안에 HTML ☞ 홈페이지 화면갱신 시간은 ♨
    ▶ 2024-07-07 23:58:15

    오늘의 홈 현황


    • 현재 접속자♨ 647 명
    • 오늘 가입자※ 2 명
    • 어제 가입자※ 5 명
    • 주간 가입자※ 17 명
    • 오늘 방문자 2,015 명
    • 어제 방문자 2,424 명
    • 최대 방문자 13,042 명
    • 전체 방문자 4,419,923 명
    • 전체 게시물※ 8,680 개
    • 전체 댓글수※ 24,852 개
    • 전체 회원수 11,096 명

    QR코드


    ☞ QR코드 스캔은 kakao앱 자체 QR코드

    알림 0








    최신글↑