권장 : 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 코드를 게시해야합니다.
- <%
- '저자 : 무자비한 출처 :
- DB_CONN (DBS)
- VoteUserName = trim (request.querystring (사용자 이름))
- rs_create (selectusernamefrom [user] whereusername = '& voteusername &')
- ifrs.eofandrs.bofthen
- 응답. 잘못된 매개 변수를 작성하십시오. 올바르게 액세스하십시오!
- 응답 ()
- endif
- '첫 번째 케이스는 첫 번째 클릭, 쿠키는 비어 있고 IP가 비어 있습니다.
- '두 번째 상황은 두 번째 사람을 클릭하여 투표하고, 첫 번째 사람의 쿠키가 존재하고, 두 번째 사람의 쿠키는 존재하지 않지만 IP는 존재합니다.
- '세 번째 상황은 IP로 투표하는 것입니다. 쿠키가 존재하고 IP가 비어 있습니다.
- ifrequest.cookies (dwww) (& voteusername &) = 그런 다음
- 응답
- 응답 .cookies (dwww) .expires = date ()+365
- callvotebody ()
- 또 다른
- ifinstr (request.cookies (dwww) (& voteusername &), request.cookies (dwww) (& voteusername &) & |) <> 0then
- callvotebody ()
- 또 다른
- '응답. 죄송합니다. 투표했습니다! 쿠키는 반복됩니다
- response.write <Script> Alert ( '죄송합니다, 투표!'); history.back (); </script>
- 응답 ()
- endif
- endif
- 하위 바디 ()
- VoteUserName = trim (request.querystring (사용자 이름))
- checkip = request.servariables (http_x_forwarded_for) '바이 패스 프록시 IP
- ifcheckip = thecheckip = request.servervariables (remote_addr)
- geturl =
- geturl = request.servervariables (http_referer)
- sql = selectUsername, ipfromvotewhereusername = '& voteusername &'andip = '& checkip &'
- RS_CREATE (SQL)
- ifnotrs.bofandnotrs.eofthen
- '응답. 죄송합니다. 투표했습니다! IP 복제
- response.write <Script> Alert ( '죄송합니다, 투표!'); history.back (); </script>
- 응답 ()
- 또 다른
- conn.execute (insertintovote (username, ip, addtime) 값 ( '& voteusername &', '& checkip &', '& now () &')))
- conn.execute (업데이트 [user] setvote = vote+1whereusername = '& voteusername &')
- '응답. 투표가 성공했습니다!
- response.write <cript> Alert ( '축하, 투표가 성공했습니다!'); location.href = '& request.servariables (http_referer) &'</script>
- 응답 ()
- endif
- Endsub
- rs_close ()
- DB_CLOSE ()
- %>
공유 : ASP는 로그인 페이지 확인 프로그램을 만듭니다 사용자 로그인 검증 스크립트, chkpwd.asp % '========= 사용자 로그인 확인 스크립트 ======'통과 된 객체가 아직 정의되지 않은 경우,이를 거짓으로 정의하면 확인이 전달되지 않았 음을 의미합니다. ISEMPTY (세션 (Session)) 인 경우 세션 (전달) = 거짓 종료 '세션 (전달) = 거짓 인 경우 확인이 전달되지 않은 다음 읽기가 시작됨을 의미합니다.