sp1000je
180 lines
5.5 KiB
Plaintext
180 lines
5.5 KiB
Plaintext
<!--#include virtual="/common/lib/dbcon.asp"-->
|
|
<!--#include virtual="/common/lib/func.asp"-->
|
|
<!--#include file="config.asp"-->
|
|
<%
|
|
|
|
|
|
If is_delete <> "Y" Then Call goMessage_board("접근권한이 없습니다.", Request.ServerVariables("HTTP_REFERER"), "", "", a_num)
|
|
|
|
|
|
|
|
'//파라미터정보 *************************************************************************************
|
|
b_num = InputValue(request("b_num"))
|
|
a_num = InputValue(request("a_num"))
|
|
status = InputValue(request("status"))
|
|
'//$chk = InputValue($chk);
|
|
chk = InputValue(request("chk"))
|
|
chk = Split(Replace(chk, " ", ""), ",")
|
|
'//**************************************************************************************************
|
|
|
|
|
|
If is_ad_cms <> "Y" then '//관리자가아닐때 체크
|
|
|
|
If SESSION("pwd_chk_" & a_num & "_" & b_num) <> "ok" then
|
|
|
|
Call locationhref("pwd.asp?prepage=dele&a_num=" & a_num & "&b_num=" & b_num & "&" & page_info)
|
|
|
|
End if
|
|
End if
|
|
|
|
|
|
If status = "totdel" then '//다중삭제
|
|
|
|
For z=0 to UBound(chk)
|
|
|
|
'//이미지 삭제
|
|
SQL_I = "select b_step,b_level from " & a_tablename & " where b_num = " & trim(chk(z))
|
|
|
|
Set rs_2 = dbcon.execute( sql_i )
|
|
|
|
Do Until rs_2.eof
|
|
|
|
b_step = rs_2("b_step")
|
|
b_level = rs_2("b_level")
|
|
|
|
|
|
|
|
|
|
If b_step = 0 and b_level = 0 then '//일반글일때
|
|
|
|
'//이미지 삭제
|
|
SQL_I = "SELECT b_file1,b_file2,b_file3,b_file4,b_file5 FROM " & a_tablename & " WHERE b_ref = " & chk(z)
|
|
Set RS_I = Dbcon.Execute(SQL_I)
|
|
|
|
Do Until rs_i.eof
|
|
|
|
b_file1 = RS_I("b_file1")
|
|
b_file2 = RS_I("b_file2")
|
|
b_file3 = RS_I("b_file3")
|
|
b_file4 = RS_I("b_file4")
|
|
b_file5 = RS_I("b_file5")
|
|
|
|
|
|
strDir = server.mappath("/data/board/")& "\" & a_tablename & "\"
|
|
strDir2 = server.mappath("/data/board/")& "\" & a_tablename & "\thum\"
|
|
|
|
|
|
If b_file1 <> "" then call dfile(strDir,b_file1) '삭제
|
|
If b_file2 <> "" then call dfile(strDir,b_file2) '삭제
|
|
If b_file3 <> "" then call dfile(strDir,b_file3) '삭제
|
|
If b_file4 <> "" then call dfile(strDir,b_file4) '삭제
|
|
If b_file5 <> "" then call dfile(strDir,b_file5) '삭제
|
|
|
|
If b_file1 <> "" then call dfile(strDir,b_file1) : call dfile(strDir2,b_file1) '삭제
|
|
If b_file2 <> "" then call dfile(strDir,b_file2) : call dfile(strDir2,b_file2) '삭제
|
|
If b_file3 <> "" then call dfile(strDir,b_file3) : call dfile(strDir2,b_file3) '삭제
|
|
If b_file4 <> "" then call dfile(strDir,b_file4) : call dfile(strDir2,b_file4) '삭제
|
|
If b_file5 <> "" then call dfile(strDir,b_file5) : call dfile(strDir2,b_file4) '삭제
|
|
|
|
rs_i.movenext
|
|
loop
|
|
|
|
|
|
|
|
SQL = "Delete From " & a_tablename & " where b_ref = "& trim( chk(z) )
|
|
|
|
dbcon.execute sql
|
|
|
|
|
|
Else '//답변글 일때(해당 목록만 삭제)
|
|
|
|
|
|
'//이미지 삭제
|
|
SQL_I = "SELECT b_file1,b_file2,b_file3,b_file4,b_file5 FROM " & a_tablename & " WHERE b_num = " & trim(chk(z))
|
|
Set RS_I = dbcon.execute( sql_i )
|
|
|
|
b_file1 = RS_I("b_file1")
|
|
b_file2 = RS_I("b_file2")
|
|
b_file3 = RS_I("b_file3")
|
|
b_file4 = RS_I("b_file4")
|
|
b_file5 = RS_I("b_file5")
|
|
|
|
|
|
strDir = server.mappath( "/data/board/" ) &"\" & a_tablename & "\"
|
|
strDir2 = server.mappath( "/data/board/" ) &"\" & a_tablename & "\thum\"
|
|
|
|
If b_file1 <> "" then Call dfile(strDir,b_file1) : Call dfile(strDir2,b_file1) '//삭제
|
|
If b_file2 <> "" then Call dfile(strDir,b_file2) : Call dfile(strDir2,b_file2) '//삭제
|
|
If b_file3 <> "" then Call dfile(strDir,b_file3) : Call dfile(strDir2,b_file3) '//삭제
|
|
If b_file4 <> "" then Call dfile(strDir,b_file4) : Call dfile(strDir2,b_file4) '//삭제
|
|
If b_file5 <> "" then Call dfile(strDir,b_file5) : Call dfile(strDir2,b_file4) '//삭제
|
|
|
|
SQL = "Delete From " & a_tablename & " where b_ref = " & trim(chk(z))
|
|
dbcon.execute sql
|
|
|
|
End if
|
|
|
|
rs_2.movenext
|
|
Loop
|
|
|
|
'일정관리 sms 라면
|
|
If a_level = "schedule_sms" Then
|
|
sql = "delete from em_tran where tran_etc2 = '" & a_num & "_" & trim(chk(z)) & "'"
|
|
'Response.write sql
|
|
'Response.end
|
|
dbcon.execute sql
|
|
|
|
End if
|
|
next
|
|
|
|
|
|
Else '//일반삭제
|
|
|
|
|
|
'//파일 삭제
|
|
SQL_I = "SELECT b_file1,b_file2,b_file3,b_file4, b_file5 FROM " & a_tablename & " WHERE b_num = " & b_num
|
|
Set RS_I = dbcon.execute( sql_i )
|
|
|
|
b_file1 = RS_I("b_file1")
|
|
b_file2 = RS_I("b_file2")
|
|
b_file3 = RS_I("b_file3")
|
|
b_file4 = RS_I("b_file4")
|
|
b_file5 = RS_I("b_file5")
|
|
|
|
|
|
strDir = server.mappath( "/data/board/" ) & "\" & a_tablename & "\"
|
|
strDir2 = server.mappath( "/data/board/" ) & "\" & a_tablename & "\thum\"
|
|
|
|
'response.write strDir & b_file1
|
|
'response.end
|
|
|
|
If b_file1 <> "" then call dfile(strDir,b_file1) : call dfile(strDir2,b_file1) '//삭제
|
|
If b_file2 <> "" then call dfile(strDir,b_file2) : call dfile(strDir2,b_file2) '//삭제
|
|
If b_file3 <> "" then call dfile(strDir,b_file3) : call dfile(strDir2,b_file3) '//삭제
|
|
If b_file4 <> "" then call dfile(strDir,b_file4) : call dfile(strDir2,b_file4) '//삭제
|
|
If b_file5 <> "" then call dfile(strDir,b_file5) : call dfile(strDir2,b_file4) '//삭제
|
|
|
|
|
|
'//삭제하기
|
|
sql = " DELETE FROM " & a_tablename & " WHERE b_num = " & b_num
|
|
dbcon.execute sql
|
|
|
|
|
|
'일정관리 sms 라면
|
|
If a_level = "schedule_sms" Then
|
|
sql = "delete from em_tran where tran_etc2 = '" & a_num & "_" & b_num & "'"
|
|
'Response.write sql
|
|
'Response.end
|
|
dbcon.execute sql
|
|
End if
|
|
End if
|
|
|
|
|
|
ok_url = "list.asp?a_num=" & a_num & "&" & page_info
|
|
Call loding("0", ok_url)
|
|
|
|
|
|
'//세션소멸....
|
|
SESSION("pwd_chk_" & a_num & "_" & b_num) = ""
|
|
|
|
%> |