sp1000je
47 lines
1.1 KiB
Plaintext
47 lines
1.1 KiB
Plaintext
<!-- #include virtual = "/common/lib/dbcon.asp" -->
|
|
<!-- #include virtual = "/common/lib/func.asp" -->
|
|
<%
|
|
Dim s_num, status
|
|
Dim sql, ok_url
|
|
|
|
'//파라미터정보 *************************************************************************************
|
|
s_num = InputValue( request("s_num") )
|
|
status = InputValue( request("status") )
|
|
chk = InputValue( request("chk") )
|
|
chk = Replace(chk, " ", "")
|
|
chk = split(chk, ",")
|
|
'//**************************************************************************************************
|
|
|
|
If status = "totdel" Then '다중삭제
|
|
|
|
For z = 0 To UBound(chk)
|
|
|
|
sql = " delete from emt_category where s_num = '" & chk(z) & "'"
|
|
dbcon.execute sql
|
|
|
|
'이모티콘 삭제
|
|
sql = "delete from emt where s_num = '" & chk(z) & "'"
|
|
dbcon.execute sql
|
|
next
|
|
|
|
Set rs_3 = Nothing
|
|
|
|
|
|
Else '//일반삭제
|
|
|
|
sql = " delete from emt_category where s_num = '" & s_num & "'"
|
|
dbcon.execute sql
|
|
|
|
'이모티콘 삭제
|
|
sql = "delete from emt where s_num = '" & s_num & "'"
|
|
dbcon.execute sql
|
|
|
|
End if
|
|
|
|
|
|
If ct_ref = "0" then ct_ref = ""
|
|
|
|
ok_url = "write.asp"
|
|
|
|
Call loding ("0", ok_url)
|
|
%> |