홈페이지>네트워크 프로그래밍 튜토리얼>ASP 튜토리얼

ASP 제한 IP 투표 전체 예제 코드

저자：Eve Cole 업데이트 시간：2025-05-06 23:32:02

권장 : ASP 긴 숫자는 인스턴스 코드를 표시하기 위해 쉼표로 구분됩니다.
% 함수 쉼표 (str)가 아닌 경우 (ISNUMERIC (str = 0) 그런 다음 결과 = 0 elseif len (fix (str)) 4 그런 다음 결과 = str else pos = inst (1, str,.) pos 0이면 dec = mid (str, pos) res = strreverse (fix) loopcount = 1 동안 loopcount = 1입니다.

작업 관계로 인해 기능 중 하나는 사용자에게 투표하는 것이며 동일한 IP가 동일한 사용자에게 한 번만 투표하고 ASP 코드를 게시해야합니다.

  1.  <%
  2.  '저자 : 무자비한 출처 :
  3.  DB_CONN (DBS)
  4.  VoteUserName = trim (request.querystring (사용자 이름))
  5.  rs_create (selectusernamefrom [user] whereusername = '& voteusername &')
  6.  ifrs.eofandrs.bofthen
  7.  응답. 잘못된 매개 변수를 작성하십시오. 올바르게 액세스하십시오!
  8.  응답 ()
  9.  endif
  11.  '첫 번째 케이스는 첫 번째 클릭, 쿠키는 비어 있고 IP가 비어 있습니다.
  12.  '두 번째 상황은 두 번째 사람을 클릭하여 투표하고, 첫 번째 사람의 쿠키가 존재하고, 두 번째 사람의 쿠키는 존재하지 않지만 IP는 존재합니다.
  13.  '세 번째 상황은 IP로 투표하는 것입니다. 쿠키가 존재하고 IP가 비어 있습니다.
  15.  ifrequest.cookies (dwww) (& voteusername &) = 그런 다음
  16.  응답
  17.  응답 .cookies (dwww) .expires = date ()+365
  18.  callvotebody ()
  19.  또 다른
  20.  ifinstr (request.cookies (dwww) (& voteusername &), request.cookies (dwww) (& voteusername &) & |) <> 0then
  21.  callvotebody ()
  22.  또 다른
  23.  '응답. 죄송합니다. 투표했습니다! 쿠키는 반복됩니다
  24.  response.write <Script> Alert ( '죄송합니다, 투표!'); history.back (); </script>
  25.  응답 ()
  26.  endif
  27.  endif
  29.  하위 바디 ()
  30.  VoteUserName = trim (request.querystring (사용자 이름))
  31.  checkip = request.servariables (http_x_forwarded_for) '바이 패스 프록시 IP
  32.  ifcheckip = thecheckip = request.servervariables (remote_addr)
  33.  geturl =
  34.  geturl = request.servervariables (http_referer)
  36.  sql = selectUsername, ipfromvotewhereusername = '& voteusername &'andip = '& checkip &'
  37.  RS_CREATE (SQL)
  38.  ifnotrs.bofandnotrs.eofthen
  39.  '응답. 죄송합니다. 투표했습니다! IP 복제
  40.  response.write <Script> Alert ( '죄송합니다, 투표!'); history.back (); </script>
  41.  응답 ()
  42.  또 다른
  43.  conn.execute (insertintovote (username, ip, addtime) 값 ( '& voteusername &', '& checkip &', '& now () &')))
  44.  conn.execute (업데이트 [user] setvote = vote+1whereusername = '& voteusername &')
  45.  '응답. 투표가 성공했습니다!
  46.  response.write <cript> Alert ( '축하, 투표가 성공했습니다!'); location.href = '& request.servariables (http_referer) &'</script>
  47.  응답 ()
  48.  endif
  49.  Endsub
  51.  rs_close ()
  52.  DB_CLOSE ()
  53.  %>

공유 : ASP는 로그인 페이지 확인 프로그램을 만듭니다
사용자 로그인 검증 스크립트, chkpwd.asp % '========= 사용자 로그인 확인 스크립트 ======'통과 된 객체가 아직 정의되지 않은 경우,이를 거짓으로 정의하면 확인이 전달되지 않았 음을 의미합니다. ISEMPTY (세션 (Session)) 인 경우 세션 (전달) = 거짓 종료 '세션 (전달) = 거짓 인 경우 확인이 전달되지 않은 다음 읽기가 시작됨을 의미합니다.

관련 기사