본문 바로가기
Program

글 읽을때 조회수 증가 체크(쿠키 이용)

본문

'-------------------------------------------------
' 쿠키 중복 체크
'-------------------------------------------------
Function CookieDuplicateCheck(tableName, idx)
    dim dupliChk
    dim c_read_idx
    dim i
    dupliChk = false
   
    c_read_idx = Request.Cookies("C_TABLE_NAME")("READ")
   
    Response.Cookies("C_TABLE_NAME") = tableName
    Response.Cookies("C_TABLE_NAME").Path = "/"
    Response.Cookies("C_TABLE_NAME").Expires = date+1

    arrRead = split(c_read_idx,",")
    for i = 1 to UBound(arrRead)
        if CInt(idx) = CInt(Trim(arrRead(i))) then
            dupliChk = true
        end if
    next
    if dupliChk = true then
        Response.Cookies("C_TABLE_NAME")("READ") = c_read_idx
    else
        Response.Cookies("C_TABLE_NAME")("READ") = c_read_idx & "," & idx
    end if
    CookieDuplicateCheck = dupliChk
End Function
[이 게시물은 듀라님에 의해 2015-04-03 10:08:13 워드프레스에서 이동 됨]
[이 게시물은 듀라님에 의해 2015-04-03 10:27:24 Public에서 이동 됨]
[이 게시물은 듀라님에 의해 2015-04-03 10:33:53 팁과강좌에서 이동 됨]
[이 게시물은 최고관리자님에 의해 2017-06-10 14:24:30 ASP에서 이동 됨]
0 0
  • 페이스북으로 보내기
  • 트위터로 보내기
  • 구글플러스로 보내기
  • 카카오톡으로 보내기

페이지 정보

l2j (121.♡.101.20) 작성일07-05-02 14:53 조회1,176회 댓글0건

댓글목록

등록된 댓글이 없습니다.

Program 목록

게시물 검색

사이트 정보

  • 회사명 회사명 / 대표 대표자명
  • 주소 OO도 OO시 OO구 OO동 123-45
  • 사업자 등록번호 123-45-67890
  • 전화 02-123-4567 / 팩스 02-123-4568
  • 통신판매업신고번호 제 OO구 - 123호
  • 개인정보관리책임자 정보책임자명

고객센터

  • 02-1234-5678
  • abc@abc.com
  • 월-금 am 11:00 - pm 05:00
  • 점심시간 : am 12:00 - pm 01:00
  • 주말&공휴일은 1:1문의하기를 이용하세요.
상단으로