%
if request.form("pwd") <> "" then
set userinfo = server.createobject("ADODB.Connection")
userinfo.open session("dsn")
SQLString = "select count(*) from " & session("linktable") & " where ÀϷùøÈ£=" & session("seqn") & " and ¾ÏÈ£='" & request.form("pwd") & "'"
set pwdchk = userinfo.Execute(SQLString)
' response.write(mid(session("dsn"),instr(session("dsn"),"PWD")+4))
if pwdchk.fields(0) = 0 and request.form("pwd")&";" <> mid(session("dsn"),instr(session("dsn"),"PWD")+4) then
%>
<%
else
userinfo.execute("delete from " & session("linktable") & " where ÀϷùøÈ£ =" & session("seqn"))
SQLString = "UPDATE " & session("linktable") & " SET ÀϷùøÈ£ = ÀϷùøÈ£ -1 WHERE ÀϷùøÈ£ > " & session("seqn")
userinfo.Execute(SQLString)
end if
userinfo.close
set userinfo=nothing
response.redirect "boardlist.asp?table=" & session("table")
else
session("seqn") = request.querystring("seqnum")
end if
%>
ÇÏÀÌ»þ½Ã Àü¹® »ý»ê¾÷ü "õȣ»ê¾÷"ÀÔ´Ï´Ù.
.............Copyright
© 2001 CHUNHO inc. All right reserved.
|