<%
Dim resno, id
Dim SQL, Rs
id =Session("user_id")
if not len(Session("user_id"))>0 then
GoUrlHidden "/login/login.asp", "bus", "memWarn", "", request("URL"), "/membership/member_pwChange.html", ""
end if
SQL = "select cjmain.CryptJUNDAJI.dePOOLU(sresno) resno "&_
" from CJMEMBER where ID='"& id &"'"
ConnectCJMAIN()
Set Rs = dbconnCJMAIN.execute(SQL)
'//회원정보가 존재하지 않을경우
If Rs.EOF Then
Response.End
End If
resno =Rs("resno")
Rs.close
set Rs = Nothing
CloseCJMAIN()
%>
:: 맛있는 면전문점 시젠 ::
