최초등록

This commit is contained in:
sp1000je
2026-02-23 10:01:00 +09:00
commit 7bc9767bf4
3120 changed files with 198447 additions and 0 deletions
+47
View File
@@ -0,0 +1,47 @@
<!-- #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)
%>