고객센터 : 031-548-0481 /호스팅문의:1644-2646 /서버호스팅문의 : 070-7573-5515/ 평일근무 : 09:00~18:00 / 토/일요일, 공휴일 휴무
솔루션 > 커뮤니티 > 사용팁
사용팁
다운로드 제한 걸기!!!아티보드2.0
- 박인영
- 조회수 : 2810
- 추천수 : 0
- 2007-07-13 오후 12:14:06
※ Library/fileDown.asp 파일 수정
<%@LANGUAGE="VBSCRIPT" CODEPAGE="949"%>
<%
'문제 발생시에 확인할것 : Response.Buffer = False
Response.Buffer = true
RESPONSE.EXPIRES = 0
%>
<!-- #include file = "../DBConnect/DBConnect.asp" -->
<!-- #include file = "../Library/Function.asp" -->
<%
DIM intSeq, intFile, strBoardID
intSeq = REQUEST.QueryString("intSeq")
intFile = REQUEST.QueryString("intFile")
strBoardID = REQUEST.QueryString("strBoardID")
<%
'문제 발생시에 확인할것 : Response.Buffer = False
Response.Buffer = true
RESPONSE.EXPIRES = 0
%>
<!-- #include file = "../DBConnect/DBConnect.asp" -->
<!-- #include file = "../Library/Function.asp" -->
<%
DIM intSeq, intFile, strBoardID
intSeq = REQUEST.QueryString("intSeq")
intFile = REQUEST.QueryString("intFile")
strBoardID = REQUEST.QueryString("strBoardID")
SET RS = DBCON.EXECUTE("EXEC [MPLUS_GET_BOARD_CONFIG_DEFAULT] '" & strBoardID & "', '" & SESSION("strLoginID") & "' ")
DIM CONF_intUserLevel, CONF_bitBoardAdmin, CONF_intDownLevel, CONF_bitDownLevel
CONF_intUserLevel = RS("intUserLevel")
IF CONF_intUserLevel = "" OR ISNULL(CONF_intUserLevel) = True THEN CONF_intUserLevel = 0
IF CONF_intUserLevel = "" OR ISNULL(CONF_intUserLevel) = True THEN CONF_intUserLevel = 0
CONF_bitBoardAdmin = GetAdminCheck(SESSION("strLoginID"), RS("strAdmin"), SESSION("strAdmin"))
CONF_strDownLevel = SPLIT(RS("strDownLevel"), "|")
IF CONF_strDownLevel(0) = 1 THEN CONF_intDownLevel = 0 ELSE CONF_intDownLevel = CONF_strDownLevel(1)
IF CONF_strDownLevel(0) = 1 THEN CONF_intDownLevel = 0 ELSE CONF_intDownLevel = CONF_strDownLevel(1)
CONF_bitDownLevel = GetBoardLevelCheck(CONF_bitBoardAdmin, CONF_intDownLevel, CONF_intUserLevel)
DIM CONF_bitUsePoint, CONF_intDownPoint
CONF_bitUsePoint = RS("bitUsePoint")
CONF_intDownPoint = RS("intDownPoint")
CONF_bitUsePoint = RS("bitUsePoint")
CONF_intDownPoint = RS("intDownPoint")
IF CONF_bitDownLevel = False THEN
RESPONSE.WRITE ExecJavaAlert("다운로드 권한이 없습니다.", 0)
RESPONSE.End()
END IF
RESPONSE.WRITE ExecJavaAlert("다운로드 권한이 없습니다.", 0)
RESPONSE.End()
END IF
'*************************************
IF SESSION("strLoginID") <> "" THEN
SET RS = DBCON.EXECUTE("SELECT [intVisit],[intPoint],[intBoardCount],[intCommentCount] FROM [MPLUS_MEMBER_LIST] WHERE [strLoginID] = '" & SESSION("strLoginID") & "' ")
'다운로드시 제한사항 걸기 --------------------------
IF RS("intVisit") >= 3 AND RS("intBoardCount") >= 1 AND RS("intCommentCount") >= 3 THEN
RESPONSE.WRITE ExecJavaAlert("로그인 3회이상, 게시글 2회이상, 코멘트 3회이상 활동하셔야 다운로드가 가능합니다.", 0)
RESPONSE.End()
END IF
'--------------------------------
IF RS("intPoint") =< 0 THEN
RESPONSE.WRITE ExecJavaAlert("포인트가 부족합니다.", 0)
RESPONSE.End()
END IF
END IF
'*********************************************
SET RS = DBCON.EXECUTE("SELECT [intVisit],[intPoint],[intBoardCount],[intCommentCount] FROM [MPLUS_MEMBER_LIST] WHERE [strLoginID] = '" & SESSION("strLoginID") & "' ")
'다운로드시 제한사항 걸기 --------------------------
IF RS("intVisit") >= 3 AND RS("intBoardCount") >= 1 AND RS("intCommentCount") >= 3 THEN
RESPONSE.WRITE ExecJavaAlert("로그인 3회이상, 게시글 2회이상, 코멘트 3회이상 활동하셔야 다운로드가 가능합니다.", 0)
RESPONSE.End()
END IF
'--------------------------------
IF RS("intPoint") =< 0 THEN
RESPONSE.WRITE ExecJavaAlert("포인트가 부족합니다.", 0)
RESPONSE.End()
END IF
END IF
'*********************************************
SET RS = DBCON.EXECUTE("EXEC [MPLUS_GET_BOARD_FILE] '" & intSeq & "' ")
DIM strFileName
SELECT CASE intFile
CASE "1" : strFileName = RS("strFileName1")
CASE "2" : strFileName = RS("strFileName2")
END SELECT
DBCON.EXECUTE("UPDATE [MPLUS_BOARD] SET [strFileDown" & intFile & "] = [strFileDown" & intFile & "] + 1 WHERE [intSeq] = '" & intSeq & "' ")
SELECT CASE intFile
CASE "1" : strFileName = RS("strFileName1")
CASE "2" : strFileName = RS("strFileName2")
END SELECT
DBCON.EXECUTE("UPDATE [MPLUS_BOARD] SET [strFileDown" & intFile & "] = [strFileDown" & intFile & "] + 1 WHERE [intSeq] = '" & intSeq & "' ")
IF CONF_bitUsePoint = True THEN
IF CONF_intDownPoint <> 0 THEN
IF SESSION("strLoginID") <> "" THEN DBCON.EXECUTE("EXEC [MPLUS_PUT_MEMBER_POINT] '1', '" & strBoardiD & "', '" & intSeq & "', '', '" & SESSION("strLoginID") & "', '', '', 'P002', " & CONF_intDownPoint & ", '다운로드시 지급한 포인트' ")
END IF
END IF
IF CONF_intDownPoint <> 0 THEN
IF SESSION("strLoginID") <> "" THEN DBCON.EXECUTE("EXEC [MPLUS_PUT_MEMBER_POINT] '1', '" & strBoardiD & "', '" & intSeq & "', '', '" & SESSION("strLoginID") & "', '', '', 'P002', " & CONF_intDownPoint & ", '다운로드시 지급한 포인트' ")
END IF
END IF
DIM strUserAgent, strContentDisp, strContentType
strUserAgent = Request.ServerVariables("HTTP_USER_AGENT")
IF InStr(strUserAgent, "MSIE") > 0 THEN
IF InStr(strUserAgent, "MSIE") > 0 THEN
| 번호 | 제목 | 닉네임 | 조회수 | 작성일 |
|---|
-
- No Images
- 번호75
-
"sql server가 없거나 액세스할 수 없습니다 " 에러 보시는..
[1]
- 듀키
- 조회수 3357
- 2007.11.24
-
- No Images
- 번호74
-
네이버검색, 다음검색, RSS를 내 홈페이지에 적용~~
[3]
- 배영근
- 조회수 3088
- 2007.11.22
-
- No Images
- 번호73
-
첨부파일 올립니다. 참고하세요!!
[5]
- 박인영
- 조회수 2785
- 2007.11.09
-
- No Images
- 번호72
-
아티보드 스킨제작 2탄
[3]
- 박인영
- 조회수 3460
- 2007.11.08
-
- No Images
- 번호71
-
쇼핑몰에서 많이 사용되는 최근이미지 세로 무한스크롤링법!!
[11]
- 박인영
- 조회수 3493
- 2007.11.07
-
- No Images
- 번호70
-
아티보드 스킨제작 1탄
[2]
- 박인영
- 조회수 3158
- 2007.11.06
-
- No Images
- 번호69
-
아티보드를 이용한 세션 문제 처리 팁입니다.
[5]
- 웹아티
- 조회수 3474
- 2007.11.05
-
- No Images
- 번호68
-
아티보드 팁 연제를위한 회원님들의 의견[리필들 주삼]
[4]
- 박인영
- 조회수 2458
- 2007.10.17
-
- No Images
- 번호67
-
[강좌/팁]아티보드 저장프로시져 활용 1탄
[2]
- 박인영
- 조회수 3094
- 2007.10.13
-
- No Images
- 번호66
-
채팅소스 올립니다. 활용하세요^^
[3]
- 박인영
- 조회수 3141
- 2007.10.06
-
- No Images
- 번호65
-
게시글 프린트 관련 자료입니다^^ [자찬:강추]
[4]
- 박인영
- 조회수 2981
- 2007.10.06
-
- No Images
- 번호64
-
클럽 출석부 입니다. 참고 하세요!!!!!!
[6]
- 박인영
- 조회수 2934
- 2007.10.01
-
- No Images
- 번호62
-
설치시 424에러가 뜰 경우
[3]
- 행복한떠기
- 조회수 2825
- 2007.09.23
-
- No Images
- 번호61
-
아티보드를 이용한 이미지 멀티미디어 만들기^^
[9]
- 박인영
- 조회수 3009
- 2007.09.21
-
- No Images
- 번호60
-
웹아티에서 사용되는 스크롤 최신글 입니다.
[5]
- 웹아티
- 조회수 2977
- 2007.09.20
-
- No Images
- 번호59
-
iframe 크기 안에 들어가는 아티보드에 맞게 폭, 높이 자동으로 ..
[2]
- 최백호
- 조회수 3433
- 2007.08.01
-
- No Images
- 번호58
-
다운로드 제한 걸기!!!
[2]
- 박인영
- 조회수 2810
- 2007.07.13
-
- No Images
- 번호57
-
2003서버로 아티보드 운영하시는분들 필독^^
[3]
- 박인영
- 조회수 3498
- 2007.07.13
-
- No Images
- 번호56
-
이미지 등록시 이미지파일 체크 자바스크립트_수정2
[2]
- 최경수
- 조회수 2646
- 2007.07.11
유아이디씨 사업자 등록번호 : 206-14-87223 | 통신판매업 신고번호 : 제2010-경기수원-0200호 | 대표: 박동율
경기도 수원시 영통구 광교중앙로 170 효성해린터타워 오피스동 1307호 | 개인정보관리책임자 : 조민식
고객센터 : 1644-2646 | 팩스 : 0504-168-5515
COPYRIGHT(C) OPENKR. ALL RIGHT RESERVED.
경기도 수원시 영통구 광교중앙로 170 효성해린터타워 오피스동 1307호 | 개인정보관리책임자 : 조민식
고객센터 : 1644-2646 | 팩스 : 0504-168-5515
COPYRIGHT(C) OPENKR. ALL RIGHT RESERVED.
댓글 2