테스트 사이트 - 개발 중인 베타 버전입니다
Application 변수를 사용하시면 됩니다.

한서버에서 모든 사용자가 공유하는 전역변수라고 생각하시면 됩니다.

Session 변수와 혼동이 될 수 있는데 Session 변수는 사용자 혼자만 공유하는

변수입니다.

 

* 접속하는 부분의 소스

dim ip, users

ip = Request.ServerVariables("REMOTE_ADDR")
users = application("users")
if instr(users, ip) = 0 then
    users = users & "," & ip
    application.lock
    application("users") = users
    application.unlock
end if

 

* 접속 끊는 부분의 소스

ip = Request.ServerVariables("REMOTE_ADDR")
application.lock
application("users") = replace(application("users"), "," & ip, "")
application.unlock

 

* 접속자 표시 부분

response.write "현재 접속 IP = " & application("users") 

 

[이 게시물은 관리자님에 의해 2011-10-31 16:46:12 기타에서 이동 됨]

댓글 작성

댓글을 작성하시려면 로그인이 필요합니다.

로그인하기

게시판 목록

프로그램

글쓰기