<!--#include virtual = "/common/lib/dbcon.asp" -->
<!--#include virtual = "/common/lib/func.asp" -->

<!--#include file = "config.asp" -->

<%

' 파라미터정보 *************************************************************************************
b_l_num		= InputValue(request("b_l_num"))
status		= InputValue(request("status"))
' **************************************************************************************************


If status = "totdel" then ' 다중삭제

	chk = InputValue(Replace(request("chk")," ",""))
	arr_chk = Split(chk,",")

	For z=0 To UBound(arr_chk)

		' 이미지 삭제
		SQL_I    = "SELECT b_l_img FROM banner WHERE b_l_num = "&arr_chk(z)
		Set Rs = Dbcon.Execute (SQL_I)

		b_l_img = rs("b_l_img")
		rs.close : Set rs = nothing

		strDir		= server.mappath("\")&"\data\banner\"

		If b_l_img <> "" then

			Call dfile(strDir, b_l_img) ' 삭제
		End if

		sql = " delete from banner where b_l_num = "&arr_chk(z)
		Dbcon.execute sql

	next


else ' 일반삭제
	

	' 이미지 삭제
	SQL_I    = "SELECT b_l_img FROM banner WHERE b_l_num = "&b_l_num
	Set Rs = Dbcon.Execute (SQL_I)

	b_l_img = rs("b_l_img")
	rs.close : Set rs = nothing

	strDir		= server.mappath("\")&"\data\banner\"

	If b_l_img <> "" then

		Call dfile(strDir,b_l_img) ' 삭제
	End if

	sql = " delete from banner where b_l_num = "&b_l_num
	Dbcon.execute sql

End If


Dbcon.close : Set Dbcon = Nothing

ok_url = "list.asp"
Call loding ("0", ok_url)


%>