if Session("userid") <> "" then
'접속한 사용자의 id 주소 필드를 가져와 현재 IP주소와 비교
strSQL = "select count(m_id) from member "
strSQL = strSQL & " where m_id='" & Session("userid") & "'"
strSQL = strSQL & " and ip = '"& Resquest.ServerVariables("REMOTE_ADDR") & "'"

Set count_RS = dbCon.Execute(strSQl)

if Count_RS(0) = 0 then
' RS(0)이면 처음 로그인 했을때의 IP주소와 현재 접속하고 있는 IP주소가 틀린 경우
' 중복 접속한 아이디 처리
' 사용자 사이트 환경에 맞게 에러 구문 처리
end if
end if